如何设定自动登录telnet(1)(2)

----- 以下部分保存为SERVER.vbs -----  
'建立Shell对象  
set sh=WScript.CreateObject("WScript.Shell")  
'延迟500毫秒  
WScript.Sleep 1000  
'向telnet发送命令  ~代表回车符  
sh.SendKeys "telnet.exe 192.168.0.10~"  
WScript.Sleep 1000  
sh.SendKeys "n~"  
WScript.Sleep 1000  
sh.SendKeys "administrator~"   
WScript.Sleep 1000   
sh.SendKeys "dell~" 

对于SendKeys这个命令可以send什么，我们可以看下面的列表：

BACKSPACE {BACKSPACE} or {BS} or {BKSP}   
BREAK{BREAK}   
CAPS LOCK {CAPSLOCK}   
DEL or DELETE {DELETE} or {DEL}   
DOWN ARROW{DOWN}   
END {END}   
ENTER{ENTER} or ~   
ESC {ESC}   
HELP{HELP}   
HOME{HOME}   
INS or INSERT {INSERT} or {INS}   
LEFT ARROW{LEFT}   
NUM LOCK{NUMLOCK}   
PAGE DOWN {PGDN}   
PAGE UP {PGUP}   
PRINT SCREEN  {PRTSC}   
RIGHT ARROW{RIGHT}   
SCROLL LOCK{SCROLLLOCK}   
TAB {TAB}   
UP ARROW{UP}   
F1 {F1}   
F2 {F2}   
F3 {F3}   
F4 {F4}   
F5 {F5}   
F6 {F6}   
F7 {F7}   
F8 {F8}   
F9 {F9}   
F10 {F10}   
F11 {F11}   
F12 {F12}   
F13 {F13}   
F14 {F14}   
F15 {F15}   
F16 {F16}  
SHIFT +   
CTRL ^   
ALT %