Jörg Lorenz: Textausgabe in Fenster

Beitrag lesen

Hallo Theres,

Im Moment schreibe ich mit Deinem ersten Vorschlag eine Logdatei. Die msgbox-Lösung hatte ich auch, das hat aber zur Folge, dass das Skript stehen bleibt, solange der Benutzer nicht 'OK' klickt und ist somit keine valable Lösung.

Die Notepad Variante scheint mir dabei kein gangbarer Weg zu sein, da müsste ich ja in jedem Schleifendurchgang ein neues Notepad öffnen... Oder kann ich dem erzeugten Notepad-Objekt auch nach dessen Erzeugung neuen Text zuweisen?

Ja, Du könntest z. B. mit Sendkeys arbeiten - das ist aber ziemlich anfällig. Ich würde es nicht empfehlen.

Hier ist noch eine Alternative:

Set objShell = CreateObject("WScript.Shell")

objShell.run "cmd.exe"
WScript.Sleep 100
objShell.sendkeys "cls{Enter}echo Das ist mein Text."
objShell.sendkeys "{Enter}Das ist mein nächster Text."

So könntest Du mit den herkömmlichen DOS-Befehlen arbeiten. Frage mich aber bitte nicht danach, damit habe ich vor vielen Jahren mal gearbeitet. ;-)

Ach so - je nachdem, was Deine Anwendungen so machen, musst Du ggf. das cmd-Fenster mit AppActivate wieder in den Vordergrund holen.

Viele Grüße

Jörg