VB程序如何执行VBS文件?【答对+40分】

有一个按钮,点了这个按钮后执行“D:\123.vbs”请大家不要复制网上的,很多都是错了。尤其是请大家不要回答Shell“D:\123.vbs"根本不行的。... 有一个按钮,点了这个按钮后执行“D:\123.vbs”
请大家不要复制网上的,很多都是错了。尤其是请大家不要回答
Shell“D:\123.vbs"
根本不行的。
展开
 我来答
你大腿中箭了
2012-07-08
知道答主
回答量:9
采纳率:0%
帮助的人:9万
展开全部
shell 语句只能调用EXE文件 所以可以这样做:
Shell "explorer d:\1.vbs"
使用windows资源管理器打开vbs文件
注意 这个方法常被病毒用来攻击系统 所以会被360拦截(vbs是高危文件) 测试前请关闭360
更多追问追答
追问
谢谢,但用这个打开后会有提示,要点击“打开”才能打开。可以直接打开吗?
追答
这个。。你有截图可以提供吗?
我在win7这里测试是直接运行VBS文件了
方便的话把VBS的代码也给我好吗?
乁倲亼
2012-07-08 · 超过12用户采纳过TA的回答
知道答主
回答量:109
采纳率:0%
帮助的人:48万
展开全部
Shell "cmd /c D:\123.vbs", vbhide
或者
Shell "cmd /c
mshta vbscript:createobject("sapi.spvoice").speak("hello")(window.close)
"
已赞过 已踩过<
你对这个回答的评价是?
评论 收起
xuxiaod123
2012-07-08
知道答主
回答量:17
采纳率:0%
帮助的人:4.9万
展开全部
修改Form的标题
Private Sub Form_Load()
Dim vbs As Object
Set vbs = CreateObject("ScriptControl")
vbs.Language = "vbs"
vbs.AddObject "ThisForm", Me, True
vbs.AddCode "sub mysub():ThisForm.caption=""hello"":end sub"
vbs.ExecuteStatement "mysub"
Set vbs = Nothing
End Sub
追问
我要的是什么,你给我的是什么?搜出来复制的吧?你这样很不尊重人知道吗?
http://zhidao.baidu.com/question/263393363.html
已赞过 已踩过<
你对这个回答的评价是?
评论 收起
为爱停留D
2012-07-08 · 超过12用户采纳过TA的回答
知道答主
回答量:56
采纳率:0%
帮助的人:22.5万
展开全部
Shell "explorer.exe " & app.path & "\1.vbs", 1
已赞过 已踩过<
你对这个回答的评价是?
评论 收起
匿名用户
2012-07-08
展开全部
shell "wscript.exe D:\123.vbs"
已赞过 已踩过<
你对这个回答的评价是?
评论 收起
宇桐非吧外交
2012-07-08 · TA获得超过693个赞
知道小有建树答主
回答量:274
采纳率:0%
帮助的人:419万
展开全部
说实话 真不知道你要干什么~
追问
我要用VB执行VBS脚本。
已赞过 已踩过<
你对这个回答的评价是?
评论 收起
收起 更多回答(4)
推荐律师服务: 若未解决您的问题,请您详细描述您的问题,通过百度律临进行免费专业咨询

为你推荐:

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

类别

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

说明

0/200

提交
取消

辅 助

模 式