Board logo

标题: VBS 顺序安装【已解决】 [打印本页]

作者: yhshiro     时间: 2008-3-5 12:07    标题: VBS 顺序安装【已解决】
我要安装一个驱动 可以用命令安装的那种。。。
我想等那个驱动安装完成以后再安装一些其他的东西。。
用延时的不要哈。。。

IF (fso.FileExists("PhysX.exe")) Then
shell.run "PhysX.exe /passive"
Else
msg=msgbox("程序可能无法启动~",1,"出问题啦!!")
end if
………………………………
………………………
………………
等上面这个完全安装完后再运行下一个,或者下一句

在问个VBS里面跳转的问题。。。

就想上面那段一样,如果文件夹里面没有那文件,那下面的代码就不再执行。。直接跳到结束或最后一句。

Last edited by yhshiro on 2008-3-7 at 08:16 PM ]

作者: fastslz     时间: 2008-3-5 13:27
shell.run "PhysX.exe /passive", 1, True '等待PhysX.exe安装完后再运行下一个
Runerr = shell.run "PhysX.exe /passive", 1, True '从PhysX.exe返回的错误代码

Set fso=CreateObject("Scripting.FileSystemObject")
Set WshShell=CreateObject("WScript.Shell")
If (fso.FileExists("PhysX.exe")) Then
WshShell.run "PhysX.exe /passive", 1, True
Else
'下一步做的事情,也可以call语句
WScript.Quit
End If