helpf.pro
Регистрация
 0 
Распечатать

Создание ярлыка файла программно

На Рабочем столе

Код 1C v 8.х
  Shell = Новый COMОбъект("WScript.Shell");
РабочийСтол = Shell.SpecialFolders("Desktop");
Ярлык = Shell.CreateShortcut(РабочийСтол + "\\Regedit.lnk");
Ярлык.TargetPath = Shell.ExpandEnvironmentStrings("%windir%\\regedit.exe");
Ярлык.WorkingDirectory = Shell.ExpandEnvironmentStrings("%windir%");
Ярлык.WindowStyle = 1;
Ярлык.IconLocation = Shell.ExpandEnvironmentStrings("%windir%\\regedit.exe, 0");
Ярлык.Save();


Код 1C v 7.x
  Shell = СоздатьОбъект("WScript.Shell");
РабочийСтол = Shell.SpecialFolders("Desktop");
Ярлык = Shell.CreateShortcut(РабочийСтол + "\\Regedit.lnk");
Ярлык.TargetPath = Shell.ExpandEnvironmentStrings("%windir%\\regedit.exe");
Ярлык.WorkingDirectory = Shell.ExpandEnvironmentStrings("%windir%");
Ярлык.WindowStyle = 1;
Ярлык.IconLocation = Shell.ExpandEnvironmentStrings("%windir%\\regedit.exe, 0");
Ярлык.Save();
Разместил:   Версии: | 7.x | 8.x |  Дата:   Прочитано: 8267
 0 
Распечатать
Возможно, вас также заинтересует
Где находится файл лицензии 1С 9
Многие спрашивают А где хранится лицензия на 1С: Предприятие 8? или Где посмотреть лицензионный ключ в 1С? В 1С информацию о полученной лицензии можно посмотреть нажав «Справка» — «О программе» В разделе Лицензия:...
Где список открытых окон (документов, справочников) в такси? 1
В текущей работе пользователь обычно открывает несколько объектов. Это может быть документ, справочник, отчет и т.д. В предыдущем интерфейсе не было проблем быстро найти открытый объект и актуализировать его для...
Журнал регистрации 0
Журнал регистрации относится к информационной базе и служит для сохранения информации о событиях, возникающих в процессе работы пользователей с данной информационной базой . Эта информация может быть важной с...
Как настроить отображение даты? Год - 4 символа? 0
Есть сотрудник 1946 года рождения. Программа не пропускает этот год, а выдает 2046 год. И, соответствено, выдает ошибку. Изменить год начала рабочего столетия и поменять количество символов в представлении даты. Делается...
Как получить путь к Рабочему столу Пользователя? 3
Ctrl = Новый COMОбъект(" MSScriptControl.ScriptControl" ); Ctrl.Language = " vbscript" ; Ctrl.AddCode(" |Function SpecialFolder() | Set Shell = CreateObject(" " WScript.Shell" " ) | SpecialFolder = Shell.RegRead(" " HKEY_CURRENT_USERSof
Посмотреть все результаты поиска похожих
Вы не можете отправить комментарий анонимно, пожалуйста войдите или зарегистрируйтесь.