SecureCRT 中使用 `crt.Session.Config.SetOption` 方法

最新推荐文章于 2025-06-10 22:18:38 发布

原创最新推荐文章于 2025-06-10 22:18:38 发布 · 494 阅读

3 ·

CC 4.0 BY-SA版权

文章标签：

#SecureCRT

SecureCRT 中使用 `crt.Session.Config.SetOption` 方法

crt.Session.Config.SetOption 是 SecureCRT 的 VBScript/JScript API 中用于设置会话配置选项的方法。以下是关于此方法的详细说明和用法示例：

方法语法

crt.Session.Config.SetOption(OptionName, Value)

参数说明

参数	类型	描述
`OptionName`	String	要设置的选项名称
`Value`	Variant	要为选项设置的值

常用配置选项示例

1. 设置协议类型

crt.Session.Config.SetOption("Protocol Name", "SSH2")
' 可选值: "SSH2", "SSH1", "Telnet", "RLogin", "Serial", "RAW", "TAPI"

2. 设置主机名和端口

crt.Session.Config.SetOption("Hostname", "example.com")
crt.Session.Config.SetOption("Port", 22)

3. SSH 相关设置

' 认证方式
crt.Session.Config.SetOption("SSH Authentication", "PublicKey")
' 可选值: "Password", "PublicKey", "Keyboard-Interactive", "GSSAPI"

' 用户名
crt.Session.Config.SetOption("Username", "myuser")

' 密钥文件路径
crt.Session.Config.SetOption("SSH2 Identity File", "C:\path\to\private_key.ppk")

4. 终端设置

' 终端类型
crt.Session.Config.SetOption("Terminal Emulation", "Xterm")
' 可选值: "Xterm", "VT100", "VT102", "VT220", "ANSI", "SCOANSI", "Wyse50", "Wyse60"

' 字符编码
crt.Session.Config.SetOption("Character Encoding", "UTF-8")

' 终端大小
crt.Session.Config.SetOption("Columns", 120)
crt.Session.Config.SetOption("Rows", 40)

5. 日志记录设置

' 启用日志记录
crt.Session.Config.SetOption("Log File Name", "C:\logs\session.log")
crt.Session.Config.SetOption("Log File Mode", "Append")
' 可选值: "Append", "Overwrite", "Disabled"

使用注意事项

选项名称区分大小写：必须严格按照 SecureCRT 文档中的选项名称书写
值类型必须匹配：
- 字符串选项需要引号
- 数字选项直接使用数字
- 布尔选项使用 True/False
修改后需要保存：
```
crt.Session.Config.Save()
```

获取当前值：

currentValue = crt.Session.Config.GetOption("OptionName")

完整示例脚本

Sub Main
    ' 创建新会话配置
    Set sess = crt.Session.Config
    
    ' 设置基本连接参数
    sess.SetOption("Protocol Name", "SSH2")
    sess.SetOption("Hostname", "192.168.1.100")
    sess.SetOption("Port", 22)
    sess.SetOption("Username", "admin")
    
    ' 设置SSH认证方式
    sess.SetOption("SSH Authentication", "PublicKey")
    sess.SetOption("SSH2 Identity File", "C:\keys\mykey.ppk")
    
    ' 设置终端参数
    sess.SetOption("Terminal Emulation", "Xterm")
    sess.SetOption("Character Encoding", "UTF-8")
    sess.SetOption("Columns", 120)
    sess.SetOption("Rows", 40)
    
    ' 保存配置
    sess.Save()
    
    ' 连接会话
    crt.Session.Connect
End Sub