首页 诗词 字典 板报 句子 名言 友答 励志 学校 网站地图
当前位置: 首页 > 教程频道 > 开发语言 > VB >

【用今天能用的100分求救】请问一个自动telnet到服务器并且可以自动执行命令的有关问题?【困恼很多天了】

2012-01-24 
【用今天能用的100分求救】请教一个自动telnet到服务器并且可以自动执行命令的问题?【困恼很多天了】这是用VBS

【用今天能用的100分求救】请教一个自动telnet到服务器并且可以自动执行命令的问题?【困恼很多天了】
这是用VBS脚本写的一个自动telnet脚本,在VC中用system("telnet.vbs")调用: 

set sh=WScript.CreateObject("WScript.Shell") 
WScript.Sleep 1000 
sh.Run "telnet 10.130.49.151",3 
WScript.Sleep 1000 
sh.SendKeys "root{ENTER}" 
WScript.Sleep 1000 
sh.SendKeys "119779{ENTER}" 
WScript.Sleep 500 
sh.SendKeys "cd /home/sybase/ASE-12_5{ENTER}" 
WScript.Sleep 500 
sh.SendKeys "chmod 777 sybase_check.sh{ENTER}" 
WScript.Sleep 500 
sh.SendKeys "./sybase_check.sh SYBASE.cfg{ENTER}" 

但是存在一个严重的bug:自动执行这个telnet脚本时,就不能操作鼠标和键盘,否则会输到其他的地方,或者输入到这个telnet脚本中,导致错误。 

有没有解决办法,或者其他的方法一键实现telnet自动登录并执行相关命令~~~请大家给意见~


[解决办法]
winsock控件?
[解决办法]
用shell调用cmd,用sendkeys发送命令,sleep控制间隔
[解决办法]
shell("telnet 10.130.49.151 <input.txt >ouput.txt")
input.txt的内容为
root
119779
cd /home/sybase/ASE-12_5
chmod 777 sybase_check.sh
./sybase_check.sh SYBASE.cfg
quit



[解决办法]
楼上的方法可以。
[解决办法]
这里是VB版...
[解决办法]
ouput.txt 为空,是不是因为 telnet 执行上面的指令时,不会产生输出信息啊?


假设你在DOS窗口中运行 telnet ,然后手工输入那些命令来执行。
在执行这些命令时,其中的某条(或多条)指令在执行时,telnet有输出(反馈信息)吗?

[解决办法]

[解决办法]
帮顶啦~~~

热点排行