Discussion :

[Spiritkiller]

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

[RadPAT]

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 :

Sélectionner tout - Visualiser dans une fenêtre à part

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 :

Sélectionner tout - Visualiser dans une fenêtre à part

WScript.Sleep 1000

qui est le timer avec 1000 = 1 seconde.

A++

[Spiritkiller]

merci beaucoup

[supersnail]

CF signature

[lepetit]

Bonjour j'ai des question à ce sujet:

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

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 :

Sélectionner tout - Visualiser dans une fenêtre à part

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"?

[lepetit]

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

[SfJ5Rpw8]

voir aide en ligne

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 %

Où trouver l'aide en ligne pour VBScript ?

[lepetit]

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

[ced600]

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

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

var=sendkeys "CTRL^S"

[lepetit]

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

[RadPAT]

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 :

Sélectionner tout - Visualiser dans une fenêtre à part

var=sendkeys "^S"

A++

[lepetit]

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

[lepetit]

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

[lepetit]

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

[SfJ5Rpw8]

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

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

[lepetit]

Ha oui merci.

[lepetit]

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 :

Sélectionner tout - Visualiser dans une fenêtre à part

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 :

Sélectionner tout - Visualiser dans une fenêtre à part

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.