@echo off 
setlocal EnableDelayedExpansion
color 0a
cls
echo 
for /f tokens=1,2,3,4,5 delims=  %%i in (ls.txt) do 
echo set sh=Wscript.CreateObject(Wscript.Shell) >telnet_tmp.vbs 
echo Wscript.Sleep 300 >>telnet_tmp.vbs 
echo sh.SendKeys open %%i >>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 admin{ENTER}>>telnet_tmp.vbs 
echo Wscript.Sleep 300 >>telnet_tmp.vbs 
echo sh.SendKeys admin{ENTER}>>telnet_tmp.vbs 
echo Wscript.Sleep 300 >>telnet_tmp.vbs 
echo sh.SendKeys save{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 
start telnet 
cscript //nologo telnet_tmp.vbs 
ren telnet_tmp.vbs %%i.dat
del telnet_tmp.vbs
nclick="copycode($('code0'));">復制代碼