vbScript中WScript.Shell对象的run和exec
━━━━━━━━━━━━━━━━━━━━━━━━━━
方法声明:
Function Exec(ByVal Command As String) As WshExec
Function Run(ByVal Command As String, [ByVal WindowStyle], [ByVal WaitOnReturn]) As Integer
区别:
1返回值
run的返回值是一个整数,就是成功0或失败1 exec方法的返回值是对象,从返回对象中可以获得控制台输出信息和控制台错误信息,即StdOut和StdErr属性等。
如:
Dim oShell,exeRs
Set oShell = CreateObject("WSCript.shell")
commandLine = "xcopy.exe"
Set exeRs = oShell.Exec(commandLine)
errMsg = exeRs.StdErr.ReadAll()
stdMsg = exeRs.StdOut.ReadAll()
WScript.echo "errMsg:" & errMsg & "stdMsg:" & stdMsg
ret = oShell.run(commandLine, 0, true)
WScript.echo "run method return value:" & ret
Set oShell = Nothing
Set exeRs = Nothing
━━━━━━━━━━━━━━━━━━━━━━━━━━
方法声明:
Function Exec(ByVal Command As String) As WshExec
Function Run(ByVal Command As String, [ByVal WindowStyle], [ByVal WaitOnReturn]) As Integer
区别:
1返回值
run的返回值是一个整数,就是成功0或失败1 exec方法的返回值是对象,从返回对象中可以获得控制台输出信息和控制台错误信息,即StdOut和StdErr属性等。
如:
Dim oShell,exeRs
Set oShell = CreateObject("WSCript.shell")
commandLine = "xcopy.exe"
Set exeRs = oShell.Exec(commandLine)
errMsg = exeRs.StdErr.ReadAll()
stdMsg = exeRs.StdOut.ReadAll()
WScript.echo "errMsg:" & errMsg & "stdMsg:" & stdMsg
ret = oShell.run(commandLine, 0, true)
WScript.echo "run method return value:" & ret
Set oShell = Nothing
Set exeRs = Nothing
取控制台错误和控制台信息。
2 执行参数
Run 的后两个参数,一个是cmd窗口的风格,一个是是否等待执行完成。最后一个参数很有用,如果你希望等待本次cmd执行的程序结束后,在执行 run后面的语句,设置这个参数为true,否则后面的语句将不等待cmd窗口完成,直接运行。
另外,如果你使用exec 方法的时候,如果希望等待cmd中程序执行完后,在执行后面的语句,也可以通过下面的方法: oExec.StdErr.ReadAll()或者oExec.StdOut.ReadAll(),道理上也应该好理解,要得到输出的信息,肯定要cmd 执行完后才会有输出的。
ret = oShell.run(“cmd”, 0, true)
有用的两个值0:不显示窗口 1:显示窗口
注意当执行命令带目录,目录名中有空格 记得要用""括起来 如: commandLine = Chr(34) & "C:\Program Files\aa.exe" & Chr(34) & "/i"
参数的详细信息可以参考:
http://msdn.microsoft.com/zh-cn/library/d5fk67ky(en-us,VS.85).aspx
摘自:网络整理
★VB部分相关文章推荐:★