CMD/BAT - [решено] Как создать ярлык на рабочем столе для файла из той же папки где запускается скрипт?

amel27 · Отправлено: **10:44, 12-04-2011** | #2

Код:

@set @x=0 /*
@cscript/nologo /e:jscript "%~f0" "%~dp0file.exe" "%~dp0"
@exit */
sh=WScript.CreateObject("WScript.Shell")
lk=sh.CreateShortcut(sh.SpecialFolders("Desktop")+"\\file.lnk")
lk.TargetPath=WScript.Arguments(0)
lk.WorkingDirectory = WScript.Arguments(1)
lk.Save()

статья: Создание ярлыков

Iska · Отправлено: **11:02, 12-04-2011** | #3

Похожие темы:
[решено] Создание ярлыков с ссылкой на привод когда имя диска не определено
[решено] Как создать ярлык и поменять его иконку или поменять иконку уже существующего ярлыка

Пример пакетного файла:
NirCmd - Windows command line tool

Код:

@echo off
nircmd.exe shortcut "%~dp0file.exe" "~$folder.desktop$" "My File"

navigator19 · Отправлено: **12:50, 12-04-2011** | #4

Большое спасибо, все эти статьи я читал просто не знал как определить относительное место хранение файла, где можно прочитать про "%~dp0"

amel27 · Отправлено: **13:05, 12-04-2011** | #5

Цитата navigator19:

где можно прочитать про "%~dp0" »

Код:

CALL /?

navigator19 · Отправлено: **13:17, 12-04-2011** | #6

Спасибо, век живи век учись!

navigator19 · Отправлено: **21:46, 12-04-2011** | #7

В продолжение темы, а как с помощью этого скрипта

Код:

@set @x=0 /*
@cscript/nologo /e:jscript "%~f0" "%~dp0file.exe" "%~dp0"
@exit */
sh=WScript.CreateObject("WScript.Shell")
lk=sh.CreateShortcut(sh.SpecialFolders("Desktop")+"\\file.lnk")
lk.TargetPath=WScript.Arguments(0)
lk.WorkingDirectory = WScript.Arguments(1)
lk.Save()

в ярлык программы ещё и параметры запуска дописать

amel27 · Отправлено: **06:28, 13-04-2011** | #8

Цитата navigator19:

параметры запуска дописать »

линк на статью был дан не случайно (см. Вариант 1):

Код:

@set @x=0 /*
@cscript/nologo /e:jscript "%~f0" "%~dp0file.exe" "%~dp0"
@exit */
sh=WScript.CreateObject("WScript.Shell")
lk=sh.CreateShortcut(sh.SpecialFolders("Desktop")+"\\file.lnk")
//------------------------------------------
lk.TargetPath = WScript.Arguments(0)       // Путь к файлу, для которого создаётся ярлык
lk.WorkingDirectory = WScript.Arguments(1) // Рабочая папка
lk.WindowStyle = 1                         // Стиль окна: 1-Обычное; 3-Развёрнутое; 7-Свёрнутое
lk.Hotkey = "CTRL+SHIFT+F"                 // Клавиши быстрого вызова
lk.IconLocation = WScript.Arguments(0)     // Путь к файлу иконки для ярлыка
lk.Description = "Это тестовый ярлык"      // Комментарий
lk.Arguments = "C:\MyFile.txt"             // Аргументы командной строки
//------------------------------------------
lk.Save()