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