Hilfe zu VBS: PDF nach Ausdruck löschen

wbendl · 14.02.2012, 09:51

Hi!

Die Ausgabe in ein Fenster des Editors betrachte ich als "simple Methode".
Konsolenfenster sollte auch möglich sein, finde ich aber nicht so schön.

Hier ein paar Zeilen, die zeigen wie das gedacht ist:

Code:

'Editor öffnen, und Text schreiben
'on error resume next
set ws = CreateObject("Wscript.Shell")
AppID = ws.run("%WINDIR%\notepad.exe")
'Etwas Zeit lassen, damit das Programm auch wirklich schon läuft
wscript.sleep 1000
'Sicherheitshalber das Editorfenster aktivieren
ws.AppActivate AppID
'Text im Fenster ausgeben
ws.SendKeys "Testtext", True

Der Nachteil von SendKeys ist halt, daß immer das Fenster aktiviert werden muß.

mfg

WB

14.02.2012, 09:51	#7
wbendl Master Registriert seit: 22.03.2000 Alter: 66 Beiträge: 550	Hi! Die Ausgabe in ein Fenster des Editors betrachte ich als "simple Methode". Konsolenfenster sollte auch möglich sein, finde ich aber nicht so schön. Hier ein paar Zeilen, die zeigen wie das gedacht ist: Code: 'Editor öffnen, und Text schreiben 'on error resume next set ws = CreateObject("Wscript.Shell") AppID = ws.run("%WINDIR%\notepad.exe") 'Etwas Zeit lassen, damit das Programm auch wirklich schon läuft wscript.sleep 1000 'Sicherheitshalber das Editorfenster aktivieren ws.AppActivate AppID 'Text im Fenster ausgeben ws.SendKeys "Testtext", True Der Nachteil von SendKeys ist halt, daß immer das Fenster aktiviert werden muß. mfg WB

Aktive Benutzer in diesem Thema: 1 (Registrierte Benutzer: 0, Gäste: 1)