sendkeys + timer

Citation:

---

Bonjour,
en fait, j'ai beaucoup de documents à numériser. J'utilise le gestion de scan Windows (XP). Entre chaque scan, je fais
[tab],[tab],[espace],[entrer],[entrer]
J'aimerais appuyer automatiquement sur cette combinaison de touches toutes les 37s (ou alors, s'il y a d'autres solutions, que le scan soit relancé quelques secondes après sa fin).
Il paraît que je peux faire ça en VBScript mais je ne sais pas du tout comment ça marche (où on tape on le code, où on l'interpréte, comment et tout ça... gcc à le mérite d'être simple lui lol).
Bref, quelques explications sur le fonctionnement de VB, VBScript, VB Express et tout seraient les bienvenues (à quoi ça sert et comment on s'en sert).
Merci.

---

bonjour je voudrai le mm fonctionnement et j'arrive pas a trouve le code qui me le permettra avec "sendkeys" et la fonction "timer" je n'arrive pas a le resoudre pour des probleme de syntaxe. je sous exel 2000 merci de m'aider

Salut,

le plus simple si tu n'as pas envie de te lancer dans le VBS c'est d'utiliser Scriptit de chez crosoft (et en plus c'est gratuit !) :

http://www.microsoft.com/technet/arc....mspx?mfr=true

Sinon envoyer des touches en WSh ca donne ca :

Code:

---

1 2 3 4 5 6 7 8 9 10 11 12

Texte = "alut"   set WshShell = WScript.CreateObject("WScript.Shell") Commande = "Notepad.exe" WshShell.Run Commande, 5,False WScript.Sleep 1000 WshShell.SendKeys "S" WScript.Sleep 1000 WshShell.SendKeys Texte WScript.Sleep 1000 WshShell.SendKeys "{Enter}"

---

Note le

Code:

---

WScript.Sleep 1000

---

qui est le timer avec 1000 = 1 seconde.

A++

merci beaucoup

CF signature

Bonjour j'ai des question à ce sujet:

Code:

---

1 2 3

set WshShell = WScript.CreateObject("WScript.Shell") Commande = "Notepad.exe" WshShell.Run Commande

---

Ceci marche pour ouvrir le notepad ou la calculette mais j'ai essayé en mettant le nom d'un autre logiciel comme word ou Paint ou un jeu mais cela ne marche pas. Je voudrait savoir comment on peut faire pour ouvrir ces logiciels.
2ième question:
Pourquoi si on enlève le wscript.sleep x la suite ne s'effectue pas? Par exemple:

Code:

---

1 2 3 4

set var=createobject("wscript.shell") programme="notepad.exe" var.run programme var.SendKeys "Bonjour"

---

Le bloc note s'ouvre normalement mais "bonjour" ne s'affiche pas.
Est-ce parce que le bloc note ne s'ouvre pas assez vite et que le var.SendKeys "Bonjour" s'effectue dans le vide?Ou alors "cherches pas c'est comme ça il faut mettre un timer avant et c'est tout"?

J'ai trouvé mes deux question pour la première je mets le chemin complet pour la 2ième je disais juste.
Est ce que quelqu'un sait comment on fait pour appuiyer sur deux touches en même temps avec SendKeys? Comme par exemple ctrl+S pour enregistrer

voir aide en ligne

Citation:

---

Pour envoyer des caractères du clavier comprenant une séquence de frappes classique combinée avec MAJ, CTRL ou ALT, créez un argument de chaîne composé représentant la combinaison de frappes. Pour cela, faites précéder la séquence classique par un ou plusieurs des caractères spéciaux suivants :

Touche Caractère spécial
MAJ +
CTRL ^
ALT %

---

:faq: Où trouver l'aide en ligne pour VBScript ?

L'aide est téléchergeable sur tout sauf vista qui n'est pas écrit. :(
Mais cela ne marche pas quand je fais:
var=Sendkeys CTRL ^"S"
ou var=sendkeys CTRL^S Pour le premier message d'erreur type incompatible
string"S"
pour le deuxième il écrit "1"
Normalement ça devrait ouvrir la fenêtre pour enregistrer

Bien que je n'ai jamais utilisé sendkey, j'aurais plutôt fait cela :

Code:

---

var=sendkeys "CTRL^S"

---

Merci ça marche.Juste que avant d'ouvrir la fenêtre d'enregistrement il écrit CRTL mais c'est pas gênant.

Salut,

regarde le post de BBIL !
le mot CRTL est remplacé par ^
la touche mAJ est remplacée par +
....

donc si tu vaux faire F5, il faut faire simplement :

Code:

---

var=sendkeys "^S"

---

A++

Ha ok merci. Je croyais qu'il fallait écrire le CTRL^^

Comment fait-on pour écrire la parenthèse avec sendkeys.
var.sendkeys "parenthèse)"
Il y a un rapport d'erreur la parenthèse ne lui plait pas

J'ai trouvé il faut mettre des acolades
var.sendkeys "parenthèses{)}"

Citation:

---

Envoyé par lepetit

L'aide est téléchergeable sur tout sauf vista qui n'est ...

---

l'aide c'est le fichier scd56fr.exe ... ;)

Ha oui merci.

Bonjour je voudrais faire quelque chose mais je ne sais pas si c'est possible avec vbs comme je n'ai rien trouvé à ce sujet:
En fait c'est pour connecter un compte d'un jeux online très rapidement(Dofus si quelqu'un connait...)
J'ai déjà fais ce script qui marche très bien:

Code:

---

1 2 3 4 5 6 7 8 9 10 11 12

set var=createobject("wscript.shell") var.run "C:\Users\Mikaël\Desktop\Dofus.lnk" 'lance le jeu" wscript.sleep 3000 var.sendkeys "nom de compte{tab}mot de passe" 'tape les identifiants var.sendkeys "{enter}" 'valide wscript.sleep 7000 'attente car il y a parfois bcp de monde à se connecter en meme temps var.sendkeys"{tab}{tab}{tab}{tab}{tab}{tab}" 'sélectionne le serveur var.sendkeys "{enter}"& "{enter}" 'valide wscript.sleep 5000 'attente même pour le même raison var.sendkeys "{tab}{tab}{tab}{tab}{tab}{tab}{tab}" 'choisit le personnage var.sendkeys "{enter}"& "{enter}" 'valide

---

Alors je vous explique le problème:
après avoir tapé les identifiants il y a une attente plus ou moins longue (parfois meme 9-10minutes) et pareil pour après avoir choisir le serveur et le personnage. Donc s'il y a de longues attentes la suite du programme s'éxecute dans le vide comme le timer est de quelques secondes.
Je voudrais donc pouvoir éxécuter la suite que lorsque le jeu est sur l'écran de sélection du serveur et du personnage.
J'ai pensé à utiliser une condition sur les couleurs: l'écran d'attente est noir alors que de sélection serveur et personnage est d'une autre couleur donc peut-être quelque chose dans le genre:

Code:

---

1 2 3

do while color<>black 'ou le code avec language hexadécimal 'que je peux connaitre avec Paint Loop

---

Mais il faudrait désigner une partie précise de l'écran car il n'est pas entièrement noir et déjà que vbs connaisse tout cela.

Ou alors il y a une autre solution à laquelle je n'ai pas pensé.

Please help me.