vbs sendkeys Windows + Shift + Rechts

[hpxw]

Hallo,

ich möchte ein geöffnetes Programm, z.B. Notepad, auf einen anderen Monitor verschieben.
Leider klappt es nicht ganz. Es wird nur das Startmenü geöffnet.
Ich möchte folgende Tastenkombination zwei Mal nacheinander ausführen
"Windows + Shift + Rechts"

Dim WSHShell
Set fsShell = WScript.CreateObject("WScript.Shell")
fsShell.AppActivate "notepad.exe"
WScript.Sleep 500
fsShell.SendKeys "^{ESC}+{RIGHT}"
fsShell.SendKeys "^{ESC}+{RIGHT}"

 

[Demon_666]

Wenn ich mich richtig erinnere, emuliert STRG+ESC nicht die Windowstaste sondern ruft das Startmenü auf. Vielleicht da nochmal ansetzen, mir fällt dazu in VBS adhoc nichts ein.

Ergänzung (20. Oktober 2022)

{LWIN} probiert?

 

[hpxw]

funktioniert nicht

 

[Demon_666]

Dann wird es nicht gehen, sendkeys ist auch eigentlich für Programme und nicht für das OS gedacht.

 

[hpxw]

hab es mit powershell und vbs geschafft
#closed