secureCRT用vbs 检测错误打印到D盘

可以使用下面的代码实现将secureCRT的错误信息保存到D盘：

' 定义保存路径
Dim savePath
savePath = "D:\error.txt"

' 检测错误并保存到文件
If crt.Screen.WaitForString("Error", 1) Then
    Dim fso, outFile
    Set fso = CreateObject("Scripting.FileSystemObject")
    Set outFile = fso.CreateTextFile(savePath, True)
    outFile.Write crt.Screen.Get(crt.Screen.CurrentRow, 1, crt.Screen.CurrentRow, crt.Screen.CurrentColumn)
    outFile.Close
End If

这段代码会在secureCRT的输出结果中查找包含"Error"的字符串，并将其保存到D盘的error.txt文件中。如果文件不存在则会自动创建。可以根据实际需要修改保存路径和文件名。

相关问题

secureCRT用py打印到D盘脚本

以下是一个简单的使用Python脚本在SecureCRT中将数据打印到D盘的示例：

# $language = "python"
# $interface = "1.0"

import os

def main():
    crt.Screen.Send("command1\r")
    crt.Screen.WaitForString("response1")
    crt.Screen.Send("command2\r")
    crt.Screen.WaitForString("response2")
    crt.Screen.Send("command3\r")
    crt.Screen.WaitForString("response3")
    
    # 打印数据到D盘
    file_path = "D:\\output.txt"
    with open(file_path, "w") as f:
        f.write("Hello, world!")
    
    # 打印完成提示
    crt.Dialog.MessageBox("Printed data to D:\\output.txt")

main()

这个脚本会在SecureCRT中执行三个命令，并等待相应的响应。然后，脚本会将数据“Hello, world!”写入到D盘的output.txt文件中。你可以根据需要修改命令和响应字符串，以及打印的数据和输出文件路径。要在SecureCRT中运行此脚本，请将脚本复制到脚本编辑器中，然后单击“运行”按钮或按下“Ctrl+R”键。注意，D盘必须存在并且有写入权限。

secureCRT用vbs加循环次数和error检测打印

可以使用下面的代码实现secureCRT通过VBScript脚本打印并检测错误，并且可以设置循环次数：

' 定义循环次数
Dim loopCount
loopCount = 3

' 循环打印
For i = 1 To loopCount
    crt.Screen.Send "show version" & vbcr
    crt.Screen.WaitForString "Router#"
    crt.Screen.Send "exit" & vbcr
Next

' 检测错误
If crt.Screen.WaitForString("Error", 1) Then
    crt.Dialog.MessageBox "发现错误!"
End If

可以根据实际需要修改循环次数和需要检测的错误信息。