[VB6] : bloquez le clavier et la souris

: bloquez le clavier et la souris [VB6] - VB/VBA/VBS - Programmation

Marsh Posté le 18-02-2005 à 11:33:35    

Hello all,
 
Je voudrais faire une install automatique d'un prog sur plusieurs poste, j'arrive a simuler les touches que l'application demande pour s'installeravec la cmde sendkeys, mais j'ai un pb, comme les touches simulées suivent une certaine séquence, si par exemple l'utilisateur clique sur quelque chose pendant la séquence simulé, le prog fait n'importe quoi. Donc je voulais bloquer le clavier et la souris pendant que la séquence de touche, mais je ne sais pas du tout comment m'y prendre, alors si une ame charitable pouvait me montrer la voie a suivre ca serait vraiment sympa. Merci d'avance.

Reply

Marsh Posté le 18-02-2005 à 11:33:35   

Reply

Marsh Posté le 18-02-2005 à 11:35:07    

Hum... C'est pas bien de faire de l'automatisation avec SendKeys [:spamafote]

Reply

Marsh Posté le 18-02-2005 à 11:51:15    

pourquoi?

Reply

Marsh Posté le 18-02-2005 à 12:12:14    

Bah tu le vois bien, si quelqu'un frappe une touche en même temps, ça foire :D

Reply

Marsh Posté le 18-02-2005 à 12:29:48    

c'est vrai mais je ne connais pas d'autres solutions, tu peux peut etre m'aider pour bloker le clavier et la souris?

Reply

Marsh Posté le 18-02-2005 à 12:30:27    

Bof :/ Je sais pas si c'est faisable. En tous cas c'est dangereux :(

Reply

Marsh Posté le 18-02-2005 à 12:37:22    

dangereux? pour quelles raisons? ca va quand meme pas faire explosé le pc

Reply

Marsh Posté le 18-02-2005 à 12:38:03    

Ben si ton truc se bloque. Si genre l'installe foire, faut prévoir de pouvoir tripatouiller le clavier et la souris...

Reply

Marsh Posté le 18-02-2005 à 12:45:15    

exact, mais bon au pire on peut tjs l'eteindre a l'arrache.  ca ne fait pas bcp avancé mon pb tout ca

Reply

Marsh Posté le 21-02-2005 à 19:52:30    

Solution de ton problème :

Code :
  1. Declare Function BlockInput Lib "user32" (ByVal fBlockIt As Long) As Long
  2. BlockInput 1 'blocage
  3. BlockInput 0 'déblocage

Maintenant, savoir si tu peux encore effectuer un SendKeys quand le clavier est bloqué, là je n'en sais rien. :p  
Par contre comme tu le soulignes très bien et FlorentG aussi, en cas de bug, tout est fini. Pour remédier à ton problème, créé une tempo d'un certain temps au bout duquel le clavier et la souris se débloquent tout seul. Ca peut aider. :D  
Bonne prog.

Reply

Sujets relatifs:

Leave a Replay

Make sure you enter the(*)required information where indicate.HTML code is not allowed