Создание ярлыка и отправка его в заранее заданное место назначения с жестким кодом

Кто-нибудь поможет с этим командным файлом. Я сделал пару изменений, и все работает нормально. Однако я хочу изменить его так, чтобы он делал ярлык в папке по моему выбору, которая закодирована в пакетном файле, а НЕ в том же месте, что и исходный файл. Я совсем не увлекаюсь VBS и потратил довольно много времени, пытаясь следовать сценарию, но, похоже, ничего не добился. Любая помощь будет оценена.

echo Set oWS = WScript.CreateObject("WScript.Shell") > CreateShortcut.vbs
echo sLinkFile = "%~f1.lnk" >> CreateShortcut.vbs
echo Set oLink = oWS.CreateShortcut(sLinkFile) >> CreateShortcut.vbs
echo oLink.TargetPath = "%~f1" >> CreateShortcut.vbs
echo oLink.Save >> CreateShortcut.vbs
cscript CreateShortcut.vbs
del CreateShortcut.vbs

0

Добавить комментарий

Ваш адрес email не будет опубликован.