关闭

创建ShortCut的一段代码

839人阅读 评论(0) 收藏 举报

下面是我写的一个VBS文件,该文件有两个参数,一个是你要建立的ShortCut的名字,另一个是这个ShortCut指向哪个folder,如下:
'Written by Sun Zhenfang 200601
'Argument1 - shortcut name
'Argument2 - shortcut target path
On Error Resume Next
Set   WshShell   =   WScript.CreateObject("WScript.Shell")
Set   oShellLink   =   WshShell.CreateShortcut(WScript.Arguments.Item(0)+".lnk")
oShellLink.TargetPath = WScript.Arguments.Item(1)
oShellLink.Save
Set   oShellLink =   Nothing
Set   WshShell  =   Nothing

调用例子
CreateDirShc.vbs CDisk C:
将在运行这个VBS的目录创建一个名字叫CDisk的指向C盘的ShortCut.

0
0

查看评论
* 以上用户言论只代表其个人观点,不代表CSDN网站的观点或立场
    个人资料
    • 访问:51105次
    • 积分:818
    • 等级:
    • 排名:千里之外
    • 原创:27篇
    • 转载:2篇
    • 译文:1篇
    • 评论:14条
    最新评论