vbscript创建网站桌面快捷方式

vbscript创建网站桌面快捷方式源代码如下,将下面的代码保存为vbs,双击运行即可创建本站的桌面快捷方式

Set WshShell = WScript.CreateObject("WScript.Shell")
strDesktop = WshShell.SpecialFolders("Desktop")'特殊文件夹“桌面”
'在桌面创建一个网站的快捷方式
set oShellLink = WshShell.CreateShortcut(strDesktop & "\编程设计网.lnk")'创建快捷方式文件,名称在这里修改
oShellLink.TargetPath = "C:\Program Files\Internet Explorer\iexplore.exe" '目标,用IE打开
oShellLink.Arguments = "http://www.xxxx.net" '程序的参数,网站的url地址
oShellLink.WindowStyle = 1 '参数1默认窗口激活,参数3最大化激活,参数7最小化
oShellLink.Hotkey = "" '快捷键
oShellLink.IconLocation = "C:\Program Files\Internet Explorer\iexplore.exe, 0" '快捷方式图标
oShellLink.Description = "编程设计网快捷方式" '备注
oShellLink.WorkingDirectory = "C:\Program Files\Internet Explorer\" '起始位置
oShellLink.Save  '创建保存快捷方式

 


原创文章,转载请注明出处:vbscript创建网站桌面快捷方式

评论(0)Web开发网
阅读(267)喜欢(0)Asp/VBScript