利用vbs生成快捷方式运行最后删除 10

可不可以利用vbs生成一个快捷方式然后运行这个快捷方式最后删除这个快捷方式(之所以要生成快捷方式是因为要在运行时加参数否则我就直接运行程序了)而且要不显示快捷方式所以最好... 可不可以利用vbs生成一个快捷方式然后运行这个快捷方式最后删除这个快捷方式(之所以要生成快捷方式是因为要在运行时加参数否则我就直接运行程序了)而且要不显示快捷方式所以最好不要生成在桌面上!

或者您有更好的方法也请告诉我
这样是不行的,不是简单的参数可以说是命令了所以我看还是按我说的编一个吧
展开
 我来答
carson_guo
2008-07-24 · 知道合伙人软件行家
carson_guo
知道合伙人软件行家
采纳数:318 获赞数:638
性能测试 自动化测试 Selenium,QTP, Loadrunner,ALM/QC

向TA提问 私信TA
展开全部
Set WshShell = WScript.CreateObject("WScript.Shell")
Return = WshShell.Run("notepad " & WScript.ScriptFullName, 1, true)
run第一个参数是一个string, 可以同时包含可执行的文件 + 参数
1。如果可执行文件中有空格,要放在整个路径加单引号
2。干脆把文件放在没有空格的路径下最省事。
已赞过 已踩过<
你对这个回答的评价是?
评论 收起
breakan
2008-07-24 · TA获得超过3380个赞
知道小有建树答主
回答量:1869
采纳率:0%
帮助的人:1618万
展开全部
Dim objws,objenv,objlink
Set objws=WScript.CreateObject("wscript.shell")
Set objenv=objws.Environment("PROCESS")

Dim spath,linkpath
spath="c:\windows\system32\notepad.exe" '这里是源程序的路径
linkpath=objenv("TEMP") & "\temp.lnk"
Set objlink=objws.CreateShortcut(linkpath)
objlink.targetpath=spath
objlink.save

objws.Run "cmd /c " & Chr(34) & linkpath & Chr(34),0,True
objws.Run "cmd /c del " & Chr(34) & linkpath & Chr(34),0

你要加参数,可以在objws.Run "cmd /c " & Chr(34) & linkpath & Chr(34)里加上比如
objws.Run "cmd /c " & Chr(34) & linkpath & Chr(34),& " a.txt",0,True

那你自己编吧。
本回答被网友采纳
已赞过 已踩过<
你对这个回答的评价是?
评论 收起
chenender
2008-07-26 · TA获得超过5859个赞
知道大有可为答主
回答量:6243
采纳率:66%
帮助的人:2566万
展开全部
快捷方式是什么东东
已赞过 已踩过<
你对这个回答的评价是?
评论 收起
收起 更多回答(1)
推荐律师服务: 若未解决您的问题,请您详细描述您的问题,通过百度律临进行免费专业咨询

为你推荐:

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

类别

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

说明

0/200

提交
取消

辅 助

模 式