pingguo109 发表于 2011-3-11 14:27:56

系统登录测试脚本——系统成功登录后怎么办

测试用例
用例编号        前置条件                            测试步骤、输入数据               预期结果       
1        用户名、密码为空                      点击【登录】，无            弹出提示窗口                                   
2        输入用户名、密码为空                   点击【登录】，test1,空        弹出提示窗口       
3        输入错误的用户名、密码        点击【登录】，testt，testt          弹出提示窗口       
4        输入正确的用户名，错误的密码        点击【登录】，test1, testt        弹出提示窗口       
5        输入正确的用户名、密码        点击【登录】，test1,1        正确登录系统界面       

'出现错误忽略，继续执行
On Error Resume NEXT

Setting.WebPackage("ReplayType") = 1
DataTable.GetSheet ("Action1").SetCurrentRow(1)
Do
Browser("系统登录").Page("系统登录").WebEdit("account").Set DataTable("username", dtLocalSheet)
Browser("系统登录").Page("系统登录").WebEdit("password").SetSecure DataTable("password", dtLocalSheet)
Browser("系统登录").Page("系统登录").WebButton("登    录").Click

If Browser("系统登录").Page("系统登录").WebElement("系统消息").Exist(1) Then
        Browser("系统登录").Page("系统登录").WebElement("OK").Click
        Reporter.ReportEvent micFail,"登录失败","用户名或密码为空or用户名或密码错误"
        elseif Browser("系统登录").Page("xxx系统").Exist(1) Then
        Reporter.ReportEvent micPass,"登录成功","登录成功"            else
        Reporter.ReportEvent micFail,"登录失败","系统存在BUG"
End If

DataTable.GetSheet("Action1").SetNextRow
Loop Until False


系统成功登录后，脚本和系统就都不动了，怎么办？？

arivn 发表于 2011-3-11 14:38:11

你看一下日志文件中的内容是不是这行代码写的内容

    Reporter.ReportEvent micFail,"登录失败","系统存在BUG"

pingguo109 发表于 2011-3-11 17:19:51

呵呵，解决了，犯了一个低级错误，循环没有写结束条件

souchy 发表于 2011-3-11 17:20:56

Loop Until False

这个用法比较奇怪，你把Until False改成Until DataTable("password", dtLocalSheet)=1试试
页: [1]
查看完整版本: 系统登录测试脚本——系统成功登录后怎么办