vbscript - 安全 CRT 向主机 VBS 发送命令
问题描述
嘿,我试图制作一个简单的脚本,可以登录并向主机/服务器发送命令:
Sub Main
crt.Screen.Synchronous = True
crt.Session.Connect "ip adress"
crt.Screen.WaitForString "Username: "
crt.Screen.Send "username" & chr(13)
crt.Screen.WaitForString "Password: "
crt.Screen.Send "password" & chr(13)
crt.Screen.Send "?" & chr(13)
crt.Screen.Synchronous = False
End Sub
我的问题是它不会发送任何东西。
解决方案
它现在工作:
Sub Main
host = Array("host1", "host2")
For each item in host
Dim user
user = "Username"
Dim passwd
passwd = "password"
cmd = "/SSH2 /L " & user & " /PASSWORD " & passwd & " /C AES-192-CTR /M SHA2-256 " & item
crt.Session.Connect cmd
Dim tab, index, nTabCount
nTabCount = crt.GetTabCount()
for index = 1 to nTabCount
set tab = crt.GetTab(index)
tab.activate
tab.screen.send "command" & vbcr
crt.Sleep 5000
crt.Session.Disconnect()
next
Next
End Sub
推荐阅读
- logging - Google StackDriver:如何将其他日志与跟踪日志关联(和嵌套)?
- css - 将类“折叠”添加到 flex 网格会创建不均匀的间距
- mysql - 如何完成从本地开发 docker 到暂存数据库的 SSH 隧道
- jpeg - 批量修复损坏的 JPG 文件?
- c# - 需要重新启动 Visual Studio 2017 才能使 IIS 工作
- sql - 定义设置时间戳参数以限制结果时,时间戳不限制 SQL 查询中的数据
- javascript - 扩展 Material UI ListItem 的正确方法是什么?
- oracle - Oracle 18 xe 奇怪 - 无法以新用户身份登录
- mysql - 通过 SSH 隧道进行 MySql 复制
- javascript - 如何从对象数组中提取属性并对其进行切片?