WScript.Shell.Exec – read output from stdout

by

WScript.Shell.Exec() returns immediately, even though the process it starts does not. If you try to read Status or StdOut right away, there won’t be anything there.

The MSDN documentation suggests using the following loop:

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

This checks Status every 100ms until it changes. Essentially, you have to wait until the process completes, then you can read the output.

With a few small changes to your code, it works fine:

Const WshRunning = 0
Const WshFinished = 1
Const WshFailed = 2
strCommand = "ping.exe 127.0.0.1"

Set WshShell = CreateObject("WScript.Shell")
Set WshShellExec = WshShell.Exec(strCommand)

Do While WshShellExec.Status = WshRunning
     WScript.Sleep 100
Loop

Select Case WshShellExec.Status
   Case WshFinished
       strOutput = WshShellExec.StdOut.ReadAll()
   Case WshFailed
       strOutput = WshShellExec.StdErr.ReadAll()
 End Select

WScript.StdOut.Write(strOutput)  'write results to the command line
WScript.Echo(strOutput)          'write results to default output

More Related Contents:

  1. Is it possible to embed and execute VBScript within a batch file without using a temporary file?
  2. Adding quotes to a string in VBScript
  3. About using Double quotes in Vbscript
  4. VBScript — Using error handling
  5. Recursively access subfolder files inside a folder
  6. Hide command prompt window when using Exec()
  7. Cannot use parentheses when calling a Sub Error 800A0414 VBS
  8. Prevent VBscript app from showing Console Window
  9. How do I run a VBScript in 32-bit mode on a 64-bit machine?
  10. Read and write into a file using VBScript
  11. Download a file with VBS
  12. How do I sort arrays using vbscript?
  13. VBscript code to capture stdout, without showing console window
  14. ByRef and ByVal in VBScript
  15. Run Command Line & Command From VBS
  16. Breaking a String Across Multiple Lines
  17. ADODB.Parameters error ‘800a0e7c’ Parameter object is improperly defined. Inconsistent or incomplete information was provided
  18. What does the “On Error Resume Next” statement do?
  19. VBScript to send email without running Outlook
  20. How to set delay in vbscript
  21. How to find the window Title of Active(foreground) window using Window Script Host
  22. How to identify between ok and cancel button in inputbox
  23. VBscript relative path
  24. Use clipboard from VBScript
  25. How do I include a common file in VBScript (similar to C #include)?
  26. How can I show a message box with two buttons?
  27. VBS with Space in File Path
  28. How can I use the common Save As dialog from VBScript?
  29. Create a folder in Outlook: error 800A0401 – Expected End of Statement
  30. VBscript error input past end of file

Leave a Comment