批处理之家 » VBS原创&转载 » 创建快捷方式的vbs

[新手上路]批处理新手入门导读	[视频教程]批处理基础视频教程	[视频教程]VBS基础视频教程	[批处理精品]批处理版照片整理器
[批处理精品]纯批处理备份&还原驱动	[批处理精品]CMD命令50条不能说的秘密	[在线下载]第三方命令行工具	[在线帮助]VBScript / JScript 在线参考

返回列表发帖

Rank: 4

帖子: 34
积分: 306
技术: 0
捐助: 0
注册时间: 2007-10-25

1楼 跳转到 » 正序看帖

字体大小: tT

发表于 2007-11-9 19:07 | 只看该作者

创建快捷方式的vbs

不记得是在哪天了，看到了此脚本的java版本，看了下，还可以，大概的可以看懂，所以就把它给改成了vb脚本供大家参考！下面的例子作用是给记事本创建一个桌面快捷方式，希望有用！

set WSHShell = CreateObject("WScript.Shell") 
DesktopPath = WSHShell.SpecialFolders("Desktop") 
set Shortcut1 = WSHShell.CreateShortcut(DesktopPath + "\记事本快捷方式.lnk") 
Shortcut1.TargetPath = "c:\Windows\notepad.exe" 
Shortcut1.Save()
复制代码

Rank: 2

帖子: 9
积分: 124
技术: 0
捐助: 0
注册时间: 2009-10-13

6楼

发表于 2009-10-29 17:43 | 只看该作者

找了很长时间，谢谢了

Rank: 2

帖子: 1
积分: 103
技术: 0
捐助: 0
注册时间: 2009-4-11

5楼

发表于 2009-5-28 01:53 | 只看该作者

我正在找这个东西呢，非常感谢！！！

Rank: 2

帖子: 4
积分: 178
技术: 0
捐助: 0
注册时间: 2008-10-9

4楼

发表于 2008-10-25 10:05 | 只看该作者

谢谢，正在学vbs，希望多学习学习，谢谢楼主！

Rank: 12

帖子: 14935
积分: 46142
技术: 857
捐助: 745
注册时间: 2008-6-9

3楼

发表于 2008-10-24 19:50 | 只看该作者

回复 2楼的帖子

如果你是网管，有1000台电脑需要执行这个操作，怎么办？挨个手工创建？

我帮忙写的代码不需要付钱。如果一定要给，请在微信群或QQ群发给大家吧。
【微信公众号、微信群、QQ群】http://bbs.bathome.net/thread-3473-1-1.html
【支持批处理之家，加入VIP会员！】http://bbs.bathome.net/thread-67716-1-1.html