楼 主
在vbs文件中，如何用cmd 调用vbs 的过程
发表于 2009-05-10 07:20 · 中国 北京 联通
初级用户
★★
积分 48
发帖 51
注册 2009-03-03 23:23
17年会员
UID 140498
性别 女
状态 离线
在a.vbs文件中，如何用cmd 调用vbs 的过程 echo1()
Set She = CreATeObJEct("wScrIPt.Shell")
she.run "cmd /c if not exist c:\emai.a " & echo1 & " ",0
sub echo1()
wscript.echo "not running"
end sub
[ Last edited by QOIQoc on 2009-5-10 at 07:22 ]
第 2 楼
发表于 2009-05-10 08:48 · 中国 广东 广州 番禺区 电信
初级用户
★★
l i u s s
积分 73
发帖 101
注册 2008-09-17 00:21
17年会员
UID 125825
性别 男
来自 GZ
状态 离线
要想根据CMD命令结果来操作下一步，请用 Exec ，用 Run 不能。楼主查找一下自己之前发过的贴有相关内容。如果硬要用 Run ，则可以把CMD结果定向到临时文件中，然后再获取其中内容。
[ Last edited by newxso on 2009-5-10 at 08:53 ]
第 3 楼
发表于 2009-05-10 09:28 · 中国 北京 联通
初级用户
★★
积分 48
发帖 51
注册 2009-03-03 23:23
17年会员
UID 140498
性别 女
状态 离线
用 Exec 的问题就是有黑窗口闪，希望vbs 和cmd 最大程度的融合
Set She = CreATeObJEct("wScrIPt.Shell")
Set E = She.Exec("cmd /c if not exist c:\emai.a ")
if e.Status=0 then
echo1
end if
sub echo1()
wscript.echo "not running"
end sub
第 4 楼
发表于 2009-05-11 02:12 · 中国 陕西 西安 电信
铂金会员
★★★★
积分 5,212
发帖 2,478
注册 2007-02-08 23:39
19年会员
UID 79003
性别 男
状态 离线
1.
全用VBS写。。。
2.
用参数传。。。
S smile 微笑,L love 爱,O optimism 乐观,R relax 放松,E enthusiasm 热情...Slore
第 5 楼
发表于 2009-05-11 08:13 · 中国 北京 联通
初级用户
★★
积分 48
发帖 51
注册 2009-03-03 23:23
17年会员
UID 140498
性别 女
状态 离线
全用vbs 没问题，可 用参数传，不知是何意？ 请slore 指教
论坛跳转:
