Функция получения пути к рабочему столу

Данная функция может понадобится при открытии окна сохранения документа в файл.

Для удобства я создал глобальный общий модуль выполняемый на клиенте и вставил в него функцию.

Описание

Объявим функцию:

Функция ПутьКРабочемуСтолу() Экспорт

Попытаемся получить адрес через Shell

App = Новый COMОбъект("Shell.Application");
ПутьКРабСтолу = App.Namespace(16).Self.Path;

Если произошла ошибка сами присвоим значение. Думаю лучше передать значение Ложь или пустую строку «».

Я же присвою значение папки временных файлов, но лучше пустоту «»;

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

И возвращаем путь

Возврат ПутьКРабСтолу;

 

Полный исходный код функции:

&НаКлиенте
Функция ПутьКРабочемуСтолу() Экспорт
  Попытка
    App = Новый COMОбъект("Shell.Application");
    ПутьКРабСтолу = App.Namespace(16).Self.Path;
  Исключение
    ПутьКРабСтолу = КаталогВременныхФайлов();
  КонецПопытки;
  Возврат ПутьКРабСтолу;
КонецФункции


comments powered by Disqus

Популярное