Set IE = Createobject ("InternetExplorer.Application")
IE.visible = True
StartURL = Environment.Value("Url")
IE.navigate StartURL

 If  left(A,5) = "**********" and right(A,5) = "*********"Then
  Reporter.ReportEvent micPass,"******",A

 Else
  Reporter.ReportEvent micFail,"******",A
 End If

Window("记事本").Activate

set Wshshell = CreateObject("Wscrīpt.Shell")

Wshshell.Sendkeys "abc"

Wshshell.Sendkeys "{a}"

Wshshell.Sendkeys  "{BACKSPACE}"

Wshshell.Sendkeys "{F1}"

Wshshell.Sendkeys  "{ENTER}"

 

Abs(number) 取得数值的绝对值。  
Asc(String) 取得字符串表达式的第一个字符ASCII 码。  
Atn(number) 取得一个角度的反正切值。  
CallByName (object, procname, usecalltype,[args()]) 执行一个对象的方法、设定或传回对象的属性。  
CBool(expression) 转换表达式为Boolean 型态。  
CByte(expression) 转换表达式为Byte 型态。  
CChar(expression) 转换表达式为字符型态。  
CDate(expression) 转换表达式为Date 型态。  
CDbl(expression) 转换表达式为Double 型态。  
CDec(expression) 转换表达式为Decimal 型态。  
CInt(expression) 转换表达式为Integer 型态。  
CLng(expression) 转换表达式为Long 型态。  
CObj(expression) 转换表达式为Object 型态。  
CShort(expression) 转换表达式为Short 型态。  
CSng(expression) 转换表达式为Single 型态。  
CStr(expression) 转换表达式为String 型态。  
Choose (index, choice-1[, choice-2, ... [, choice-n]]) 以索引值来选择并传回所设定的参数。  
Chr(charcode) 以ASCII 码来取得字符内容。  
Close(filenumberlist) 结束使用Open 开启的档案。  
Cos(number) 取得一个角度的余弦值。  
Ctype(expression, typename) 转换表达式的型态。  
DateAdd(dateinterval, number, datetime) 对日期或时间作加减。  
DateDiff(dateinterval, date1, date2) 计算两个日期或时间间的差值。  
DatePart (dateinterval, date) 依接收的日期或时间参数传回年、月、日或时间。  
DateSerial(year, month, day) 将接收的参数合并为一个只有日期的Date 型态的数据。  
DateValue(datetime) 取得符合国别设定样式的日期值，并包含时间。 
Day(datetime) 依接收的日期参数传回日。  
Eof(filenumber) 当抵达一个被开启的档案结尾时会传回True。  
Exp(number) 依接收的参数传回e 的次方值。  
FileDateTime(pathname) 传回档案建立时的日期、时间。  
FileLen(pathname) 传回档案的长度，单位是Byte。  
Filter(sourcearray, match[, include[, compare]])  搜寻字符串数组中的指定字符串，凡是数组元素中含有指定字符串，会将它们结合成新的字符串数组并传回。若是要传回不含指定字符串的数组元素，则 include 参数设为False。compare 参数则是设定搜寻时是否区分大小写，此时只要给TextCompare 常数或1 即可。  
Fix(number) 去掉参数的小数部分并传回。  
Format(expression[, style[, firstdayofweek[, firstweekofyear]]]) 将日期、时间和数值资料转为每个国家都可以接受的格式。  
FormatCurrency(expression[,numdigitsafterdecimal [,includeleadingdigit]]) 将数值输出为金额型态。numdigitsafterdecimal 参数为小数字数，includeleadingdigit 参数为当整数为0 时是否补至整数字数。  
FormatDateTime(date[,namedformat]) 传回格式化的日期或时间数据。  
FormatNumber(expression[,numdigitsafterdecimal [,includeleadingdigit]]) 传回格式化的数值数据。Numdigitsafterdecimal 参数为小数字数，includeleadingdigit 参数为当整数为0 时是否补至整数字数。  
FormatPercent(expression[,numdigitsafterdecimal [,includeleadingdigit]]) 传回转换为百分比格式的数值数据。numdigitsafterdecimal 参数为小数字数,includeleadingdigit 参数为当整数为0 时是否补至整数字数。  
GetAttr(filename) 传回档案或目录的属性值。  
Hex(number) 将数值参数转换为16 进制值。
Hour(time) 传回时间的小时字段，型态是Integer。  
Iif(expression, truepart, falsepart) 当表达式的传回值为True 时执行truepart 字段的程序，反之则执行falsepart 字段。  
InStr([start, ]string1, string2) 搜寻string2 参数设定的字符出现在字符串的第几个字符，start 为由第几个字符开始寻找，string1 为欲搜寻的字符串，string2 为欲搜寻的字符。  
Int(number) 传回小于或等于接收参数的最大整数值。  
IsArray(varname) 判断一个变量是否为数组型态，若为数组则传回True，反之则为False。 
IsDate(expression) 判断表达式内容是否为DateTime 型态，若是则传回True，反之则为False。  
IsDbNull(expression) 判断表达式内容是否为Null，若是则传回True，反之则为False。  
IsNumeric(expression) 判断表达式内容是否为数值型态，若是则传回True，反之则为False。  
Join(sourcearray[, delimiter]) 将字符串数组合并唯一个字符串，delimiter 参数是设定在各个元素间加入新的字符串。  
Lcase(string) 将字符串转换为小写字体。  
Left(string, length) 由字符串左边开始取得length 参数设定长度的字符。  
Len(string) 取得字符串的长度。  
Log(number) 取得数值的自然对数。  
Ltrim(string) 去掉字符串的左边空白部分。  
Mid(string, start[, length]) 取出字符串中strat 参数设定的字符后length 长度的字符串，若length 参数没有设定，则取回start 以后全部的字符。  
Minute(time) 取得时间内容的分部分，型态为Integer。  
MkDir(path) 建立一个新的目录。  
Month(date) 取得日期的月部分，型态为Integer。 
MonthName(month) 依接收的月份数值取得该月份的完整写法。  
Now() 取得目前的日期和时间。  
Oct(number) 将数值参数转换为8 进制值。  
Replace(expression, find, replace) 将字符串中find 参数指定的字符串转换为replace 参数指定的字符串。  
Right(string,length) 由字符串右边开始取得length 参数设定长度的字符。  
RmDir(path) 移除一个空的目录。  
Rnd() 取得介于0 到1 之间的小数，如果每次都要取得不同的值，使用前需加上Randomize 叙述。  
Rtrim(string) 去掉字符串的右边空白部分。  
Second(time) 取得时间内容的秒部分，型态为Integer。  
Sign(number) 取得数值内容是正数或负数，正数传回1，负数传回-1，0 传回0。  
Sin(number) 取得一个角度的正弦值。  
Space(number) 取得number 参数设定的空白字符串。 
Split(expression[, delimiter]) 以delimiter 参数设定的条件字符

 

 

 

 

Abs 函数：返回数的绝对值。  
Array函数：返回含有数组的变体。 
Asc 函数：返回字符串首字母的 ANSI 字符码。
Atn 函数：返回数值的反正切。  
CBool函数：返回已被转换为 Boolean 子类型的变体的表达式。  
CByte函数：返回已被转换为字节子类型的变体的表达式。  
CCur 函数：返回已被转换为货币子类型的变体的表达式。  
CDate函数：返回已被转换为日期子类型的变体的表达式。  
CDbl函数：返回已被转换为双精度子类型的变体的表达式。  
Chr 函数：返回与指定的 ANSI 字符码相关的字符。  
CInt 函数：返回已被转换为整形子类型的变体的表达式。  
CLng 函数；返回已被转换为Long子类型的变体的表达式。  
Cos 函数：返回角度的余弦。   C
reateObject函数：创建并返回对“自动”对象的引用。
CSng函数：返回已被转换为单精度子类型的变体的表达式。
CStr函数：返回已被转换为字符串子类型的变体的表达式。
Date函数：返回当前系统日期。
DateAdd 函数：返回的日期已经加上了指定的时间间隔。
DateDiff 函数：返回两个日期之间的间隔。
DatePart 函数：返回给定日期的指定部分。
DateSerial函数：返回指定年月日的日期子类型的变体。
DateValue 函数：返回日期子类型的变体。
Day 函数：返回日期，取值范围为 1 至 31。
Eval 函数：计算表达式并返回结果。
Exp 函数：返回 e （自然对数的底） 的多少次方。
Filter函数：根据指定的筛选条件,返回含有字符串数组子集的、下限为 0 的数组。
Fix 函数：返回数的整数部分。
FormatCurrency 函数：返回的表达式为货币值格式，其货币符号采用系统控制面板中定义的。
FormatDateTime 函数：返回的表达式为日期和时间格式。
FormatNumber 函数：返回的表达式为数字格式。
FormatPercent 函数：返回的表达式为百分数（乘以 100）格式，后面有 % 符号。
GetObject 函数：返回从文件对“自动”对象的引用。
GetRef 函数：返回对能够绑定到一事件的过程的引用。
Hex 函数：返回一字符串，代表一个数的十六进制值。
Hour函数：返回表示钟点的数字，取值范围为 0 至 23。
InputBox函数：在对话框中显式一提示，等待用户输入文本或单击按钮，并返回文本框的内容。
InStr函数：返回一个字符串在另一个字符串中首次出现的位置。
InStrRev函数；返回一个字符串在另一个字符串中出现的位置，但是从字符串的尾部算起。

