51Testing软件测试论坛

标题: 如何提取第5次密码输入错误后弹出的第二个UI中的提示信息 [打印本页]
作者: 安偌    时间: 2011-7-5 18:43
标题: 如何提取第5次密码输入错误后弹出的第二个UI中的提示信息
应用程序：飞机订票系统
标题：登录错误验证
前置条件：已提取前四次密码错误时提示，并判断了正确与否
目标：提取第5次密码错误提示后第二个UI中的提示信息并作出判断
PS：第5次密码错误后，点击[确定]按钮，会弹出另一个UI，提示“Login unsuccessful. Please try again later.”，再点击[确定]该flight4a.exe程序会自动关闭

我是将预期结果保存在Global的某一列中，再将每次提取出来的结果保存另一列，然后进行对比判断
而在执行第5条用例时无法连续获取第二个提示信息并判断
作者: 安偌    时间: 2011-7-6 08:54

自己先顶下
作者: shingo0109    时间: 2011-7-6 09:40
LZ可以在点击确定之后再加个if判断，如果弹出窗口存在，则再GetROProperty文本， 然后再判断
作者: 安偌    时间: 2011-7-6 12:28
回复 3# shingo0109

恩，这个方法昨天我尝试过，结果不行
今天又重新对脚本做了调整，可以了

  2. systemutil.CloseProcessByName("flight4a.exe")
  3. systemutil.Run("D:\Program Files\HP\QuickTest Professional\samples\flight\app\flight4a.exe")
  4. Dim A_result,E_result,i
  5. For i=1 to datatable.GetSheet("Global").GetRowCount
  6. Dialog("Login").WinEdit("Agent Name:").set datatable("login_name",dtGlobalsheet)
  7. Dialog("Login").WinEdit("Password:").set datatable("login_password",dtGlobalsheet)
  8. Dialog("Login").WinEdit("Password:").Type  micReturn
  9. Dialog("Login").Dialog("Flight Reservations").Static("Please enter agent name").Output CheckPoint("msg")
  10. A_result=datatable("e_result",dtGlobalsheet)
  11. E_result=datatable("a_result",dtGlobalsheet)
  12. If E_result<>A_result Then
  13.         reporter.ReportEvent micFail," 错误提示验证","预期结果为："+E_result+"，实际结果为："+A_result
  14. End If
  15. Dialog("Login").Dialog("Flight Reservations").WinButton("确定").Click
  16. If  Dialog("Login").Dialog("Flight Reservations").Exist(2)Then
  17. a_information=Dialog("Login").Dialog("Flight Reservations").Static("Please enter agent name").GetROProperty("text")
  18. e_information=datatable("messige",dtGlobalsheet)
  19. End If
  20. If e_information<>a_information Then
  21.         reporter.ReportEvent micFail,"第5次密码错误验证","预期结果："+e_information+"，实际结果："+a_information
  22.         Dialog("Login").Dialog("Flight Reservations").WinButton("确定").Click
  23.         systemutil.Run("D:\Program Files\HP\QuickTest Professional\samples\flight\app\flight4a.exe")
  24. End If
  25. datatable.GetSheet("Global").SetNextRow
  26. Next


复制代码




欢迎光临 51Testing软件测试论坛 (http://bbs.51testing.com/) Powered by Discuz! X3.2