Question

bat调用vbs使用telnet远程连接服务器，但是提示有错误。还有如果要让服务器执行bat，应该怎么写？

VBS:
set sh=WScript.CreateObject("WScript.Shell") WScript.Sleep 1000 sh.SendKeys "open 101.133.34.24{ENTER}" WScript.Sleep 1000 sh.SendKeys "{ENTER}" WScript.Sleep 1000 sh.SendKeys "Administrator{ENTER}" WScript.Sleep 1000sh.SendKeys "123456{ENTER}" WScript.Sleep 1000sh.SendKeys"execute flash:clear.txt{ENTER}"

BAT:
@echo offstart telnetcscript //nologo telnet.vbs

Answer 1

如果你的Bat没有其它作用，可以直接使用VBS来登录和操作

给你一段我所使用的VBS

set sh=WScript.CreateObject("WScript.Shell")	'建立Shell对象
set objArgs=WScript.Arguments			'设定VBS的参数集

dim winTitle,IP
if IP = "初始化的IP" then IP = Inputbox("请输入IP地址")	'如果初始化IP为空内容，则要求初入IP地址
winTitle="telnet " & IP

sh.Run winTitle				'运行Telnet 至IP
WScript.Sleep 1000			'延时1秒钟

xSend "server{enter}"		'输入密码
WScript.Sleep 1000			'延时1秒钟

xSend "en{enter}server{enter}"		'登录交换机
WScript.Sleep 1000			'延时1秒钟

xSend "登录后的命令{ENTER}"		'进入配置页面
WScript.Sleep 1000			'延时1秒钟

xSend "exit{ENTER}exit{ENTER}exit{enter}"	'退出配置模式&退出登录&退出telnet
WScript.Sleep 1000			
xSend "{ESC}"				

Function xSend(string)								'激活窗口发送函数
	sh.AppActivate winTitle							'激活窗口
	sh.SendKeys string								'发送内容
End Function

追问

我是要用bat调用vbs用telnet登录到远程服务器然后再让服务器执行一个bat文件。

追答

不管你是否需要用到Bat调用VBS，你都可以直接调用我提供的这段VBS脚本。
你现在的BAT代码是先启动telnet的，这样在你退出Telnet之前，你的VBS脚本都无法被执行。
你可以使用 & 连接符使其同时执行这两条代码

但是你的 VBS 是直接向当前激活的窗口中输入用户名和密码，这样很容易出现操作的窗口不是telnet的情况

而我提供的脚本，注释也写得非常明确了，在每次发送命令之前，都会激活一次telnet窗口，确保输出的对象没有出错。