Discussion :

[bellamy44]

Bonjour,

Je souhaite automatiser l'envoi de commandes à une machine distante en m'y connectant via telnet (à partir de mon appli Access).

Mon idée est de lancer une fenêtre Shell, de rendre active cette fenêtre, puis d'envoyer mes commandes grace à SendKeys.

Code :

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

1
2
3
4
5
 
Dim idProcess As Variant
idProcess = Shell("CMD.EXE", 1)
AppActivate idProcess
SendKeys "telnet 192.25.23.1"

Ce code ne fonctionne pas (c'est AppActivate qui plante) et je ne comprends pas pourquoi...

Avez-vous une idée svp ?
Merci.

[argyronet]

Bonjour,

PSExec serait plus approprié.

Argy

[bellamy44]

Merci pour le conseil je ne connaissais pas PExec.

En revanche c'est bien des commandes Shell que je souhaite exécuter donc en utilisant CMD.EXE.


Une idée ?

[argyronet]

PSExec se lance avec soit un Shell() , soit un ShellExecute() soit un CreateProcess() et ce avec une ligne de commande...

Je pense que tu dois pouvoir en choisir un...

Argy