[Iska]

Используйте второй параметр метода «.Run()»:
Run Method (Windows Script Host)
WshShell
равный нулю.

Зачем Вы прерываете процессы? Если уж у Вас без проблем работает «.SendKeys()», так и отсылайте «quit» и «exit» соответственно.

[Rbuha]

Iska,

Код:

set WshShell = WScript.CreateObject("WScript.Shell")
Return = WshShell.run ("telnet.exe 192.168.1.1", 0, true)

WScript.Sleep 5000
WshShell.SendKeys"admin" & chr(13)

WScript.Sleep 5000
WshShell.SendKeys"1234" & chr(13)

WScript.Sleep 5000
WshShell.SendKeys"system reboot" & chr(13)

WScript.Sleep 3500
ProcessClose("cmd.exe")
ProcessClose("telnet.exe") 
Function ProcessClose(sProcName) 
strComputer = "." 
Set objWMIService = GetObject("winmgmts:{impersonationLevel=impersonate}!\\" & strComputer & "\root\cimv2") 
Set colProcessList = objWMIService.ExecQuery("Select * from Win32_Process Where Name = '" & sProcName & "'") 
For Each objProcess in colProcessList 
objProcess.Terminate() 
Next 
End Function

в таком виде вообще не работает.

Зачем Вы прерываете процессы? Если уж у Вас без проблем работает «.SendKeys()», так и отсылайте «quit» и «exit» соответственно.

Такой скрипт скачал с сайта zyxel. Если не трудно, покажите как должно выглядеть.

[Iska]

в таком виде вообще не работает. »

Третий параметр в Вашем случае должен быть «False», а не «True».

[Rbuha]

Iska,

Код:

set WshShell = WScript.CreateObject("WScript.Shell")
Retum  = WshShell.run ("telnet.exe 192.168.1.1",0,False)

WScript.Sleep 5000
WshShell.SendKeys"admin" & chr(13)

WScript.Sleep 5000
WshShell.SendKeys"1234" & chr(13)

WScript.Sleep 5000
WshShell.SendKeys"system reboot" & chr(13)

WScript.Sleep 3500
ProcessClose("cmd.exe")
ProcessClose("telnet.exe") 
Function ProcessClose(sProcName) 
strComputer = "." 
Set objWMIService = GetObject("winmgmts:{impersonationLevel=impersonate}!\\" & strComputer & "\root\cimv2") 
Set colProcessList = objWMIService.ExecQuery("Select * from Win32_Process Where Name = '" & sProcName & "'") 
For Each objProcess in colProcessList 
objProcess.Terminate() 
Next 
End Function

Через ~20 секунд после запуска выдаёт множество сообщений об ошибке