WScript.Shell对象的run和exec(脚本调用其他程序)

时间:2022-02-27 07:28:37

对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属性等。例如:

    Set exeRs = objws.Exec("pscp -r -scp -pw 。。。。"

    errMsg = exeRs.StdErr.ReadAll()

    stdMsg = oExec.StdOut.ReadAll()


2,Run 的后两个参数,一个是cmd窗口的风格,一个是是否等待执行完成。最后一个参数很有用,如果你希望等待本次cmd执行的程序结束后,再执行后面的语句的话,只要设置这个参数为true就可以了,否则后面的语句将不等待cmd窗口完成,直接运行。

如果你使用exec 方法的时候,如果希望等待cmd中程序执行完后,在执行后面的语句,也可以通过下面的方法:oExec.StdErr.ReadAll()或者oExec.StdOut.ReadAll(),道理上也应该好理解,要得到输出的信息,肯定要cmd执行完后才会有输出的。

 

记录一下下面现象描述:

   因为自己写的脚本在调用一个程序时通过run或bat可正常结束,但是倘若使用exec则会出现程序执行完毕后死掉的情况,没办法只能通过检测cpu占用时间来检测其运行状况适时结束掉了。至今没有发现原因。

   最近项目中需要在vbscript脚本中用pscp从linux服务器上copy文件。本来使用了exec方法,以下代码 Set exeRs = objws.Exec("pscp -r -scp -pw " & password & " " & loginid & "@" & host & ":" & data_path & fileName & " " & windows_path)
但在测试的时候,当拷贝的文件比较大,拷贝时间较长的时候就出现cmd窗口死在那里不动了的情况,直接在cmd窗口中运行pscp拷贝相同的文件就可以正常 结束。也找不到是什么原因,于是改成run方法试一下,结果run方法是可以正常结束的,但是原来的代码中有需要取得cmd的控制台输出信息,而run却 不方便取得控制台信息,最后只能先把控制台信息重定向到文件中,然后程序在读取。

 

 

参数的详细信息可以参考msdn

http://msdn.microsoft.com/zh-cn/library/ateytk4a(en-us,VS.85).aspx

Exec Method (Windows Script Host)

Exec Method (Windows Script Host):

/*
Dim WshShell, oExec
Set WshShell = CreateObject("WScript.Shell")

Set oExec = WshShell.Exec("calc")

Do While oExec.Status = 0
     WScript.Sleep 100
Loop

WScript.Echo oExec.Status
*/

http://msdn.microsoft.com/zh-cn/library/d5fk67ky(en-us,VS.85).aspx
Run Method (Windows Script Host)
object.Run(strCommand, [intWindowStyle], [bWaitOnReturn])