Je n'arrive pas a comprendre un curieux phénomène et comment le résoudre
J'ai un code qui utilise hotkeyset. pour taper automatiquement le user, mot de passe ...
lorsque je fais CTRL+ALT+quelque chose ça fonctionne bien, sauf pour une séquence CTRL+ALT+o dans mon code.
souvent , pas toujours, une fois que je tape sur CTRL+ALT+o les send envoie bien la séquence de touches
mais les touches CTRL et même le shitt restent bloqués ce qui provoque vous vous en doutez des choses non désirées avec une touche CTRL enfoncé!
Je dois appuyer une fois sur ces touches pour les libérer!!
HotKeySet("^+u", "crtlaltu") ; ctrl-alt-u
HotKeySet("^+p", "ctrlaltp") ; ctrl-alt-p
HotKeySet("^+t", "crtlaltt") ; ctrl-alt-t
HotKeySet("^+m", "ctrlaltm") ; ctrl-alt-m
HotKeySet("^+o", "ctrlalto"); crtl-alt-o
run("notepad.exe")
sleep (300)
Send("Testez le code en tapant ctrl alt u,ctrl alt p,ctrl alt o,ctrl alt t,ctrl alt m{ENTER}{ENTER}")
while 1
sleep (200)
WEnd
Func crtlaltu()
Send("user", 1)
Sleep(100)
Send("{TAB}")
EndFunc ;==>crtlaltu
Func ctrlaltp()
Send("mot de passe", 1)
EndFunc ;==>ctrlaltp
Func crtlaltt()
Send("Test", 1)
EndFunc ;==>crtlaltt
Func ctrlaltm()
Send("mdp test", 1)
Sleep(100)
Send("{ENTER}")
EndFunc ;==>ctrlaltm
Func ctrlalto()
BlockInput(1)
Send("user", 1)
Sleep(200)
Send("{TAB}")
Sleep(200)
Send("mot de passe o", 1)
Sleep(200)
Send("{ENTER}")
BlockInput(0)
EndFunc ;==>ctrlalto
HotKeySet("^+p", "ctrlaltp") ; ctrl-alt-p
HotKeySet("^+t", "crtlaltt") ; ctrl-alt-t
HotKeySet("^+m", "ctrlaltm") ; ctrl-alt-m
HotKeySet("^+o", "ctrlalto"); crtl-alt-o
run("notepad.exe")
sleep (300)
Send("Testez le code en tapant ctrl alt u,ctrl alt p,ctrl alt o,ctrl alt t,ctrl alt m{ENTER}{ENTER}")
while 1
sleep (200)
WEnd
Func crtlaltu()
Send("user", 1)
Sleep(100)
Send("{TAB}")
EndFunc ;==>crtlaltu
Func ctrlaltp()
Send("mot de passe", 1)
EndFunc ;==>ctrlaltp
Func crtlaltt()
Send("Test", 1)
EndFunc ;==>crtlaltt
Func ctrlaltm()
Send("mdp test", 1)
Sleep(100)
Send("{ENTER}")
EndFunc ;==>ctrlaltm
Func ctrlalto()
BlockInput(1)
Send("user", 1)
Sleep(200)
Send("{TAB}")
Sleep(200)
Send("mot de passe o", 1)
Sleep(200)
Send("{ENTER}")
BlockInput(0)
EndFunc ;==>ctrlalto
Vous pouvez testez avec ce code
Avez vous , SVP, des suggestions
Merci
JL56