Сброс Telnet с помощью VBscript / Wscript - PullRequest
Новая
       36

Сброс Telnet с помощью VBscript / Wscript

0 голосов
/ 25 января 2012

Этот код VBSCRIPT выдает ошибку 800A0400. Есть мысли? 

<job>
<script language="VBScript">
Option Explicit
On Error Resume Next
Dim WshShell
set WshShell=CreateObject("WScript.Shell")
WshShell.run "cmd.exe"
WScript.Sleep 500
'Send commands to the window as needed - IP and commands need to be customized
'Step 1 - Telnet to remote IP'
WshShell.SendKeys "telnet 123.456.789.01"
WshShell.SendKeys ("{Enter}")
WScript.Sleep 500
'Step 2 - Issue Commands with pauses'
'USERNAME
WshShell.SendKeys "USERNAMEHERE"
WshShell.SendKeys ("{Enter}")
WScript.Sleep 500
'PASSWORD
WshShell.SendKeys "PASSWORDHERE"
WshShell.SendKeys ("{Enter}")
WScript.Sleep 500
'RESET
WshShell.SendKeys "reset"
WshShell.SendKeys ("{Enter}")
WScript.Sleep 500
'CONFIRM
WshShell.SendKeys "y"
WshShell.SendKeys ("{Enter}")
WScript.Sleep 500
'Step 3 - Exit Command Window
WshShell.SendKeys "exit"
WshShell.SendKeys ("{Enter}")
WScript.Quit 
</script>
</job>

1 Ответ

1 голос
/ 26 января 2012

Вы пытались найти в Google код ошибки, который вы получаете, или синтаксис XML файла сценария? Вам не хватает корневого элемента <package> и, возможно, у вас неправильное расширение имени файла (должно быть .wsf).

...