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