|
Trouver une ressource
Vous ne trouvez pas de réponse à votre problème ? Alors posez la question dans le forum. Souvenez-vous qu'il n'y a jamais de question bête, mais rester dans l'ignorance parce que l'on n'ose pas poser une question, ça c'est une erreur !
NICEKEYS HOOK SENDKEYS AUTOMATION CLAVIER (AVEC TOUCHE WINDOWS) ET SOURIS
Information sur la source
Description
APPLICATION COMPLETE avec fichiers d'aide(html) inclus Nice Keys est un dérivé du code exemple que j'ai posté à l'adresse ci-dessous et des idées reprises depuis MemoKey ou Wonderkeys : http://www.vbfrance.com/code.aspx?ID=37947 Il permet d'automatiser le clavier y compris la touche Windows et la souris. Programmation de macros, boucles, de shellExecute, tests, presse papier... de calculs complexe comme : sqr(x^3)+cos(V(i)) ... Il n'utilise aucune dll, n'est pas reconnu en spyware. C'est juste du Hook (+ GetAsyncKeyState), du mouse_event et du sendKeys. Son but n'est pas d'espionner mais de faire de l'automation clavier et souris (ce n'est pas du côté obscur de la force !!!) Merci à tous ceux qui contribuent à la mise en commun des sources ! Enjoy, YmTrainz - 2006/10 - rev 23/06/2007
Conclusion
GESTION de la souris (enregistrement et simulation) opérationnelle depuis la version 3 Gestion de la touche Windows à partir de la version 3.3 Ajouté des faux ToolTipText pour insérer les fonctions en cliquant dans la liste (v3.4) ATTENTION : sortir "proprement" du logiciel à l'aide du cmdClose et menu_Quitter. Ne pas utiliser le stop de vb6 : risque de plantage de l'IDLE (à cause du hook).
Historique
- 02 octobre 2006 23:03:07 :
- Petite mise à jour mineure et orthographique
- 04 octobre 2006 17:23:10 :
- v 2.8.56
Tenu compte des observations de VBGenesis
Corrigé bug sur cmbBanq_click
Ajouté un bouton Cancel dans "enregistrer les changements"
Empêché le double envoi de séquences de touches...
Je laisse ma class KeyboardHook, elle m'aide à m'y retrouver...
- 04 octobre 2006 17:24:12 :
- v 2.8.56
Tenu compte des observations de VBGenesis
Corrigé bug sur cmbBanq_click
Ajouté un bouton Cancel dans "enregistrer les changements"
Empêché le double envoi de séquences de touches...
Je laisse ma class KeyboardHook, elle m'aide à m'y retrouver...
- 08 octobre 2006 11:45:57 :
- NiceKeys - VERSION HISTORY - YM_trainz
v2.8 build 57
correction de l'erreur sur l'arrêt d'urgence
correction pour ajout nouvelle banque / touche : remise à zéro des paramètres, banque/touche vide
v2.8 build 56 04/10/06 : SHARED
correctif orthographique lançage/ lancement , bien sûr !
revus bugs dans cmd_rec (clicEnab devait etre True pour actualiser les chkKbd !)
ajouter bouton Cancel dans "enregistrer les changements"
Inhiber l'envoi multiple de séquence (intéressant si boucle) -> UnhookKeyboard pendant le traitement (avec call frmMain.ScruterKbd())
------------------------------------------------------------
- 31 octobre 2006 16:58:00 :
- NiceKeys - VERSION HISTORY - YM_trainz
Depuis la version 3 : gestion de l'automation de la souris :
v3.0.build 64 - 31/10/06 - SHARED
Bug Bix (bouton Rec après arrêt Urgent)
Mise à jour de l'aide et de licence.txt
v3.0.build 63 - 30/10/06
Ajouté Variables de Boucle Internes correspondant à la fonction Boucle
Ajouté V(0) à v(32) en User variables
Ajouté les listes correspondantes dans frmVar en listes
Bugs Fix
v3.0.build 62 - 29/10/06
Affiné les fonctions Souris
Ajouté des Tips dans fenêtre Fonction
Ajouté fonction boucle()
Beep(Frequence,Durée ms)
msgBox(message) défini par l'utilisateur
mouseWindowCaption (renvoie le nom de la fenêtre survolée par la souris)
v3.0 build 59-61 - 10/06 - AUTOMATION SOURIS
mise en place des fonctions pour l'automation souris
MouseLC - MouseRC MouseMD MouseDLC MouseDRC MouseDMC et MouseXY
revu le code de test des fonctions : plus de possibilités avec "...";... etc.
ajouté fenetre Fonctions frmFunc pour les visualiser
animation de l'icone en mode Rec
Revu Interface Graphique
ajouté DoubleRight Clic sur Icone pour afficher Fenetre Paramètre
------------------------------------------------------------
Toutes les V3. incluent l'automation SOURIS
------------------------------------------------------------
v2.8 build 58 - 11/10/06
revu fonction pause : appel avec fonction Sleep Lib "kernel32" qui ne consomme pas de ressources processeur
animation Icone si Rec Keys (en prévision de l'automation souris)
v2.8 build 57 08/10/06
correction de l'erreur sur l'arrêt d'urgence
correction pour ajout nouvelle banque / touche : remise à zéro des paramètres, banque/touche vide
- 31 octobre 2006 22:54:02 :
- v3.1.build 67 - 31/10/06 - SHARED
affiné l'affichage des couleurs dans rtbSend (Touches OUT)
v3.1.build 66 - 31/10/06 - SHARED
Revu la sortie du programme (quitter -> libérer la mémoire dans Gestionnaire de tâches)
v3.1.build 65 - 31/10/06 - SHARED
Ajouté l'aide à la programmation :
mise en couleur du code au fur et à mesure de la frappe
1 little bug Fix
- 02 novembre 2006 00:21:03 :
- v3.2.build 68 - 01/11/06 - SHARED - accepte les nombres décimaux (sauf i j et k qui sont des entiers) - procédure de calcul qui accepte les fonctions sin cos ^ sqr (attention aux nombres avec E : 1.2E-3, pas encore Ok) - ajouté fenêtre d'état des boucles (frmProgress) - supprimé la référence sReg.ocx (plus utilisée, merci à LD40 !) et merci à VbGenesis qui suit toujours l'histoire !
- 02 novembre 2006 13:02:56 :
- v3.2.build 69 - 02/11/06 - SHARED - corrigé petit bug sur la pause - corrigé l'affichage de l'état des boucles (frmProgress.visible = false si clic Mouse sinon, on peut cliquer dessus!) - ajouté une touche démo avec agrandissement de n'importe quelle fenêtre windows pour travailler dedans en plein écran
- 02 novembre 2006 21:39:38 :
- v3.2.build 70 - 02/11/06 - SHARED - corrigé la gestion de frmProgress, plus douce et moins présence (affichage des boucles après 2 secondes) - 1 bug Fix - v3.2.build 69 - 02/11/06 - corrigé petit bug sur la pause - corrigé l'affichage de l'état des boucles (frmProgress.visible = false si clic Mouse sion, on peut cliquer dessus!) - ajouté une touche démo avec agrandissement de n'importe quelle fenêtre windows pour travailler dedans en plein écran
- 03 novembre 2006 08:50:49 :
- v3.2.build 70 - 02/11/06 - SHARED - corrigé la gestion de frmProgress, plus douce et moins présence (affichage des boucles après 2 secondes) - 1 bug Fix
v3.2.build 69 - 02/11/06 - corrigé petit bug sur la pause - corrigé l'affichage de l'état des boucles (frmProgress.visible = false si clic Mouse sion, on peut cliquer dessus!) - ajouté une touche démo avec agrandissement de n'importe quelle fenêtre windows pour travailler dedans en plein écran
- 09 novembre 2006 22:13:50 :
- v3.2.build 71 - 09/11/06 - SHARED - corrigé la gestion de frmProgress : perte de focus fixed par frm.top et Left - Les boucles i j et k acceptent les nombres décimaux - Test des doublons de noms ou de combinaisons de touches - Demande de l'ancien mot de passe pour entrer le nouveau mot de passe - Possibilité de renommer directement les touches/ banques sans passer par cmd 'Renommer'
- 14 novembre 2006 23:42:52 :
- v3.2.build 72 - corrigé bug sur boucles i, j et k (si on avait : for i = n to n soit départ = arrivée -> Ok maintenant) - scintillement éliminé sur la saisie des codes (rtbSend) suite à la mise en couleur (avec .visible = false - changeCouleur puis .visible = true avec setFocus) - Mots de Passe : Ajouté une double saisie du mot de passe (confirmer) et Commande Bouton pour supprimer tous les mots de passe si on ne se rappelle plus de rien (pour les amnésiques !)
- 15 novembre 2006 00:00:12 :
- v3.2.build 72 - 14/11/06
corrigé bug sur boucles i, j et k (si on avait : for i = n to n soit départ = arrivée -> Ok maintenant)
scintillement éliminé sur la saisie des codes (rtbSend) suite à la mise en couleur (avec .visible = false - changeCouleur puis .visible = true avec setFocus)
Mots de Passe :
Ajouté une double saisie du mot de passe (confirmer)
Ajouté Commande Bouton pour supprimer tous les mots de passe si on ne se rappelle plus
- 18 novembre 2006 22:57:32 :
- v3.2.build 73 - 18/11/06
corrigé 2 bugs : sur affichage progressBar et RtbSend
revu la gestion du format des nombres avec la fonction format(format,expression) -> format("##.#",3.74) renvoie 03.7
- 18 novembre 2006 23:00:32 :
- v3.2.build 73 - 18/11/06
corrigé 2 bugs : sur affichage progressBar et RtbSend
revu la gestion du format des nombres avec la fonction format(format,expression) -> format("##.#",3.74) renvoie 03.7
- 18 novembre 2006 23:31:49 :
- v3.2.build 74 - 18/11/06
corrigé bug affichage des boîtes rtbSend / boucles en fonction de optionType : simple/executer/boucles
Désolé pour ces MAJ multiples, mais parfois les bugs se révèlent juste après le post !
- 29 novembre 2006 23:28:53 :
- v3.4.build 78 - 29/11/06
Insertion de code à partir de la liste des fonctions (frmFunc)
en version faux ToolTip avec une liste à cliquer
A terminer :
corrigé l'aide avec touche Win, pause et open #
Gestion Import/Export des Banques
liste de raccourcis d'origine windows
v3.3.build 75 à 77 24/11/06 - 26/11/06
corrigé bug si boucle interne avec paramètres date;"..." -> ¤boucle(0,1,5,1,"Bla";date;"~")¤ -> ok (problème du defaut date(0) dans cherchePar (fix)
Corrigé Bug avec fonctions sans parenthèse
Correction orthographe
Ajouté tuto1 et tuto2 en flash (link www) -> fait avec Wink
Meilleure Gestion de la pause : on peut faire ¤boucle(0,1,5,1,"ABC";pause;"~") (pause gérée à la fin, dans chrSendKeys, au même titre que {Win...}
Nouvelle fonction possible qui en découle {pause 1000} = ¤pause 1000¤
Pour meilleure uniformisation et possibilité : changé la syntaxe de open #
--> ¤open #1 "W" "C:\dossier\MonFichier.txt" -> A R et W sont entre guillemets donc paramétrables
Corrigé la relance du programme après erreur de décodage. (si erreur dans le code User, NiceKeys repart correctement)
Colorisation des codes dans rtbBoucle (à la manière de rtbSend)
Ajouté [REC] dans boucles -> le REC se fait dans une autre fenêtre
-------------------------------------------------------------------------------
TOUTES les v3.3 et > intègrent la gestion de la touche WINDOWS
-------------------------------------------------------------------------------
- 29 novembre 2006 23:29:44 :
- v3.4.build 78 - 29/11/06
Insertion de code à partir de la liste des fonctions (frmFunc)
en version faux ToolTip avec une liste à cliquer
A terminer :
corrigé l'aide avec touche Win, pause et open #
Gestion Import/Export des Banques
liste de raccourcis d'origine windows
v3.3.build 75 à 77 24/11/06 - 26/11/06
corrigé bug si boucle interne avec paramètres date;"..." -> ¤boucle(0,1,5,1,"Bla";date;"~")¤ -> ok (problème du defaut date(0) dans cherchePar (fix)
Corrigé Bug avec fonctions sans parenthèse
Correction orthographe
Ajouté tuto1 et tuto2 en flash (link www) -> fait avec Wink
Meilleure Gestion de la pause : on peut faire ¤boucle(0,1,5,1,"ABC";pause;"~") (pause gérée à la fin, dans chrSendKeys, au même titre que {Win...}
Nouvelle fonction possible qui en découle {pause 1000} = ¤pause 1000¤
Pour meilleure uniformisation et possibilité : changé la syntaxe de open #
--> ¤open #1 "W" "C:\dossier\MonFichier.txt" -> A R et W sont entre guillemets donc paramétrables
Corrigé la relance du programme après erreur de décodage. (si erreur dans le code User, NiceKeys repart correctement)
Colorisation des codes dans rtbBoucle (à la manière de rtbSend)
Ajouté [REC] dans boucles -> le REC se fait dans une autre fenêtre
-------------------------------------------------------------------------------
TOUTES les v3.3 et > intègrent la gestion de la touche WINDOWS
-------------------------------------------------------------------------------
- 01 décembre 2006 23:52:59 :
- v3.4.build 80 - 01/12/06 - corrigé l'aide ToolTip (meilleur affichage) et en prévision d'une aide complète à la saisie des codes
- 05 décembre 2006 22:58:59 :
- v3.4.build 81 - 05/12/06 - Amélioration de "ToolTip" avec champs Function ou ordinaire
- 06 décembre 2006 17:09:05 :
- v3.4.82 : avec la 'form' frmToolT, c'est mieux !
- 04 janvier 2007 11:39:59 :
- v3.5.build 82 à 84 - 04/01/07
Tenu compte des remarques de vbGenesis :
- formMouseMove avec Api (pour frmMain)
- Corrigé bug sur fauxTooltipText + calcul du placement horizontal
- supprimé toolTip si mode Automation est 'exexcuter'
- affichage complet des champs ordinaires (toolTip)
- memorisé le verrouillage des banque (LockBank dans base de registre)
- supprimé bug sur icône à la fermeture de la fenêtre parametres...
- 12 janvier 2007 22:43:21 :
- v3.5.build 85 - 12/01/07
- Bloqué la taille des fenêtres
- Supprimé le Beep au démarrage / changement de banque
- Ajouté la possibilité de copier la fonction à partir de la fenêtre fonction (frmFunc) -> cliquer -> va dans le presse papier
- Ajouté Bouton fermer dans fenêtre boucle et bouton voir boucle dans fenêtre principale (frmMain)
- 29 janvier 2007 22:50:03 :
- v3.5.build 86 - 29/01/07
- corrigé petite erreur dans l'aide (fonction.htm)
- supprimé l'affichage dans la barre de tâche de frm.progress : état des boucles
- Fermeture de frmLockBank (changement de banque) avec le bouton "ok"
- 17 mai 2007 15:44:29 :
- v3.5.build 87 - 17/05/07
bugs fixed :
1 - Si lock sur banque et que l'on supprime la banque, erreur au chargement (variable lockBank dans frmLockBank) -> fixed;
2 - corrigé le verrouilage effectif au démarrage;
3 - corrigé l'affichage des toolTip (perte de l'info);
- 23 juin 2007 16:56:07 :
- v3.5.build 89 - 23/06/07 - revu la touche menu qui ne fonctionnait pas {HELP} pour menu contextuel (passe par keybd_event() au lieu de sendKeys() -
v3.5.build 88 - 17/06/07 Ajouté une temporisation paramétrable pour différer le démarrage de NiceKeys (pour laisser le temps à windows de se charger avant d'appliquer l'icone dans la barre de tâche)
- 23 juin 2007 16:59:12 :
- Oups, j'ai remis la V3.5.88 au lieu de la 89... C'est rectifié.
Sources du même auteur
Sources de la même categorie
Sources en rapport avec celle ci
Commentaires et avis
Discussions en rapport avec ce code source dans le forum
déplacer le curseur de la souris... [ par nioupy ]
bonjour,bon, voila, pour vous expliquer le problème : j'utilise un logiciel qui n'est absolument pas optimisé pour une utilisation clavier... en clair
Blokage clavier et souris [ par XVR232 ]
Bon, ben chuis tombé sur un site, ou y avais un peu de code source vb, et g trouvé ca : Shell "rundll32 mouse,disable" Shell "rundll32 keyboard,
Désactiver un périphérique [ par Jonef ]
J'aimerai savoir comment désactiver un périphérique tel que la souris ou le clavier.Je sais déjà désactiver une souris et un clavier mais le problème
Curseur Clavier, curseur Souris [ par Cpapy ]
Bonjour,Sur un contrôle richtextbox, je souhaiterais, par programme, positionner le curseur de la Souris sur le Curseur clavierA bientôt peut-être et
gestion souris et clavier dans excel [ par marcod59 ]
Bonjour,Je voudrais savoir s'il est possible dans excel de gerer la souris et le clavier ? Je m'explique :Il faut que je lance une macro qui se lancer
handle d'un control ayant le focus clavier mais pas le curseur souris [ par bassardg ]
Salut,Je galere depuis 2 jours à la recher d'un petit bout de code pour me permetre de recuperer le handle du control sur une form dont je ne suis pas
Bloquer le clavier et la souris [ par Flyer ]
Je cherche un moyen de vérouiller le clavier. Que l'on ne puisse plus appyer sur les touches.
Désactiver le clavier et la souris [ par Flyer ]
Qui à une idée comment on peut désactiver le clavier et la souris. Ya une API qui fait ca ?Merci
Mettre en mode exclusif le clavier et la souris pour mon prgm [ par padide ]
Je souhaite que mon prgm est l'exclusivitée du clavier et de la souris tant que celui ci n'est pas quitté. C'est pour un prgm de sécuri
Probleme souris clavier sans fil [ par Dast ]
Salut tlm, chuis en train de poster des posts un peu partout pour un ptit soucis; On m'a offert un pack clavier souris sans fil pour Noël, et ca
|
Téléchargements
Logiciels à télécharger sur le même thème :
Comparez les prix Nouvelle version
|