VBS在桌面創建快捷方式
Set WshShell = WScript.CreateObject("WScript.Shell")
strDesktop = WshShell.SpecialFolders("Desktop") '特殊文件夾“桌面”
rem 在桌面創建一個記事本快捷方式
set oShellLink = WshShell.CreateShortcut(strDesktop & "\Internet Explorer.lnk")
oShellLink.TargetPath = "C:\Program Files\Internet Explorer\iexplore.exe" '目標
oShellLink.Arguments = "http://m.cmdnetsoft.com/" '程序的參數
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 '創建保存快捷方式
關鍵詞:VBS
