[技术讨论] [分享]vbs创建桌面快捷方式示例

batman

以下代码将在电脑桌面上创建一个指向批处理之家主页的快捷方式

Set ws = CreateObject("WScript.Shell")
DesktopPath = ws.SpecialFolders("Desktop")
Set url = ws.CreateShortcut(DesktopPath & "\bathome.url")
url.TargetPath = "http://www.bathome.net/"
url.Save
Set url = Nothing 
Set ws = Nothing 
复制代码

batman

3# myzam
这是个个人习惯的问题，但我觉得这是个好习惯，不知兄弟是否认同。。。