How to get exit code when running cmd command?

[emc2]

Hi all,

I'm using the following way to run a script from within my VB6 app:

With CreateObject("wscript.shell")
            AllocConsole
            ShowWindow GetConsoleWindow, SW_HIDE
            
            commandExec = "cmd /c myscript"
            With .exec(commandExec)
            
                line = .stdout.readall
end with

"myscript" can be a batch or a Perl script. It returns exit code. How can I read this exit code from within my app?

Thanks in advance!

[westconn1]

is this what you are looking for

Set s = CreateObject("wscript.shell")
Set s = s.exec("ping www.google.com")
Line = s.stdout.readall

[Joacim Andersson]

The WshScriptExec object returned by the Exec method has an ExitCode property.