某些自动化脚本在开发过程中多次打开,关闭数据库会造成脚本的管理不方便,我建议大家可以使用下面的方法实现连接数据库.

 

其中在自定义的Environment中添加Environment.Value ("conndb"),以及Environment.Value ("SQL1"), Environment.Value ("SQL2")

 

其中Environment.Value ("conndb")= "DSN=ORACLE;UID=****;PWD=***;SERVER=****"

Environment.Value ("SQL1")="SELECT * from ***"

Environment.Value ("SQL2")="SELECT * from ***"

Environment.Value ("SQL3")="SELECT * from ***"

 在脚本中实现以下scrīpt:

Set ADODB = CreateObject("ADODB.Connection")

Set ADOREC = CreateObject("ADODB.RecordSet")

 ADODB.Open Environment.Value ("conndb")

 Set ADOREC = ADODB.Execute (Environment.Value("SQL1"))

 Reporter.ReportEvent micDone,"field1",ADOREC.Fields(0).value

 Set ADOREC2 = ADODB.Execute (Environment.Value("SQL2"))

 Reporter.ReportEvent micDone,"field1",ADOREC.Fields(0).value

 ……

 ADOREC.MoveNext

'Wend

ADOREC.close

ADODB.Close

Set ADOREC = Nothing

Set ADODB = Nothing

目录结构

组件描述

A  数据访问组件:

在自动化执行期间一共有2种输入数据:

1. 测试参数数据

2. 业务场景流程数据

从模板中我们可以看出输入数据,自动化测试框架可以为没有自动化测试技术的人员,包括业务人员提供适当的测试用例,可使用的功能模块。所有一起都是通过用户业务数据场景流程控制。在这个功能矩阵里面,自动化测试脚本将按照一定的顺序执行测试用例。

 

B  驱动脚本(Driver scrīpt):

驱动脚本是单个主要的脚本,它可以反复的按照一定顺序调用业务数据和可重复使用脚本。也可以通过数据表中的参数定义执行可重复使用脚本次数。

 

C  库(Reusable Library):

在QTP里开发，要真正做到脚本分层复用、减少冗余的程度，自己组织脚本结。我们基于功能性创建了可重复使用脚本,也有基于单个功能创建的脚本以适应不同的测试用例测试他们不同的功能需求来调用。作为单个脚本被使用多次,我们建立了一个储藏库以储存所有的可重复使用脚本以方便在驱动脚本中调用。

 

D  支持程序(Function):

这些是独立于程序的可重复使用程序,可以包括链接数据库,数据操作,自动发送邮件,更新数据库,等等应用程序。

自动化测试框架与自动化脚本整合在一起，并且实现有效的管理，测试团队可以通过自动化测试框架管理自动化可以提高对业务流程的操作。

自动化测试框架与自动化脚本整合关联如下图所示：