批处理之家 - Powered by Discuz! Board

标题: [技术讨论] [分享]vbs创建桌面快捷方式示例 [打印本页]

作者: batman 时间: 2011-3-17 19:19 标题: [分享]vbs创建桌面快捷方式示例

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

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 
复制代码

作者: hbwazxf 时间: 2011-3-17 20:28

感谢版主，学习了。。。

作者: myzam 时间: 2011-3-21 13:29

1# batman
我觉得这两句是多余的
set url=nothing
set ws=nothing
因为当你创建好了快捷方式后，程序就自动结束了。
这时卸载对象是自动的。不需要你去卸载。
个人意见。

作者: batman 时间: 2011-3-21 16:46

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

作者: wc726842270 时间: 2011-3-22 19:59

比较好的习惯。事实的情况正如3L所说，以前也在此处迷茫过，但是后来就渐渐明白了。后来看了一些名明法就了解了。（只不过个人的E文没有水准，所以也就没细看）

作者: myzam 时间: 2011-3-22 20:51

习惯到是可以成自然，当然可以。

欢迎光临批处理之家 (http://bathome.net./)