Создать ярлык страницы Internet Explorer с VBS

Question

Я пытаюсь создать скрипт VB для создания .lnk который указывает на веб-страницу, открытую в Internet Explorer:

Set oWS = WScript.CreateObject("WScript.Shell") 
sLinkFile = "C:\users\admin\Desktop\My Website.lnk" 
Set oLink = oWS.CreateShortcut(sLinkFile) 
oLink.TargetPath = "C:\Program Files (x86)\Internet Explorer\iexplore.exe http://192.168.1.1" 
oLink.WorkingDirectory = "C:\Program Files (x86)\Internet Explorer\" 
oLink.Description = "My Website" 
oLink.Save 

Но я получаю следующую ошибку при попытке выполнить:

.\CreateShortcut.vbs(4, 1) Microsoft VBScript runtime error: Invalid procedure call or argument

Я предполагаю, что это связано с моим синтаксисом на oLink.Переменная TargetPath , но я не уверен, что не так. Я пытался избежать кавычек, но это не сработало.

Какой мой неверный вызов или аргумент в этом сценарии?

Обратите внимание, что я не могу просто ссылаться на веб-страницу, а не на iexplore.exe , так как мне нужно, чтобы эта страница открывалась только в Internet Explorer, а не в любом браузере по умолчанию.

Answer 1

В соответствии со страницей MSDN свойства TargetPath:

Это свойство только для целевого пути ярлыка. Все аргументы для ярлыка должны быть помещены в свойство [sic] аргумента.

Включение URL в целевой путь делает путь недействительным - имена файлов не могут содержать двоеточия. Сценарий будет работать, если вы укажете только путь к Internet Explorer в TargetPath . Затем вы можете разместить URL страницы в свойстве Arguments :

oLink.TargetPath = "C:\Program Files (x86)\Internet Explorer\iexplore.exe"
oLink.Arguments = "http://192.168.1.1"