SecureCRT脚本-Python
这里写两个小脚本
# $language = "python"
# $interface = "1.0"
#官方的实例可以在未连接任何服务器的情况下进行ssh连接
#你要连接的ssh服务器ip
host = '139.196.53.1**'
#ssh用户名
user = 'root'
#ssh密码
passwd = 'Jinx0007'
def main():
#进行cmd操作连接创建新的session连接
cmd = "/SSH2 /L %s /PASSWORD %s /C 3DES /M MD5 %s" % (user, passwd, host)
crt.Session.Connect(cmd)
#使用默认弹窗提示信息
crt.Dialog.MessageBox('登录成功!')
main()
- 1
- 2
- 3
- 4
- 5
- 6
- 7
- 8
- 9
- 10
- 11
- 12
- 13
- 14
- 15
- 16
- 17
- 18
- 19
- 20
- 21
2.另外一个：
# $language = "python"
# $interface = "1.0"
#此方法表示你必须先登录一台ssh服务器然后再去ssh到另外一台服务器
#ssh主机的ip
host = '192.168.0.111'
#ssh主机的用户名
user = 'root'
#ssh主机的密码
passwd = 'Jinx0007'
def main():
#向屏幕光标后发送以下文字内容，\r表示回车执行
crt.Screen.Send('ssh '+user+'@'+host+' \r')
#在5秒内等待屏幕出现password:或者yes/no文字进行下方操作，超过5秒表示超时
result = crt.Screen.WaitForStrings(['password:','(yes/no)'],5)
#当屏幕出现password:字符
if result == 1:
crt.Screen.Send(passwd+"\r")
#屏幕出现(yes/no)等相关字符
if result == 2:
crt.Screen.Send('yes \r')
crt.Screen.WaitForString('password:', 2)
crt.Screen.Send(passwd+"\r")
#等待屏幕出现']$'字符
crt.Screen.WaitForString(']$',5)
#使用默认弹窗提示信息
crt.Dialog.MessageBox('登录成功!')
main()内容
（1）使用python语言实现SecureCRT中的Dialog功能
# $language = "Python"
# $interface = "1.0"
#crt.Dialog.FileOpenDialog([title,[buttonLabel,[defaultFilename,[filter]]]])
#弹出一个对话框，用于选择单个文件;如果选择了具体文件则返回该文件的绝对路径，如果选择了弹窗的“取消”，则返回空。
filePath = crt.Dialog.FileOpenDialog("please open a file","open","a.log","(*.log)|*.log")
#filePath = crt.Dialog.FileOpenDialog("","","a.log","")
#crt.Dialog.MessageBox(message, [title, [icon|buttons]]) 警告、按钮类型弹出一个消息框，可以定义按钮，使用按钮和文本消息来实现和用户的简单对话；
crt.Dialog.MessageBox(filePath,"",64|0)
crt.Dialog.MessageBox("会话已断开","session",64|2)
crt.Dialog.MessageBox("确认是否退出","session",32|1)
crt.Dialog.MessageBox("确认是否退出","session",32|3)
crt.Dialog.MessageBox("是否继续安装","session",32|4)
crt.Dialog.MessageBox("此会话已打开","session",48|5)
crt.Dialog.MessageBox("无法连接此窗口","session",16|6)
#crt.Dialog.Prompt(message [, title [,default [,isPassword ]]])
#弹出一个输入框，用户可以填写文字，比如填写文件名，填写路径，填写IP地址等,运行结果如果点击'ok'，返回输入的字符串，否则返回""
password = crt.Dialog.Prompt("password","session","admin",False)
crt.Dialog.MessageBox(password,"password",64|0)
password = crt.Dialog.Prompt("password","session","",True)
crt.Dialog.MessageBox(password,"password",64|0) # $language = "Python"
# $interface = "1.0"
# CurrentColumn返回当前光标的列坐标。
curCol = crt.Screen.CurrentColumn
crt.Dialog.MessageBox(str(curCol))
# CurrentRow返回当前光标的行坐标。
curRow = crt.Screen.CurrentRow
crt.Dialog.MessageBox(str(curRow))
# Columns 返回当前屏幕的最大列宽
cols = crt.Screen.Columns
crt.Dialog.MessageBox(str(cols))
# Rows 返回当前屏幕的最大行宽
rows = crt.Screen.Rows
crt.Dialog.MessageBox(str(rows))
#IgnoreEscape 定义当使用WaitForString、WaitForStrings和ReadString这三个方法时是否获取Escape字符（特殊字符如回车）默认是会获取的
crt.Screen.IgnoreEscape = False
crt.Dialog.MessageBox(crt.Screen.ReadString(["\03"],5)) #获取ctrl+c
crt.Screen.IgnoreEscape = True
crt.Dialog.MessageBox(crt.Screen.ReadString(["\03"],2)) #不获取ctrl+c
# MatchIndex 定义当使用WaitForStrings和ReadString这三个方法时会根据参数的位置 获取返回值，从1开始计算，如果没有一个匹配则返回0.
outPut = crt.Screen.ReadString(["error","warning","#"],10)
index = crt.Screen.MatchIndex
if (index == 0):
crt.Dialog.MessageBox("Timed out!")
elif (index == 1):
crt.Dialog.MessageBox("Found 'error'")
elif (index == 2):
crt.Dialog.MessageBox("Found 'warning'")
elif (index == 3):
crt.Dialog.MessageBox("Found '#'")
# Synchronous 设置屏幕的同步属性。若设置为false，则在脚本中使用WaitForString、WaitForStrings、ReadString函数时可能存在丢失一部分数据的现象，设置为true后可能会存在屏幕卡顿的情况，默认为false
crt.Screen.Synchronous = True
crt.Screen.Send("\r\n")
crt.Screen.ReadString("#")
crt.Screen.Send("\r\n")
crt.Screen.WaitForString("#")
crt.Screen.Send("\r\n")
crt.Screen.WaitForStrings(["#",">"])
crt.Screen.Send("conf t\r\n")
# 方法
# Clear()清屏功能
# crt.Screen.Clear()
# get()按照坐标取出一个矩形框内的屏幕上的字符(即从某行某列开始到其它行其它列)，不包含字符串中的回车换行符，所以这个多用于获取无格式的光标处字符串或某小段特定区域字符串。
out = crt.Screen.Get(row1, col1, row2, col2)
crt.Dialog.MessageBox(out)
# get2()解释按照坐标取出一个矩形框内的屏幕上的字符(即从某行某列开始到其它行其它列)，包含字符串中的回车换行符，所以这个多用于获取大段带格式的字符串。
crt.Screen.Get2(row1, col1, row2, col2)
# IgnoreCase 使用全局参数设置控制在使用WaitForString、WaitForStrings和ReadString这三个函数时是否对大小写敏感，默认为false大小写字符串都会检查，设置为true时则不会检测大小写。
crt.Screen.IgnoreCase = True
crt.Screen.Send("show memory\r\n")
crt.Screen.WaitForString("more")
crt.Screen.Send("\r\n")
crt.Screen.WaitForStrings("more","#")
crt.Screen.Send("\r\n")
crt.Screen.ReadString("more","#")
# Send() 向远端设备或者屏幕发送字符串，当向屏幕发送字符串时需要指定第二个参数为Ture
crt.Screen.Send("show version\r\n")
crt.Screen.Send("\r\nhello,world!\r\n",True)
crt.Screen.IgnoreCase = True
while (crt.Screen.WaitForString("more",10)):
crt.Screen.Send("\r\n")
# SendKeys()向当前窗口发送按键，包含组合按键，比如可以发送类似"CTRL+ALT+C"等这样的组合键，这样写即可：crt.screen.sendkeys("^%c");这个功能需要语言本身支持，目前只有VBS和JS脚本可以使用。
# SendSpecial()可以发送特殊控制码，这个控制码是Crt内置的功能，具体可以包含的有Menu、Telnet、VT functions功能列表中提供的所有功能，
crt.Screen.SendSpecial("vT_HOLD_SCREEN")
# WaitForCursor()等待光标移动，当移动时返回值为true，当有超时时间参数且超时时返回false，否则会一直等待光标移动。利用这个功能可以用来判断一个命令的输出是否结束，
crt.Screen.WaitForCursor(5)
crt.Screen.Send("\r\nhello,world!\r\n",True)
if ( crt.Screen.WaitForCursor(5)):
crt.Screen.Send("show version\r\n")
# WaitForKey()检测有键盘按键时返回true，当有超时时间参数且超时时返回false，否则会一直等待按键
if (crt.Screen.WaitForKey(5)):
crt.Screen.Send("show version\r\n")
# WaitForString()一般用于发送命令后等待某字符串
# crt.Screen.WaitForString(string,[timeout],[bCaseInsensitive])
crt.Screen.WaitForString("#",10)
# WaitForStrings()与WaitForString是同样的功能，可以等待多个字符串
outPut = crt.Screen.WaitForStrings(["error","warning","#"],10)
index = crt.Screen.MatchIndex
if (index == 0):
crt.Dialog.MessageBox("Timed out!")
elif (index == 1):
crt.Dialog.MessageBox("Found 'error'")
elif (index == 2):
crt.Dialog.MessageBox("Found 'warning'")
elif (index == 3):
crt.Dialog.MessageBox("Found '#'")
# ReadString()与WaitForStrings功能类似，都是等待某几个字符出现，不同的是它还会读取字符串之前出现的所有字符。
crt.Screen.ReadString([string1,string2..],[timeout],[bCaseInsensitive])
1、string，必选参数，等待的字符串，最少有一个，可以是特殊字符比如:\r\n；
2、timeout，可选参数，超时时间，当检测不到对应字符串时会返回false，没有此参数时会一直等待；
3、bCaseInsensitive，可选参数，大小写不敏感，默认值是false，表示将检测字符串的大小写，当为true时不检测大小写。
# $language = "Python"
# $interface = "1.0"
# CurrentColumn返回当前光标的列坐标。
curCol = crt.Screen.CurrentColumn
crt.Dialog.MessageBox(str(curCol))
# CurrentRow返回当前光标的行坐标。
curRow = crt.Screen.CurrentRow
crt.Dialog.MessageBox(str(curRow))
# Columns 返回当前屏幕的最大列宽
cols = crt.Screen.Columns
crt.Dialog.MessageBox(str(cols))
# Rows 返回当前屏幕的最大行宽
rows = crt.Screen.Rows
crt.Dialog.MessageBox(str(rows))
#IgnoreEscape 定义当使用WaitForString、WaitForStrings和ReadString这三个方法时是否获取Escape字符（特殊字符如回车）默认是会获取的
crt.Screen.IgnoreEscape = False
crt.Dialog.MessageBox(crt.Screen.ReadString(["\03"],5)) #获取ctrl+c
crt.Screen.IgnoreEscape = True
crt.Dialog.MessageBox(crt.Screen.ReadString(["\03"],2)) #不获取ctrl+c
# MatchIndex 定义当使用WaitForStrings和ReadString这三个方法时会根据参数的位置 获取返回值，从1开始计算，如果没有一个匹配则返回0.
outPut = crt.Screen.ReadString(["error","warning","#"],10)
index = crt.Screen.MatchIndex
if (index == 0):
crt.Dialog.MessageBox("Timed out!")
elif (index == 1):
crt.Dialog.MessageBox("Found 'error'")
elif (index == 2):
crt.Dialog.MessageBox("Found 'warning'")
elif (index == 3):
crt.Dialog.MessageBox("Found '#'")
# Synchronous 设置屏幕的同步属性。若设置为false，则在脚本中使用WaitForString、WaitForStrings、ReadString函数时可能存在丢失一部分数据的现象，设置为true后可能会存在屏幕卡顿的情况，默认为false
crt.Screen.Synchronous = True
crt.Screen.Send("\r\n")
crt.Screen.ReadString("#")
crt.Screen.Send("\r\n")
crt.Screen.WaitForString("#")
crt.Screen.Send("\r\n")
crt.Screen.WaitForStrings(["#",">"])
crt.Screen.Send("conf t\r\n")
# 方法
# Clear()清屏功能
# crt.Screen.Clear()
# get()按照坐标取出一个矩形框内的屏幕上的字符(即从某行某列开始到其它行其它列)，不包含字符串中的回车换行符，所以这个多用于获取无格式的光标处字符串或某小段特定区域字符串。
out = crt.Screen.Get(row1, col1, row2, col2)
crt.Dialog.MessageBox(out)
# get2()解释按照坐标取出一个矩形框内的屏幕上的字符(即从某行某列开始到其它行其它列)，包含字符串中的回车换行符，所以这个多用于获取大段带格式的字符串。
crt.Screen.Get2(row1, col1, row2, col2)
# IgnoreCase 使用全局参数设置控制在使用WaitForString、WaitForStrings和ReadString这三个函数时是否对大小写敏感，默认为false大小写字符串都会检查，设置为true时则不会检测大小写。
crt.Screen.IgnoreCase = True
crt.Screen.Send("show memory\r\n")
crt.Screen.WaitForString("more")
crt.Screen.Send("\r\n")
crt.Screen.WaitForStrings("more","#")
crt.Screen.Send("\r\n")
crt.Screen.ReadString("more","#")
# Send() 向远端设备或者屏幕发送字符串，当向屏幕发送字符串时需要指定第二个参数为Ture
crt.Screen.Send("show version\r\n")
crt.Screen.Send("\r\nhello,world!\r\n",True)
crt.Screen.IgnoreCase = True
while (crt.Screen.WaitForString("more",10)):
crt.Screen.Send("\r\n")
# SendKeys()向当前窗口发送按键，包含组合按键，比如可以发送类似"CTRL+ALT+C"等这样的组合键，这样写即可：crt.screen.sendkeys("^%c");这个功能需要语言本身支持，目前只有VBS和JS脚本可以使用。
# SendSpecial()可以发送特殊控制码，这个控制码是Crt内置的功能，具体可以包含的有Menu、Telnet、VT functions功能列表中提供的所有功能，
crt.Screen.SendSpecial("vT_HOLD_SCREEN")
# WaitForCursor()等待光标移动，当移动时返回值为true，当有超时时间参数且超时时返回false，否则会一直等待光标移动。利用这个功能可以用来判断一个命令的输出是否结束，
crt.Screen.WaitForCursor(5)
crt.Screen.Send("\r\nhello,world!\r\n",True)
if ( crt.Screen.WaitForCursor(5)):
crt.Screen.Send("show version\r\n")
# WaitForKey()检测有键盘按键时返回true，当有超时时间参数且超时时返回false，否则会一直等待按键
if (crt.Screen.WaitForKey(5)):
crt.Screen.Send("show version\r\n")
# WaitForString()一般用于发送命令后等待某字符串
# crt.Screen.WaitForString(string,[timeout],[bCaseInsensitive])
crt.Screen.WaitForString("#",10)
# WaitForStrings()与WaitForString是同样的功能，可以等待多个字符串
outPut = crt.Screen.WaitForStrings(["error","warning","#"],10)
index = crt.Screen.MatchIndex
if (index == 0):
crt.Dialog.MessageBox("Timed out!")
elif (index == 1):
crt.Dialog.MessageBox("Found 'error'")
elif (index == 2):
crt.Dialog.MessageBox("Found 'warning'")
elif (index == 3):
crt.Dialog.MessageBox("Found '#'")
# ReadString()与WaitForStrings功能类似，都是等待某几个字符出现，不同的是它还会读取字符串之前出现的所有字符。
crt.Screen.ReadString([string1,string2..],[timeout],[bCaseInsensitive])
1、string，必选参数，等待的字符串，最少有一个，可以是特殊字符比如:\r\n；
2、timeout，可选参数，超时时间，当检测不到对应字符串时会返回false，没有此参数时会一直等待；
3、bCaseInsensitive，可选参数，大小写不敏感，默认值是false，表示将检测字符串的大小写，当为true时不检测大小写。SecureCrt脚本（一）顶级对象之Crt
1、引言
Crt脚本的实现需要使用Crt定义好的各个对象的属性和方法来实现，脚本函数系列将逐一介绍Crt脚本中最常使用的对象，对这些对象以层级关系画出，本篇首先介绍顶级对象。crt的属性和方法。属性是一个静态的对象，方法是具体执行的动作。属性和方法底下还可以有子属性和子方法，这个其实就和面向对象的编程方式很像，有些基础的人应该会很快掌握。
2、关于脚本表头
解释在学习脚本函数前，先说说在脚本中头两行(必须写在头两行，且最好不要有空格回车之类的字符)所必须添加的标识，这两行标识告诉Crt当前执行的脚本需要使用什么解释器进行解释。其中language为语言，现支持Jscript、VBScript、Python、Perl,interface为接口，现在都是1.0，以下为示例，修改对应的语言即可
代码
- JS
- python
1 # $language = "Python" 2 # $interface = "1.0"
3、顶级对象'crt'的子属性和方法
属性 方法 Dialog GetActiveTab Screen GetScriptTab ScriptFullName GetTabCount Session GetTab Version Quit Window Sleep
3.1、属性
3.1.1、Dialog
解释定义了一个Dialog(对话框),通过这个对象，可以通过调用该对象的子属性和方法实现对话框的相关功能。
代码
- JS
1 var diaObj = crt.Dialog;
3.1.2、Screen
解释定义Screen(屏幕)对象，该对象是整个脚本中的灵魂，包含数据抓取、数据发送、等待数据等等重要功能都是有该对象的子属性和方法实现的。
代码
- JS
var scrObj = crt.Screen;
3.1.3、ScriptFullName
解释该对象返回当前执行脚本的全名，其中包含脚本路径和脚本名,可以使用中文路径和文件名。
代码
- JS
var scrName = crt.ScriptFullName;
3.1.4、Session
解释定义当前会话属性，该属性有许多很实用的属性和方法可以使用。同样作为后重点关注
代码
- JS
var sessionObj = crt.Session;
3.1.5、Version
解释返回当前Crt的软件版本，通常该属性用于比较版本新旧，以处理在不同版本上不能兼容的问题。
代码
- JS
1 // 检查Crt版本，如果低于7.3，则退出Crt。 2 crtVer = crt.Version; 3 if ( crtVer < 7.3 ) { 4 crt.Quit(); 5 }
3.1.6、Window
解释返回当前程序的窗口对象，该对象下有子对象，可以实现诸如隐藏当前窗口等的功能。
代码
- JS
1 var crtWin = crt.Window;
3.2、方法
3.2.1、GetActiveTab()
解释Crt软件的管理是多Tab的，该方法返回当前活跃状态的Tab界面,该界面作为一个新的Tab属性使用，而Tab属性本身又有许多子属性和方法，因此该方法也是比较实用的一个函数。
代码
- JS
1 var actTab = crt.GetActiveTab();
3.2.2、GetScriptTab()
解释获取当前脚本执行的Tab对象，该对象有一些子对象和方法，通过获取Tab页面，可以轻松的实现在多个Tab中同时发送数据的功能。
代码
- JS
1 // 获取当前脚本执行的Tab，并获取编号(Index从1开始) 2 var scriptTab = crt.GetScriptTab(); 3 var tabNum = scriptTab.Index; 4 // 在当前Tab上发送数据 5 scriptTab.Screen.Send("脚本执行的Tab是："+tabNum);
3.2.3、GetTabCount()
解释获取当前总Tab数目，是一个数值类型返回值。
代码
- JS
1 // 获取总Tab数目 2 var tabCount = crt.GetTabCount();
3.2.4、GetTab(Index)
解释获取某个位置的Tab对象，该位置即为tab的Index，从1开始，即从当前Crt窗口的最左侧Tab数起。
代码
- JS
// 获取指定编号的Tab对象 var tabCount = crt.GetTabCount(); var gTab = ""; // 从Tab1到所有Tab依次发送数据 for ( var i = 1 ; i <= tabCount; i++ ) { gTab = crt.GetTab(i); gTab.Screen.Send("当前Tab为:"+i); }
3.2.5、Sleep(millisecond)
解释脚本暂停运行时间，millisecond：毫秒 该功能是极为常用的功能
代码
- JS
1 // 获取指定编号的Tab对象 2 var tabCount = crt.GetTabCount(); 3 var gTab = ""; 4 // 从Tab1到所有Tab依次发送数据 5 for ( var i = 1 ; i <= tabCount; i++ ) { 6 gTab = crt.GetTab(i); 7 // 暂停5秒再发送数据 8 crt.Sleep(5000); 9 gTab.Screen.Send("当前Tab为:"+i); 10 }
3.2.6、Quit()
解释退出Crt软件。（不是退出脚本，是直接退出软件。）
代码
JS
1 // 如果直接使用crt.Quit的话只要有会话是激活的，那么就会有弹窗出来，因此，可以使用for循环，先将所有Tab断连，再退出。 2 3 // 断连所有Tab 4 var tabCount = crt.GetTabCount(); 5 var gTab = ""; 6 for ( var i = 1 ; i <= tabCount; i++ ) { 7 gTab = crt.GetTab(i); 8 gTab.Session.Disconnect(); 9 } 10 // 此时可以直接退出Crt 11 crt.Quit()
总结
1. 在写脚本时一定要添加前言所述的脚本头部两行，且注意最好不要有空格和回车等。 2. crt的最常用最基本的二级属性和方法上面都已经介绍完了，总的一个应用原则是属性是静态的，在使用时不需要加()，而方法是动态的(实际上就是函数),因此在调用时需要用()，有些方法是有参数，有些是没有的，在使用时也要注意。 3. 希望通过本篇对二级属性和方法做一个全面的讲解，可以更清楚的知道crt函数中都有哪些具体的函数，哪些可能是重点，哪些可能最常用，以及如何使用这些函数，都可以根据上面的解释和脚本实现中获取相关信息。 4.但凡有子属性或子方法的二级属性和方法，都可以通过后面教程中的写法直接引入，不需要每次都赋值给一个对象使用。 5.希望各位看官可以从中学到些东西，本篇抛砖引玉就到此结束了。下一篇将会就二级属性'Dialog'做详细说明，敬请期待...
SecureCrt脚本（二）二级对象之Dialog
1、引言
上篇"SecureCrt 脚本函数（一）"中详细介绍了顶级对象’crt’中的子属性和子方法，本篇中将详细介绍’crt’的子属性’Dialog’的方法。'Dialog’主要是用于Crt构建自己的和用户能够交互的简单界面，比如输入字符，弹出对话框，输出提示框等。
2、Dialog属性和方法
属性 方法 FileOpenDialog MessageBox Prompt
2.1、属性
Dialog暂无属性
2.2、方法
2.2.1、FileOpenDialog
解释定义了一个Dialog(对话框),通过这个对象，可以通过调用该对象的子属性和方法实现对话框的相关功能。
语法crt.Dialog.Method([arglist])
代码参数： （1）title:弹窗最上面的标题文字，见运行结果中窗口最上面的"请选择一个文件"。 （2）buttonLabel:见下图中的"Open"按钮，即打开文件用的，至于名称可以使用"Open"或者"打开"均可。 （3）defaultFilename:默认文件名，如下，在弹窗的"文件名"中默认有"a.log"。注意：当有默认文件名时即使当前文件夹中没有该文件，在点击"打开"按钮后，结果依然会返回该文件的当前目录的绝对路径。 （4）filter:用于过滤文件类型,见脚本举例中的格式，"Log Files (*.log)|*.log，| 的前半部分是一串提示符，会显示在运行结果中的"文件类型"中，后半部分是正则表达式，用于过滤以.log结尾的所有文件。
- JS
1 filePath = crt.Dialog.FileOpenDialog("请选择一个文件", "Open", "a.log", "Log Files (*.log)|*.log")运行结果
2.2.2、MessageBox
解释弹出一个消息框，可以定义按钮，使用按钮和文本消息来实现和用户的简单对话。
语法crt.Dialog.MessageBox(message [, title [icon|buttons]])
代码参数: （1）message:消息文字,必选参数，见运行结果中的消息正文。 （2）title:弹窗的标题描述，见运行结果中的标题处。 （3）icon:警示图标，见结果中的图1到图4。icon的取值有：16(叉号，表示错误)，32(问号，表示确认)，48(叹号，表示警告)，64(提示，表示信息提示) （4）buttons:按钮类型，定义不同的类型，可以有不同的选项，同时鼠标点击不同的选项时也有不同的返回值。button取值范围为0到6, --0：见图5，点击后返回值为1； --1：见图6，点击'确定'时，返回1，点击'取消'时返回2； --2：见图7，点击'终止'时，返回3，点击'重试'时返回4，点击'忽略'时返回5； --3：见图8，点击'是'时，返回6，点击'否'时，返回7，点击'取消'时返回2； --4：见图9，点击'是'时，返回6，点击'否'时，返回7； --5：见图10，点击'重试'时，返回4，点击'取消'时返回2； --6：见图11，点击'取消'时，返回2，点击'重试'时，返回10，点击'继续'，返回11；
- JS
运行结果：图1：icon=161 crt.Dialog.MessageBox("这里是消息框正文","这里是标题",16|0)运行结果：图2：icon=32
运行结果：图3：icon=48
运行结果：图4：icon=64
运行结果：图5：button=0
运行结果：图6：button=1
运行结果：图7：button=2
运行结果：图8：button=3
运行结果：图9：button=4
运行结果：图10：button=5
运行结果：图11：button=6
2.2.3、Prompt
解释弹出一个输入框，用户可以填写文字，比如填写文件名，填写路径，填写IP地址等。
语法crt.Dialog.Prompt(message [, title [, default [, isPassword ]]])
代码参数: （1）message:消息文字,必选参数，见运行结果中的消息正文。 （2）title:弹窗的标题描述，见运行结果中的标题处。 （3）default:输入框中的默认值，如果为""，则没有默认值。 （4）isPassword:是否要隐藏输入的文字，类似于日常输入密码时显示**** (5) 运行结果如下图1，如果点击'ok'，返回输入的字符串，否则返回""
- JS
运行结果1 password = crt.Dialog.Prompt("这里是正文","这里是弹窗标题","这是默认值",true)
3、总结
以上就是Dialog这个二级属性的所有方法了，对于有和用户有交互需求的地方就可以使用以上几个方法，不过也要注意，虽然这个方法很炫很好看，但是如果过多的使用这些方法，只会适得其反。最后祝大家都能够学会这些方法，其实Dialog这个方法也可以更多的用于调试代码，就和JS中的console.log的功能是一样的，工具很好，学会了运用就能产生很好的效果。
SecureCrt脚本（三）二级对象之Screen详解
1、引言
本节开始讲解Crt脚本中最常用，也是功能最强大的二级对象Screen的属性和方法，凡是需要和远程设备进行交互的部分都是需要使用Screen对象的属性或方法的，因此本节将是重点。
2、Screen属性和方法
属性 方法 CurrentColumn Clear CurrentRow Get Columns Get2 Rows IgnoreCase IgnoreEscape Send MatchIndex SendKeys Synchronous SendSpecial WaitForCursor WaitForKey WaitForString WaitForStrings ReadString
2.1、属性
2.1.1、CurrentColumn
解释返回当前光标处的列坐标，如下图所示的下面显示的数字"9"就是当前光标位于第9列。
语法crt.Screen.CurrentColumn
代码
- JS
1 # $language = "JScript" 2 # $interface = "1.0" 3 4 var curCol = crt.Screen.CurrentColumn; 5 crt.Dialog.MessageBox(curCol);
2.1.2、CurrentRow
解释返回当前光标处的行坐标，如下图所示的下面显示的数字"35"就是当前光标位于第35行。但这个功能有个问题就是当满屏输出后这个值一直表示最大值，等同于底下要讲的子属性四：Rows的值。
语法
crt.Screen.CurrentRow
代码
- JS
1 # $language = "JScript" 2 # $interface = "1.0" 3 4 var curRow = crt.Screen.CurrentRow; 5 crt.Dialog.MessageBox(curRow);
2.1.3、Columns
解释返回当前屏幕的最大列宽。
语法crt.Screen.Columns
代码
- JS
1 # $language = "JScript" 2 # $interface = "1.0" 3 4 var cols = crt.Screen.Columns; 5 crt.Dialog.MessageBox(cols);
2.1.4、Rows
解释返回当前屏幕的最大行宽，这个行宽指的是可见区的，并不是指缓冲区的行宽
语法crt.Screen.Rows
代码
- JS
1 # $language = "JScript" 2 # $interface = "1.0" 3 4 var rows = crt.Screen.Rows; 5 crt.Dialog.MessageBox(rows);
2.1.5、IgnoreEscape
解释定义当使用WaitForString、WaitForStrings 和 ReadString这三个方法时是否获取Escape字符(也就是特殊控制字符，如"\n")，默认是会获取的。
语法crt.Screen.IgnoreEscape [ = True | False ]
参数：
true|false：当设置为true时不会获取特殊字符，为false时会获取，默认为false。
代码
- JS
1 # $language = "JScript" 2 # $interface = "1.0" 3 4 // 设置false，获取ctrl+c 5 crt.Screen.IgnoreEscape = false; 6 crt.Dialog.MessageBox(crt.Screen.ReadString("\03")); 7 8 // 设置true，不获取ctrl+c 9 crt.Screen.IgnoreEscape = true; 10 crt.Dialog.MessageBox(crt.Screen.ReadString("\03"));
2.1.6、MatchIndex
解释当使用WaitForStrings 和 ReadString这两个方法获取字符串时，会根据参数的位置获取返回值，而MatchIndex就是这个位置，从1开始计算，如果没有一个匹配到则返回0，可以根据下面的例子来看。
语法crt.Screen.MatchIndex
代码
- JS
2.1.7、Synchronous
解释设置屏幕的同步属性，关于该属性需要谨慎对待，若设置为false，则在脚本中使用WaitForString、WaitForStrings或ReadString函数时可能存在丢失一部分数据的现象，而设置为true时不会，但是设置为true后可能会存在屏幕卡顿的情况，出现这两种现象的原因应该是和这几个函数以及打印字符到Screen的机制有关系，具体内部原因不明，就具体使用而言，如果是跑脚本的话最好还是不要设置为true，大量的卡顿看着就会蛋疼了，还可能会造成CRT卡死。
语法crt.Screen.Synchronous [ = True | False ]
参数：
true|false ：默认为false
代码
- JS
2.2、方法
2.2.1、Clear()
解释清屏功能
效果类似下面这个屏幕：
语法
crt.Screen.Clear()
代码
- JS
2.2.2、get()
解释按照坐标取出一个矩形框内的屏幕上的字符(即从某行某列开始到其它行其它列)，不包含字符串中的回车换行符，所以这个多用于获取无格式的光标处字符串或某小段特定区域字符串。
语法crt.Screen.Get(row1, col1, row2, col2)
代码
- JS
这段代码获取的是(31,50,31,56)这个矩阵内的字符串，即下图中红色框中所示的7483052。
2.2.3、get2()
解释按照坐标取出一个矩形框内的屏幕上的字符(即从某行某列开始到其它行其它列)，包含字符串中的回车换行符，所以这个多用于获取大段带格式的字符串。
语法crt.Screen.Get2(row1, col1, row2, col2)
代码
- JS
这段代码获取的是(29,1,35,20)这个矩阵内的所有带回车换行的字符串，即下图中红色框中文字。
2.2.4、IgnoreCase()
解释使用全局参数设置控制在使用WaitForString、WaitForStrings和ReadString这三个函数时是否对大小写敏感，默认为false指大小写敏感即大小写字符串都会检查，设置为true时则不会检测大小写。
语法crt.Screen.IgnoreCase
请注意，语法中并没有带()，根据语法来看，这个不像是方法，但是在CRT的使用说明中标注为了方法而不是属性，且在python的脚本中是当做方法使用的，因此这里先归类为方法，但是在JS脚本中是不带()使用的。代码
- JS
2.2.5、Send()
解释向远端设备或者向屏幕(向屏幕发送的功能是CRT7.2以后版本才提供的)发送字符串。如语法中所表示的，string是待发送的字符串，这个字符串可以包含转码字符比如"\r","\n","\03"(ctrl+c)，当向屏幕上发送字符串时需要指定第二个参数为true。有了向屏幕发送字符串的功能，我们就可以很方便的和用户进行交互了。可以打印出一些我们需要的报错信息之类的。
语法crt.Screen.Send(string, [, bSendToScreenOnly])
代码
- JS
可是运行了这段代码后很可能会发现，底下的向屏幕发送的字符串先打印到屏幕上了，效果如下，原因是Crt发送到屏幕的字符串可能先于远程设备返回的字符串，因此会先打印下面的。解决办法就是可以在发送屏幕的这一段前面加一个延时，这样就不会先打印下面的了。
2.2.6、SendKeys()
解释向当前窗口发送按键，包含组合按键，比如可以发送类似"CTRL+ALT+C"等这样的组合键，这样写即可：
crt.screen.sendkeys("^%c");这个功能需要语言本身支持，目前只有VBS和JS脚本可以使用，Python和Perl都不可以。
语法crt.Screen.SendKeys(string)
代码
- JS
具体可以有哪些按键，参照下表，修改对应参数即可，可以根据需要自由组合：
Key(按键)
Argument(参数)
SHIFT
+
CTRL
^
ALT
%
BACKSPACE
{BACKSPACE}, {BS}, or {BKSP}
BREAK
{BREAK}
CAPS LOCK
{CAPSLOCK}
DEL or DELETE
{DELETE} or {DEL}
DOWN ARROW
{DOWN}
END
{END}
ENTER
{ENTER} or ~
ESC
{ESC}
HELP
{HELP}
HOME
{HOME}
INS or INSERT
{INSERT} or {INS}
LEFT ARROW
{LEFT}
NUM LOCK
{NUMLOCK}
PAGE DOWN
{PGDN}
PAGE UP
{PGUP}
PRINT SCREEN
{PRTSC}
RIGHT ARROW
{RIGHT}
SCROLL LOCK
{SCROLLLOCK}
TAB
{TAB}
UP ARROW
{UP}
F1, F2, ... F16
{F1}, {F2}, ... {F16}
0, 1, ... 9 on number pad
{NUM_0}, {NUM_1}, ... {NUM_9}
. on number pad
{NUM_.}
/ on number pad
{NUM_/}
* on number pad
{NUM_*}
- on number pad
{NUM_-}
+ on number pad
{NUM_+}
ENTER on number pad
{NUM_ENTER}
HOME on number pad
{NUM_HOME}
PAGE UP on number pad
{NUM_PGUP}
END on number pad
{NUM_END}
PAGE DOWN on number pad
{NUM_PGDN}
UP ARROW on number pad
{NUM_UP}
DOWN ARROW on number pad
{NUM_DOWN}
LEFT ARROW on number pad
{NUM_LEFT}
RIGHT ARROW on number pad
{NUM_RIGHT}
2.2.7、SendSpecial()
解释可以发送特殊控制码，这个控制码是Crt内置的功能，具体可以包含的有Menu、Telnet、VT functions功能列表中提供的所有功能，即下图中的这些，有兴趣可以调出new button后看到这些:
Menu Function:
Telnet:
VT functions:
语法
crt.Screen.SendSpecial(string)
代码
- JS
1 # $language = "JScript" 2 # $interface = "1.0" 3 // 以下是Crt文档中举的例子，具体还有什么我也没有试过，各位可以自己试试 4 crt.screen.SendSpecial("MENU_PASTE"); 5 crt.screen.SendSpecial("TN_BREAK"); 6 crt.screen.SendSpecial("VT_PF1");
2.2.8、WaitForCursor()
解释等待光标移动，当移动时返回值为true，当有超时时间参数且超时时返回false，否则会一直等待光标移动。利用这个功能可以用来判断一个命令的输出是否结束，只不过超时时间是以秒为单位的，对于脚本当中，这个时间还是略显久了。
语法crt.Screen.WaitForCursor([timeout])
代码
- JS
1 # $language = "JScript" 2 # $interface = "1.0" 3 4 // 每5秒内光标有移动时即发送一个命令 5 while (1) { 6 if ( crt.Screen.WaitForCursor(5) ) { 7 crt.Screen.Send("show version\r\n"); 8 } 9 }
2.2.9、WaitForKey()
解释检测有键盘按键时返回true，当有超时时间参数且超时时返回false，否则会一直等待按键。只可惜这个函数不知道输入的键是什么，否则就可以针对性的判断了，它只能检测到有输入而已。
语法crt.Screen.WaitForKey([timeout])
代码
- JS
1 # $language = "JScript" 2 # $interface = "1.0" 3 4 // 每5秒内有输入时发送一个命令 5 while (1) { 6 if ( crt.Screen.WaitForKey(5) ) { 7 crt.Screen.Send("show version\r\n"); 8 } 9 }
2.2.10、WaitForString()
解释一般用于发送命令后等待某字符串，这个字符串只要是屏幕上出现的即可，哪怕是粘贴上去的命令也会同样被检测到，也可以用于等待屏幕的输出打印，不需要先发送命令。不过一般我们使用它来检测的都是发送命令后出现的标识符。
语法crt.Screen.WaitForString(string,[timeout],[bCaseInsensitive])
参数：
1、string，必选参数，等待的字符串，可以是特殊字符比如:\r\n；
2、timeout，可选参数，超时时间，当检测不到对应字符串时会返回false，没有此参数时会一直等待；
3、bCaseInsensitive，可选参数，大小写不敏感，默认值是false，表示将检测字符串的大小写，当为true时不检测大小写。
代码
- JS
1 # $language = "JScript" 2 # $interface = "1.0" 3 4 // 发送命令，并在5秒内获取到对应的字符串后发送一条命令 5 crt.Screen.Send("\r\n"); 6 if ( crt.Screen.WaitForString("#",5) ) { 7 crt.Screen.Send("show version\r\n"); 8 } 9 crt.Screen.Send("\r\n"); 10 if ( crt.Screen.WaitForString(">",5) ) { 11 crt.Screen.Send("who\r\n"); 12 } 13 crt.Screen.Send("\r\n"); 14 if ( crt.Screen.WaitForString("$",5) ) { 15 crt.Screen.Send("ls -l\r\n"); 16 }
2.2.11、WaitForStrings()
解释和WaitForString是同样的功能，只不过可以等待多个字符串，如果有匹配到某个字符串，则返回值该字符串在这些字符串中的位置，位置值从1开始。若在超时时间内没有匹配到则返回false，没有超时时间时会一直等待。
语法crt.Screen.WaitForStrings([string1,string2..],[timeout],[bCaseInsensitive])
参数：
1、string，必选参数，等待的字符串，最少有一个，可以是特殊字符比如:\r\n；
2、timeout，可选参数，超时时间，当检测不到对应字符串时会返回false，没有此参数时会一直等待；
3、bCaseInsensitive，可选参数，大小写不敏感，默认值是false，表示将检测字符串的大小写，当为true时不检测大小写。
代码
- JS
1 # $language = "JScript" 2 # $interface = "1.0" 3 4 var outPut = crt.Screen.WaitForStrings("error", "warning", "#", 10); 5 var waitIndex = crt.Screen.MatchIndex 6 switch (waitIndex) { 7 case 0: 8 crt.Dialog.MessageBox("Timed out!") 9 break; 10 case 1: 11 crt.Dialog.MessageBox("Found 'error'") 12 break; 13 case 2: 14 crt.Dialog.MessageBox("Found 'warning'") 15 break; 16 case 3: 17 crt.Dialog.MessageBox("Found '#'") 18 break; 19 }上面也用到了crt.Screen.MatchIndex功能，具体可以见上面的2.1.6节。
2.2.12、ReadString()
解释这个功能和上面的WaitForStrings函数有些类似，都是等待某几个字符串出现，不过不同的是，ReadString函数还会读取字符串之前的所有出现的字符，这个功能可以很方便的用于发送一个命令后获取这个命令的输出结果，不过这个函数也不是特别稳定，因为很可能存在命令的输出结果很快，而屏幕又没有捕捉到时，要么会由于超时而返回false，要么会一直等待，最终返回的都是空值，因此完全依靠该函数获取命令的输出的话并不是很把稳(如果程序对于稳定性要求很高的话，那么最好还是不要依赖这个函数。)
语法crt.Screen.ReadString([string1,string2..],[timeout],[bCaseInsensitive])
参数：
1、string，必选参数，等待的字符串，最少有一个，可以是特殊字符比如:\r\n；
2、timeout，可选参数，超时时间，当检测不到对应字符串时会返回false，没有此参数时会一直等待；
3、bCaseInsensitive，可选参数，大小写不敏感，默认值是false，表示将检测字符串的大小写，当为true时不检测大小写。
代码
- JS
1 # $language = "JScript" 2 # $interface = "1.0" 3 4 // 发送命令并根据提示符获取命令的输出。 5 crt.Screen.Send("show version\r\n"); 6 crt.Screen.WaitForString("show version",2); 7 var outPut = crt.Screen.ReadString("error", "warning", "#", 10); 8 var waitIndex = crt.Screen.MatchIndex 9 switch (waitIndex) { 10 case 0: 11 crt.Dialog.MessageBox("Timed out!") 12 break; 13 case 1: 14 crt.Dialog.MessageBox("Found 'error'") 15 break; 16 case 2: 17 crt.Dialog.MessageBox("Found 'warning'") 18 break; 19 case 3: 20 crt.Dialog.MessageBox("命令的输出时:"+outPut); 21 break; 22 }在这个举例中的第6行可以看到还使用了WaitForString，为什么要使用这个，有两个方面原因，一是确定命令已经被发送到了远端设备，二是确保命令的输出结果中没有改命令，而仅仅是该命令的输出结果。
3、总结
以上就是Screen这个二级属性的所有子属性和子方法了，这里面的功能都是CRT系列中最最重要的功能，也是最常用的功能，大家可以平时在写脚本时多琢磨这些函数的用法和奇妙之处。
