window下批处理操作：bat文件中调用vbs

@echo "kill CRT process"
taskkill /F /IM SecureCRT.exe
::ping 127.0.0.1 -n 30

echo "start vos through CRT"
echo off
d:
cd D:\tools\SecureCRT_x86
start SecureCRT.EXE /SCRIPT D:\Secure_vos\Start_vos.vbs
echo "start vos through CRT end"

ping 127.0.0.1 -n 4
pause

上述代码的意思是：在.bat文件中执行Start_vos.vbs文件

按需策划设计可以根据自己的需求进行定制，做网站、成都网站设计构思过程中功能建设理应排到主要部位公司做网站、成都网站设计的运用实际效果公司网站制作网站建立与制做的实际意义

批处理执行文件之前首先需要下载SecureCRT.exe文件

Start_vos.vbs文件内容如下：

#$language = "VBScript"
#$interface = "1.0"

crt.Screen.Synchronous = True

Sub Main

	On Error Resume Next
	Dim result
	If crt.Session.Connected Then crt.Session.Disconnect

' connected to the '172.21.1.114' 		
	Set objtab = crt.Session.ConnectInTab("/SSH2 /PASSWORD root root@172.21.1.114",True)

' Capture error code and description (if any)
	nError = Err.Number
	strErr = Err.Description

' Now, tell the script host that it should handle errors as usual now:
	On Error Goto 0

' change tab name
	objtab.caption = "Gdb_vos"
	
' enter the folder
	crt.Screen.Send "cd /home/test" & chr(13)
	crt.Screen.WaitForString chr(27) & "[32m(none) /home/test" & chr(27) & "[m # "
End Sub

上述代码主要是将手动输入的过程使用VBS脚本进行自动化

首先：

Set objtab = crt.Session.ConnectInTab("/SSH2 /PASSWORD root123 root@172.11.1.15",True)

采用SSH2的方式连接linuxIP地址

172.21.1.114，密码是root123,用户名是root

objtab.caption = "Start_vos"

将当前连接页面重命名为Start_vos

crt.Screen.Send "cd /home/test" & chr(13)

输入cd /home/test并回车

crt.Screen.WaitForString chr(27) & "[32m(none) /home/test" & chr(27) & "[m # "

等待页面下一行的内容为

chr(27) & "[32m(none) /home/test" & chr(27) & "[m # "

网页题目：window下批处理操作：bat文件中调用vbs
转载来于：https://www.cdcxhl.com/article18/pgoegp.html

成都网站建设公司_创新互联，为您提供网站改版、App设计、企业建站、网站收录、ChatGPT、企业网站制作

广告

声明：本网站发布的内容（图片、视频和文字）以用户投稿、用户转载内容为主，如果涉及侵权请尽快告知，我们将会在第一时间删除。文章观点不代表本网站立场，如需处理请联系客服。电话：028-86922220；邮箱：631063699@qq.com。内容未经允许不得转载，或转载时需注明来源： 创新互联