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.