中国DOS联盟

-- 联合DOS 推动DOS 发展DOS --

联盟域名:www.cn-dos.net 论坛域名:www.cn-dos.net/forum
DOS,代表着自由开放与发展,我们努力起来,学习FreeDOS和Linux的自由开放与GNU精神,共同创造和发展美好的自由与GNU GPL世界吧!

中国DOS联盟论坛
现在时间是 2026-08-06 11:11
中国DOS联盟论坛 » DOS批处理 & 脚本技术(批处理室) » vbs 如何运行一个程序 查看 1,169 回复 4
楼 主 vbs 如何运行一个程序 发表于 2007-03-29 20:35 ·  中国 安徽 芜湖 电信
高级用户
★★
积分 537
发帖 219
注册 2006-10-31 21:08
19年会员
UID 69036
性别 男
来自 芜湖
状态 离线
我用

dim name
name=inputbox("请输入需要运行的程序","运行")


然后怎么来运行 name 这个东东呢?
江湖远
碧空长
路茫茫

一个人漫无目的的奔跑,风,刺骨的冷....
2 发表于 2007-03-29 20:47 ·  中国 辽宁 本溪 联通
银牌会员
★★★
积分 1,212
发帖 464
注册 2006-12-13 21:11
19年会员
UID 73417
性别 男
状态 离线
dim name
set ws=createobject("wscript.shell")
name=inputbox("请输入需要运行的程序","运行")
ws.run name
本帖最近评分记录 (共 1 条) 点击查看详情
评分人分数时间
huzixuan +4 2007-03-29 21:00
3 发表于 2007-05-30 09:15 ·  中国 江苏 泰州 电信
初级用户
积分 30
发帖 14
注册 2006-01-10 16:39
20年会员
UID 48757
状态 离线
Originally posted by jmz573515 at 2007-3-29 20:47:
dim name
set ws=createobject("wscript.shell")
name=inputbox("请输入需要运行的程序","运行")
ws.run name

这里的NAME必须是系统自带的,如何不是,必须要给出完整的路径.例如,你要调用你自己写的一个.VBS文件,那你必须要给出它的位置.
4 发表于 2007-05-30 11:19 ·  中国 新疆 乌鲁木齐 电信
高级用户
★★★
Autowalk
积分 845
发帖 375
注册 2007-03-03 01:58
19年会员
UID 80606
性别 男
状态 离线
可以使用相对路径, 比如在同一目录下就不需要路劲
你好,脚本专家!
<a target=blank href=tencent://message/?uin=29654761&Site=www.111.com&Menu=yes><img border="0" SRC=http://wpa.qq.com/pa?p=1:29654761:5 alt="点击这里给我发消息"></a>
5 用对话框来打开就好。 发表于 2007-11-08 23:34 ·  中国 广西 南宁 电信
初级用户
积分 54
发帖 25
注册 2006-09-29 02:15
19年会员
UID 63991
状态 离线

Set objDialog = CreateObject("UserAccounts.CommonDialog")
objDialog.Filter = "All Files|*.*"
objDialog.Flags = &H020
objDialog.InitialDir = "C:\"
intResult = objDialog.ShowOpen
If intResult = 0 Then
Wscript.Quit
Else
'Wscript.Echo objDialog.FileName
Set WshShell = CreateObject("WScript.Shell")
WshShell.Run objDialog.FileName ,,true
End If



发现文本文件可以直接调用记事本打开,其他的如压缩文件以及长文件名的

文件会提示错误,找不到该文件,谁有办法解决?
论坛跳转: