使用VBS创建Internet Explorer页面快捷方式

使用VBS创建Internet Explorer页面快捷方式

我正在尝试创建一个 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 中打开,而不是在默认浏览器中打开。

答案1

根据TargetPath有关该属性的MSDN 页面

此属性仅适用于快捷方式的目标路径。快捷方式的任何参数都必须放在 Argument 的 [sic] 属性中。

在目标路径中包含 URL 会使路径无效 - 文件名不能包含冒号。如果您在 中仅指定 Internet Explorer 的路径,该脚本将起作用TargetPath。然后您可以将页面 URL 放在Arguments财产:

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

相关内容