Programmieren - alles kontrollieren 4.935 Themen, 20.621 Beiträge

Verfolgung starten Optionen

VBS Schleife durch Tastendruck beenden

Sigilein / 2 Antworten / Flachansicht Nickles

hallo,

ich hab folgendes script:


set wshshell = CreateObject("WScript.Shell")

If MsgBox("Soll Hallo geschrieben werden?",4, "Hallo?") = vbNo Then
WScript.Quit
Else
do
Wscript.Sleep 10000
Wshshell.Sendkeys("hallo")
loop
End If


was muss ich ändern, das ich das script durch eine bestimmte taste unterbrechen bzw. beenden kann?

danke im voraus

gruß Sigi

bei Antwort benachrichtigen
d-oli Sigilein „VBS Schleife durch Tastendruck beenden“
Optionen
was muss ich ändern, das ich das script durch eine bestimmte taste unterbrechen bzw. beenden kann?
Hmmm, das dürfte schwierig sein. Denn mit "SendKeys" simulierst du ja bereits quasi die Betätigung der Tasten 'h', 'a', 'l', 'l' und 'o'.
Künnte es sein, dass Du "SendKeys" mit "printf" in C oder "cout" in C++ vergleichst? Die Funktionalität wäre definitiv nicht die gleiche.

Eine mögliche Lösung wäre, folgendes in eine *.BAT Datei zu schreiben (Annahme Dateiname = hallo.vbs):

cscript hallo.vbs
pause


Speichere und starte die BAT (hallo.BAT). Jetzt kannst Du das Script in der Konsole per Strg + c beenden.

Gruss
d-oli
Konstruktive Kritik zeichnet sich dadurch aus, dass sie höflich, nützlich und sachlich ist.
bei Antwort benachrichtigen
danke ich machs einfach so mit der bat datei Sigilein