yannosch
Goto Top

VBScript: Entertaste simulieren

Hallo zusammen,

folgende Situation:

    i=0
	
        set WshShell2 = CreateObject("WScript.Shell")  
	
    do until i > 60
	msgbox "Zeit in Sekunden: " & i & ""    
	WScript.Sleep(1000)
	WshShell2.SendKeys "{ENTER}"  
	i = i+1
    loop

Enter wird nicht gedrückt... wo liegt mein Problem? Kann mir jemand netterweise helfen?
Vielen Danke schonmal im Vorraus face-smile !

Grüße
Y@nnosch face-smile

Content-ID: 262268

Url: https://administrator.de/forum/vbscript-entertaste-simulieren-262268.html

Ausgedruckt am: 07.04.2025 um 22:04 Uhr

114757
114757 04.02.2015 aktualisiert um 15:45:56 Uhr
Goto Top
Soll das ein Countdown werden ?
Der geht einfacher so
Fehler bei Zeitmakro (Uhrzeit soll automatisch jede Minute aktualisiert werden)

Mit deiner Methode müsste man die MSGBox explizit in den Vordergund holen, ist so aber Murks.

Gruß jodel32
Yannosch
Yannosch 04.02.2015 um 15:47:42 Uhr
Goto Top
Es handelt sich hierbei um VB-Script. Nicht VBA. Leider gibt es keine Kategorie für VBS - oder ich bin einfach blind :D
114757
114757 04.02.2015 aktualisiert um 15:56:42 Uhr
Goto Top
na dann
set WshShell2 = CreateObject("WScript.Shell")  
for i = 0 to 60
	WshShell2.Popup "Zeit in Sekunden: " & i ,1  
Next
Leider gibt es keine Kategorie für VBS - oder ich bin einfach blind :D
VBA gibt's als Kategorie, ist jedenfalls besser als Visual Studio ...