WScript.Shell對象的run和exec(腳本調用其他程序)


對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])


免責聲明!

本站轉載的文章為個人學習借鑒使用,本站對版權不負任何法律責任。如果侵犯了您的隱私權益,請聯系本站郵箱yoyou2525@163.com刪除。



 
粵ICP備18138465號   © 2018-2025 CODEPRJ.COM