vbs 创建快捷方式

目录下1.exe创建快捷方式使用2.exe图标、、、我要在桌面开始菜单带文件夹创建比方:极品飞车\极品飞车6运行错误... 目录下 1.exe创建快捷方式 使用2.exe 图标 、、、 我要在桌面 开始菜单带文件夹创建 比方: 极品飞车\极品飞车6
运行错误
展开
 我来答
12d1a2235w652d
2013-10-18 · TA获得超过385个赞
知道小有建树答主
回答量:391
采纳率:80%
帮助的人:328万
展开全部
set WshShell = WScript.CreateObject("WScript.Shell")

strDesktop = WshShell.SpecialFolders("Desktop") 

set oShellLink = WshShell.CreateShortcut(strDesktop & "\极品飞车6.lnk")

oShellLink.TargetPath = "极品飞车\极品飞车6\1.exe"

oShellLink.IconLocation = "极品飞车\极品飞车6\2.exe"

oShellLink.Save
set WshShell = WScript.CreateObject("WScript.Shell")

strDesktop = WshShell.SpecialFolders("Desktop") 

set oShellLink = WshShell.CreateShortcut("C:\Documents and Settings\All Users\「开始」菜单\程序\极品飞车6.lnk")

oShellLink.TargetPath = "极品飞车\极品飞车6\1.exe"

oShellLink.IconLocation = "极品飞车\极品飞车6\2.exe"

oShellLink.Save
loveme584520
2013-10-18
知道答主
回答量:22
采纳率:0%
帮助的人:17.7万
展开全部
那哪里要用编程。。。直接左键按住,拉动到开始。会出现开始菜单,然后直接到你要放的位置放开左键就可以了
已赞过 已踩过<
你对这个回答的评价是?
评论 收起
推荐律师服务: 若未解决您的问题,请您详细描述您的问题,通过百度律临进行免费专业咨询

为你推荐:

下载百度知道APP,抢鲜体验
使用百度知道APP,立即抢鲜体验。你的手机镜头里或许有别人想知道的答案。
扫描二维码下载
×

类别

我们会通过消息、邮箱等方式尽快将举报结果通知您。

说明

0/200

提交
取消

辅 助

模 式