Создание ярлыка через vbscript

[finsoftrz]

Поглядел пример создания ярлыка в соответствующей теме на этом форуме. Та тема закрыта. Вдогонку создам новую. Если кому-то хочется проще и понятнее, то можно через vbscript. В аттаче небольшой классик для этого. Пример вызова для создания ярлыка на рабочем столе ниже. Если в первом параметре Make поставить 2, то ярлык создастся в автозапуске.

Код: Выделить всё

myrout routine
   DATA
fsSC fsShortCut
  CODE   
   fsSC.init('1.vbs')   
   fsSC.Make(1,clip(longpath()) & '\prg.exe',clip(longpath()),'Программа.lnk','Описание') 
   fsSC.kill

[Admin]

Каких уже вариантов не предложили для создания ярлыка. Я тоже отмечусь...
DLL на С++ с функцией CreateLink и ее исходники. VS 2019 C++
Программа на Clarion для примера.

PepyakaShortcuts.zip

(23.84 КБ) 134 скачивания

[Дед Пахом]

CLW скачали 7, а INC 4 раза.

[Admin]

CLW скачали 7, а INC 4 раза.

Мне inc не интересен, я просто реализацию посмотрел. Как то так