Wie kann ich eine Taste zu einer bestimmten Zeit simulieren?

Möchte gern mit VBS o.ä. ein kleines Programm schreiben welches zum Beispiel in einer Stunde die Enter Taste drückt um zum Beispiel eine Nachricht in einer stunde abzusenden bisher habe ich folgendes aber es scheint nicht zu funktionieren:

WScript.Timeout = 60
set sh=createobject("wscript.shell")
sh.sendkeys "{A}"

2 Antworten

Timo2655

04.02.2021, 13:00

MIr fällt dazu spontan AutoIt ein

Home - AutoIt

Das Problem mit dem VBS könnte sein, dass der Tastendruck nur von dem gerade aktuellen Fenster/Programm erkannt wird. Oder mit etwas Pech von keinem, wenn es als "geplante Tasks" ausgeführt wird.

AutoIt sollte die Tricks hoffentlich beherrschen, mit denen man sokche Limitierungen umgehen kann.

Mensch4

Fragesteller

04.02.2021, 13:02

wenn ich das programm starte führt es nicht einmal den timeout durch der eigentlich in meinem beispiel 60 sekunden sind

Timo2655

04.02.2021, 13:03

@Mensch4

ok dan weis ich es auch nicht

Sk3tchDavid

04.02.2021, 13:08

Du kannst das am besten mit AHK Scripten machen, (Auto HotKey) die sind extra dafür gemacht, Tastendrücke zu simulieren

Ähnliche Fragen

Per VBS Tastenkombination ausführen?

Hi, ich muss per VBS eine Tastenkombination ausführen und zwar folgende:

STRG + Windows-Taste + D

Manche wissen vielleicht, dass man damit einen neuen virtuellen Desktop unter Windows erstellt. Ich habe bereits folgende Ansätze, nur leider funktioniert nichts davon:

Set shell = CreateObject("WScript.shell")
shell.SendKeys "^{HOME}d"

Theoretisch müsste es ja funktionieren, vielleicht ist der Syntax falsch, kenn mich mit VBS net wirklich aus :)

Danke für jede Hilfe!

...zur Frage

VBS Script funktioniert nicht?

Hallo zusammen,

ich möchte gerne ein Script erstellen, dass die Windows Farbkalibrierung kurz öffnet einmal Enter und dann ESC tippt. Leider funktioniert das aber irgendwie nicht.

Hier mein Code:

Set oWsh = CreateObject("WScript.Shell")

oWsh.Run("dccw") oWsh.SendKeys ("{ENTER}")

oWsh.SendKeys ("{ESC}")

Hat jemand eine Idee wieso das nicht funktioniert? Das Programm öffnet sich, aber die SendKey Befehle funktionieren nicht....

...zur Frage

CMD Nach Tastendruck Sofortige Reaktion?

Einen Schönen Guten Tag

Ich suche in CMD ein Befehl der beim betätigen einer bestimmten Taste eine Funktion erfüllt ohne zusätzlich die Enter Taste drücken zu müssen

ich habe es mal mit :

set /p 1=Eingabe:
if %1% EQU 1 (
goto ...
)

bei diesem Befehl kann man eine bestimmte Taste drücken aber man muss es immer mit der Enter Taste zusätzlich bestätigen. Also fällt die leider Raus

...zur Frage

mit vbs Skript ein click auf den Bildschirm machen?

Hi ich wollte mal fragen wie oben steht mit welchem vbs script man ein click auf der Position x = 423 , y = 354 macht habe schon vieles ausprobiert wie :

Dim x
 set x=createobject("wscript.shell")

 x.sendkeys"{CLICK LEFT,50,60}"

oder

With CreateObject("WScript.Shell")
    .Run "nircmd setcursor 100 100", 0, True
    .Run "nircmd sendmouse right click", 0, True
End With

keine ahnung ob das vbs ist aber kann wer helfen wie ich diesen click mit vbs mache ?

...zur Frage

Wo liegt hier der Fehler (VB-Skript)?

Ich habe versucht da so ein Programm in VBS zu coden aber mir ist da irgendein Fehler unterlaufen. Kann mir da wer helfen diesen Fehler zu beheben? Das Programm soll einen Satz sagen (mit Stimme), ein Fenster öffnen wo man eine Website eingibt und diese dann öffnen. Hier ist der Code:

set STIMME=createobject("sapi.voice")

STIMME.speak("Bitte nenne den Namen der Website die du öffnen willst!")

WEBSITE=inputbox("Nenne den Namen der Website","website")

set WSITE=createobject("wscript.shell")

If Website = "" Then

STIMME.speak("Website nicht gefunden. Bitte versuche es erneut!")

WEBSITE=inputbox("Nenne den Namen der Website","website")

Else

STIMME.speak("Loading " & WEBSITE & ".com")

set WSITE=createobject("wscript.shell")

WSITE.run "http://www. " & WEBSITE & ".com")

STIMME.speak("Website wurde geladen!")

exit do

Loop

...zur Frage

