Fremdes Programm fernsteuern (sendkeys)?

[Werner_Bayern]

Servus,

hat das schon mal jemand erfolgreich gemacht? Ich mache es bisher über vbs, möchte es aber gerne direkt machen.

Code: Alles auswählen

set wshshell = createobject("Wscript.shell")

' Programminitialisierung

wshshell.run XXX
'Starte XXX
wshshell.appactivate "XXX"
'Aktiviere Anwendung
wscript.sleep 2500
' Pause zum laden
' Programminit abgeschlossen

'_____________________________________________________________________

wshshell.sendkeys "{ENTER}"
wscript.sleep 1200

' evtl. Meldung über Posteingang wegdrücken
wshshell.sendkeys "{ENTER}"
wscript.sleep 1000

' Formularinitialisierung
wshshell.sendkeys "^g"
'Kurzwahl strg-g
'_____________________________________________________________________

wscript.sleep 1200

'_____________________________________________________________________

wshshell.sendkeys "{DOWN}"
msgbox "Bitte korrekten XXX wählen, ANSCHLIEßEND auf OK klicken", vbsystemmodal, "(C) ..."

'_____________________________________________________________________

' Anwendung reaktivieren
wshshell.appactivate "XXX"
wscript.sleep 500

' Daten übertragen
wshshell.sendkeys "{TAB}"
wscript.sleep 50
wshshell.sendkeys "{TAB}"
wscript.sleep 500
' wshshell.sendkeys "irgendwelche Daten"
wshshell.sendkeys "{TAB}"
wscript.quit

Danke.

[Rolf]

ich hab das schon mal umgesetzt
als Quellen dienten mir neben der MSDN

1) http://www.xbaseforum.de/viewtopic.php? ... it=SendKey*
AUGE_OHR
Betreff des Beitrags: Keys von Xbase++ an andere Programme senden ?
BeitragVerfasst: So, 03. Dez 2006 22:1

2) Pascal Boivin
public.xbase++.gui
Pressing a button outside of xbase
on Thu, 16 Aug 2007 16:34:21 -0400

3) Pablo Botella
public.xbase++.generic
Re: Using Windows SendInput API function?
on Tue, 21 Nov 2006 20:35:01 +0100

Liebe Grüße
Rolf

[Werner_Bayern]

Danke Rolf, ich schau mir das an.