Web测试工具对比--自动化软件测试二

【IT168 技术文章】

    扩展性评测，大家知道测试软件中，数据至关重要。如登陆测试中，需要验证所有用户是否可以成功登录。用手工测试工作量太大，利用测试工具脚本的强大功能，就可以减少工作量.对任意用户进行登陆测试，脚本从用户文件中读取数据，每次测试人员需要测试新的用户，只要添加用户到用户列表中，就可以自动测试新用户登陆是否成功。

    1. Winrunner

    设计user.txt文本格式：用户<kTab>密码<kReturn>

    如： admin<kTab>jetspeed<kReturn>

    脚本如下：

web_browser_invoke(IE,"http://192.168.1.42");
win_max("Browser main Window");
//打开文件

file_open("F:\\user.txt",FO_MODE_READ);
//读取文件数据，填写用户名，密码
while(file_getline("F:\\user.txt",line)==0)
{
win_mouse_click ("html_frame_2", 402, 36);
win_type("html_frame_2",line);
win_mouse_click ("html_frame_2", 566, 33);
}
file_close("F:\\user.txt");

    备注：由于winrunner脚本为语言为c，所以注意c语言特性，对于特殊字符需要利用转义字符“\”, file_open("F:\\user.txt",FO_MODE_READ)，这里f:\user.txt,就需要加转义字符。

    2. Robot

    设计user.txt文本格式：用户 密码

    如：admin jetspeed

    脚本如下：

Sub Main
Dim Result As Integer

Dim Temp as String

dim FileNumber as integer

Dim iPos as integer

Dim UserName as string

Dim pw as string

'Initially Recorded: 2003-12-22 17:07:58

'Script Name: Demo

StartBrowser "http://192.168.1.42", "WindowTag=WEBBrowser"

Window SetContext, "WindowTag=WEBBrowser", ""

Browser NewPage,"HTMLTitle=Dynaweb EPS 2003企业门户服务器",""'

FileNumber = FreeFile

//循环读取文件中数据，登陆

//自读形式 打开文件

Open "f:\user.txt" For Input As #FileNumber

Do While Not EOF(1)

// 读取数据，进行处理

Line Input #FileNumber, Temp

iPos = InStr(1,Temp," ")

//提取用户名

UserName = left(Temp,iPos-1)

//提取密码

pw = Right(Temp,len(Temp)-6)

//找到用户，密码文本框，填写用户名，密码

EditBox Click, "Name=username", "Coords=35,12"

Inputkeys UserName

EditBox Click, "Name=password", "Coords=15,8"

inputkeys pw

//提交数据，退出当前用户

PushButton Click, "Name=submit"

Browser NewPage,"HTMLTitle=Dynaweb EPS 2003企业门户服务器",""

HTMLImage Click, "Index=7", "Coords=11,7"

Loop

Close #FileNumber

//关闭IeWindow CloseWin, "", ""

End Sub