//Возвращает что-то типо: C:\Documents and Settings\E.S.Migachev\Мои документы\

Функция КаталогМоиДокументы() Экспорт

	

	App = Новый COMОбъект("Shell.Application");

	Folder = App.Namespace(5);

	Результат = "";

	Попытка

		Результат = Folder.Self.Path;

	Исключение

		Результат = "";

	КонецПопытки;

	Если Результат = "" Тогда

		Результат = КаталогВременныхФайлов();

	КонецЕсли; 

	Возврат Результат+"\";

	

КонецФункции