Wie um zu zeigen, DOS-Ausgabe bei der Verwendung von vbscript Exec

Ich habe Folgendes VBScript:

Set Shell = WScript.CreateObject("WScript.Shell")
commandLine = puttyPath & "\plink.exe -v" & " -ssh" [plus additional commands here]    
Set oExec = Shell.Exec(commandLine)

Dies bewirkt, dass ein DOS-Fenster zu erscheinen, aber die Ausgabe von plink.exe wird nicht angezeigt. Gibt es eine Möglichkeit, um das DOS-Fenster zur Anzeige dieser Ausgabe?

InformationsquelleAutor JC. | 2011-02-03

  1. 3

    Windows scripting host fehlt ein system () - Befehl so implementieren Sie Ihre eigenen, IMHO meine Hilfsfunktion ist überlegen stealthyninja - version, da es wartet auf Prozess beenden und nicht nur leere stdout und es behandelt auch stderr:

    Function ExecuteWithTerminalOutput(cmd)
Set sh = WScript.CreateObject("WScript.Shell")
Set exec =  sh.Exec(cmd)
Do While exec.Status = 0
    WScript.Sleep 100
    WScript.StdOut.Write(exec.StdOut.ReadAll())
    WScript.StdErr.Write(exec.StdErr.ReadAll())
Loop
ExecuteWithTerminalOutput = exec.Status
End Function


call ExecuteWithTerminalOutput("cmd.exe /c dir %windir%\*")
    Sieht gut aus, außer ReadAll blockiert, sollte ReadLine denke ich
    ja es ist blockiert, und Sie wahrscheinlich könnte es zu ändern WriteLine+ReadLine solange die Ausgabe ist text-basiert und nicht Teil irgendeiner Art von Binär-Rohr-Betrieb.
    Dieser code funktionieren nicht. Ich Frage mich, warum es eine akzeptierte Antwort.
    Einfügen in eine Datei namens test.vbs und ausführen cscript.exe test.vbs funktioniert einwandfrei auf XP, wenn ich schrieb diese Antwort und ich habe gerade getestet auf einem Windows-8-Maschine und arbeitete dort als gut...
    Einfügen in eine Datei namens test.vbs und doppelklicken Sie zum ausführen mit wscript.exe (default-handler für vbs-Dateien) und erhalten Sie ein ungültiges handle-Nachricht in Zeile 6 char 5. Ich habe meine version, und ich check Do While Not objExecObject.StdOut.AtEndOfStream statt exec.Status=0 zu bestimmen, Kind Prozess beenden.

    InformationsquelleAutor Anders

  2. 3

    Versuchen --

    Set Shell = WScript.CreateObject("WScript.Shell")
commandLine = puttyPath & "\plink.exe -v" & " -ssh" [plus additional commands here]    
Set oExec = Shell.Exec(commandLine)

Set oStdOut = oExec.StdOut

While Not oStdOut.AtEndOfStream
    sLine = oStdOut.ReadLine
    WScript.Echo sLine
Wend

    InformationsquelleAutor stealthyninja

  3. 0

    Dem richtigen Weg ist :

    Set Shell = WScript.CreateObject("WScript.Shell")
commandLine = puttyPath & "\plink.exe -v" & " -ssh" [plus additional commands here]    
Set oExec = Shell.Exec(commandLine)

Set oStdOut = oExec.StdOut

While Not oStdOut.AtEndOfStream
    sLine = oStdOut.ReadLine
    WScript.Echo sLine
Wend

    Oder:

    Set Shell = WScript.CreateObject("WScript.Shell")
commandLine = puttyPath & "\plink.exe -v" & " -ssh" [plus additional commands here]    
Set oExec = Shell.Exec(commandLine)
WScript.Echo   oExec.StdOut.ReadAll

    InformationsquelleAutor hollopost

Schreibe einen Kommentar