[AC-2007] Pilotage appli avec Sendkeys

[damalaan]

Bonjour,

Je cherche à "piloter" une appli (qui tourne sous Oracle) avec des sendkeys mais je n'y arrive pas

Code :

1
2
3
4
5
6
7
 
Dim appli As String
Dim fichier As String
fichier = "C:\monappli.bat"
appli = Shell(fichier, 1)
MsgBox appli
SendKeys "a"

D'après une discussion très récente vue sur le forum, la variable appli me récupère le PID, mais comment faire en suite pour envoyer des caractères?
la ligne sendkeys "a" ne donnant rien

merci d'avance

[argyronet]

Bonjour,

Si ton "appli" est un batch, tu ne pourras que difficilement le piloter avec un SendKeys.

• Dis-nous ce que tu veux faire exactement pour que l'on puisse t'aider.
• Quelle est cette appli en question ?
• Qu'est censé faire l'appuie sur la touche "a" ?

Argy

[damalaan]

l'appli est lancée par un batch, ce n'est pas un batch elle même

ce que je veux faire :
saisir le login et le mot de passe puis naviguer dans les menus pour récupérer des données.
le sendkeys "a" est censé afficher "a" dans la case login

il s'agit d'une appli développée à façon sous Oracle

[argyronet]

Donc, ton bat ouvre une fenêtre...
C'est cette fenêtre qu'il faut piloter (à ce que comprends, c'est une fenêtre de login).
Si c'est la cas, le PID de Shell ne te donneras rien puisque c'est celui du batch.
Ce qu'il faut, c'est comparer le nom de la fenêtre en utilisant un GetWindowText en parcourant l'ensemble des processus dans une boucle jusqu'à ce que tu tombes sur le bon titre. Le but est de récupérer le Handle de la fenêtre pour lui donner le focus (SetFocus) et l'amener au premier plan (BringWindowToTop). Là, tu pourras peut-être agir sur la dite fenêtre.
Pour ce faire, recherche dans les sources, il y a de nombreux exemples.

Mais sinon, plus simple, que contient to batch ?
Est-ce un EXE que tu lances ?
Si oui, là, le Shell peut récupérer le PID et de ce PID on peut obtenir le Hwnd.

Argy