请教，如何在运行中VBS输入命令并执行
@echo off echo set sh=WScript.CreateObject("WScript.Shell") >telnet_tmp.vbs
echo WScript.Sleep 300 >>telnet_tmp.vbs
echo sh.SendKeys "open 192.168.1.1" >>telnet_tmp.vbs
echo WScript.Sleep 300 >>telnet_tmp.vbs
echo sh.SendKeys "{ENTER}" >>telnet_tmp.vbs
echo WScript.Sleep 300 >>telnet_tmp.vbs
echo sh.SendKeys "c3650{ENTER}">>telnet_tmp.vbs
echo WScript.Sleep 300 >>telnet_tmp.vbs
echo sh.SendKeys "en{ENTER}">>telnet_tmp.vbs
echo WScript.Sleep 300 >>telnet_tmp.vbs
echo sh.SendKeys "c3650{ENTER}">>telnet_tmp.vbs
echo WScript.Sleep 300 >>telnet_tmp.vbs
echo sh.SendKeys "config term{ENTER}" >>telnet_tmp.vbs
echo WScript.Sleep 300 >>telnet_tmp.vbs
echo sh.SendKeys "ip access-list standard web{ENTER}" >>telnet_tmp.vbs
echo Dim ip >>telnet_tmp.vbs
echo ip = inputbox("把IP输进去","请注意") >>telnet_tmp.vbs
echo WScript.Sleep 300 >>telnet_tmp.vbs
echo sh.SendKeys "exit{ENTER}" >>telnet_tmp.vbs
echo WScript.Sleep 300 >>telnet_tmp.vbs
echo sh.SendKeys "exit{ENTER}" >>telnet_tmp.vbs
echo WScript.Sleep 300 >>telnet_tmp.vbs
echo sh.SendKeys "exit{ENTER}" >>telnet_tmp.vbs
echo WScript.Sleep 300 >>telnet_tmp.vbs
echo set ws=createobject("wscript.shell") >>telnet_tmp.vbs
echo ws.run "taskkill /f /im ping.exe",hide >>telnet_tmp.vbs
echo WScript.Sleep 300 >>telnet_tmp.vbs
echo set ws=createobject("wscript.shell") >>telnet_tmp.vbs
echo ws.run "taskkill /f /im telnet.exe",hide >>telnet_tmp.vbs
echo sh.SendKeys "quit{ENTER}" >>telnet_tmp.vbs
start telnet
cscript //nologo telnet_tmp.vbs
最近用批出做了一个思科交换机公司电脑上网权限的脚本，想实现执行过程中手动输入 permit 192.168.1.197 就开放指定IP的上网权限，现在输入后无法执行，就是上面代码空行那里，请教各位高手要怎么改，谢谢！
Vbs
set sh=WScript.CreateObject("WScript.Shell")
WScript.Sleep 300
sh.SendKeys "open 192.168.1.1"
WScript.Sleep 300
sh.SendKeys "{ENTER}"
WScript.Sleep 300
sh.SendKeys "c3650{ENTER}"
WScript.Sleep 300
sh.SendKeys "en{ENTER}"
WScript.Sleep 300
sh.SendKeys "c3650{ENTER}"
WScript.Sleep 300
sh.SendKeys "config term{ENTER}"
WScript.Sleep 300
sh.SendKeys "ip access-list standard web{ENTER}"
Dim ip
ip = inputbox("把IP输进去","请注意")
WScript.Sleep 300
sh.SendKeys "exit{ENTER}"
WScript.Sleep 300
sh.SendKeys "exit{ENTER}"
WScript.Sleep 300
sh.SendKeys "exit{ENTER}"
WScript.Sleep 300
set ws=createobject("wscript.shell")
ws.run "taskkill /f /im ping.exe",hide
WScript.Sleep 300
set ws=createobject("wscript.shell")
ws.run "taskkill /f /im telnet.exe",hide
sh.SendKeys "quit{ENTER}"
