У меня задача — запустить некое консольное приложение, работающее несколько минут, и перехватить его вывод.
Примерно так:
Dim WshShell, oExec, cmd
' Some command string - does not matter
cmd = "find " + CHR(34) + "qwerty" + CHR(34) + " c:\windows\system32\x*.*"
Set WshShell = CreateObject("WScript.Shell")
Set oExec = WshShell.Exec(cmd)
Do While oExec.Status = 0
WScript.Sleep 100
Loop
WScript.Echo oExec.ExitCode
WSCript.echo oExec.StdOut.ReadAll
WSCript.echo oExec.StdErr.ReadAll
Проблема в том, что при этом открывается консольное окно, которое мне совершенно не нужно.
Легко получить oExec.ProcessID, но как средствами VBS найти соответствующее окно и скрыть его?
Заранее благодарен за помощь.