Dim WshShell Set WshShell = WScript.CreateObject ("WScript.shell") WshShell.run "cmd /K CD C:\ & rexec ServerName -l Login ll" 'La comande 'll' sur Unix est l'équivalent du 'dir' sur Dos WScript.Sleep 100 WshShell.SendKeys "Password~" 'Le caractère ~ est un retour à la ligne