(VBS) Script soll eine Pause machen?

Hi, ich schreibe gerade ein kleines Script. Es soll ein Programm öffnen und ein paar Zeilen "tippen". Aber bis sich das Programm öffnet und ich alles eingestellt habe, vergehen ein paar Sekunden. Wäre es möglich, dass sich das Script kurz pausiert, und dann weiter den Code abarbeitet? habe es schon mit der "sleep"-Funktion versucht, dabei kommt aber die Fehlermeldung (siehe Anhang). Hier der Code:

Dim Anwendung
Set Anwendung = CreateObject("WScript.Shell")
Anwendung.Run "TSWIN7.EXE"
Anwendung.Sleep(10000)
Anwendung.SendKeys "Test"

PS: Ich schreibe eigentlich nie mit VBS, also bitte so gut wie möglich erklären (am besten mit Codebeispiel), so das ich alles verstehe :D

...zur Frage

VBScript Umlaute wie ö oder ü in MsgBox ausgeben?

Hallo,

Wir sind in der Schule gerade Skripting mit VBS am lernen. im Moment noch ziemlich am Anfang. Jetzt bin ich ein Skript am schreiben welches jemandem einen guten Tag wünscht xD

Aber wenn ich schreibe "Ich wünsche dir einen schönen Tag "..... dann werden das ü und das ö nicht angezeigt.

Wie mach ich das? In HTML kann man ja mit Ü oder so umlaute schreiben. Geht das in VBS auch? Wenn ja, wie?

Hier ist mal mein Skript:

Dim filename
Dim objFSO
Dim username
Set objNetwork = CreateObject("Wscript.Network")
filename = Wscript.ScriptfullName
username = objNetwork.UserName

Danke für die Antworten :)

Lg KilerAffe msgbox "Ich wünsche dir einen schönen Tag " & username, vbOKonly, ":)"

...zur Frage

Anführungszeichen in vbs?

Ich habe ein Problem.

Ich habe ein VBScript das ein anderes schreiben soll, aber ich weiß nicht wie ich die Anführungszeichen auf dem neu geschriebenen VBScript darstellen soll.

Const strFileName = "output.vbs"

Const ForReading = 1

Const ForWriting = 2

Const ForAppending = 8

Const CreateNotExist = True

Dim strInput, objFSO, objFile

Set objFSO = CreateObject("Scripting.FileSystemObject")

Set objFile = objFSO.OpenTextFile(strFileName, ForWriting, CreateNotExist)

objFile.WriteLine "set Network = CreateObject("WScript.Network")"

(...)

objFile.Close

Set objFile = Nothing

Set objFSO = Nothing

Es wäre nett wenn ich eine leicht verständliche Antwort bekäme

...zur Frage

PowerShell Tastendruck simulieren?

Hallo ich möchte mit PowerShell ein .ps1 script schreiben. Das Script soll folgendes machen:

while ($i -le $repeatCount) {

Start-Sleep -Seconds 5

"taste num8 drücken"

Start-Sleep -Seconds 1

"taste num5 drücken"

Start-Sleep -Seconds 1

"taste enter drücken"

Start-Sleep -Seconds 6

"taste num2 drücken"

Start-Sleep -Seconds 1

"taste num5 drücken"

Start-Sleep -Seconds 1

"taste enter drücken"

$i++

}

Ich brauche das Script für ein Spiel, also sollte das Script auch für andere Anwendung verwendet werden können.

...zur Frage

deutsche text-to-speech stimme vbs

Ich kann mit visual basic script ja eine sprachsynthese durchführen

(dim fname

set objvoice=Createobject("sapi.spvoice")

objvoice.speak ("Example")

Jetzt wollte ich fragen, ob es eine alternative zu sapi.spvoice gibt und zwar in deutsch (sapi.spvoice ist englisch)

...zur Frage

Wie findet ihr den Witz hier?

Was macht ein Pirat am Computer?

Er drückt die Enter Taste

...zur Frage

Java - tastatur abfangen?

Ich möchte in einen java Konsolen Programm die Tastatur abfangen... ich weis wie man mit dem scanner die tatur einleesen kann bis man enter drückt.. ich möchte aber das man eine bestimmte taste drückt und das programm geht weiter, ohne das man enter drücken muss ....

...zur Frage

Kann man in eine Batch Datei einen Befehl einbauen, der eine bestimmte Taste drückt?

Hey! Kann man in eine Batch Datei einbauen, dass sie die Taste Enter drückt? Und wenn ja, mit welchem Befehl?

...zur Frage

VBS Schleife abbrechen durch Tastendruck?

Hallo, ich habe folgendes Script:

set WshShell = CreateObject("WScript.Shell")
for i=0 to 15
WScript.Sleep 300
WshShell.SendKeys " "
next

wie kann ich einbauen, dass beim drücken von "ESC" das Script vorzeitig beendet wird? Oder egal ob mit esc oder auf anderem Weg.

VIelen Dank!

...zur Frage

Was möchtest Du wissen?

Deine Frage stellen