QTP功能测试 求教 谢谢

哈哈哈你的

用QTP自动化测试 WEB型网站，测试登录注册功能。当登录账号或者密码错误时，会弹出对话框。要求当我使用测试用例数据时，正确的数据能运行下去，当有无效的数据时能够QTP自己点击那个对话框使能够运行下去。这是测试注册功能的，我已经参数化了，但没有设置检查点，也有测试数据在DataTable里了，就是回放时出现对话框不能运行下去。求指导如果看不懂我说的但会QTP的大哥大姐，求联系求教。万分感谢
        Browser("电子商城").Page("电子商城").Link("注册").Click
        Browser("电子商城").Page("电子商城_2").WebEdit("name").Set DataTable("departure", dtGlobalSheet)
        Browser("电子商城").Page("电子商城_2").WebEdit("password").SetSecure DataTable("password", dtGlobalSheet)
        Browser("电子商城").Page("电子商城_2").WebEdit("passwordOne").SetSecure DataTable("repassword", dtGlobalSheet)
        Browser("电子商城").Page("电子商城_2").WebEdit("reallyName").Set DataTable("Rn", dtGlobalSheet)
        Browser("电子商城").Page("电子商城_2").WebEdit("profession").Set DataTable("pr", dtGlobalSheet)
        Browser("电子商城").Page("电子商城_2").WebEdit("email").Set DataTable("em", dtGlobalSheet)
        Browser("电子商城").Page("电子商城_2").WebEdit("question").Set DataTable("que", dtGlobalSheet)
        Browser("电子商城").Page("电子商城_2").WebEdit("result").Set DataTable("answer", dtGlobalSheet)
        Browser("电子商城").Page("电子商城_2").Image("save").Click 29,12
        Browser("电子商城").Page("电子商城_3").WebEdit("name").Set DataTable("dlm", dtGlobalSheet)
        Browser("电子商城").Page("电子商城_3").WebEdit("password").SetSecure DataTable("dlmm", dtGlobalSheet)
        Browser("电子商城").Page("电子商城_3").Image("fg-land").Click 29,11
        Browser("电子商城").Page("电子商城_3").Link("安全退出").Click
        Window("Internet Explorer").Dialog("来自网页的消息").WinButton("确定").Click
        Browser("电子商城").Page("电子商城_3").Sync
        Browser("电子商城").CloseAllTabs

zhutoudd

怎么记住这个贴？？？

土土的豆豆

看看对象框是否能定位和识别正确，要正确加载并识别才能继续run啊~
另外，活动窗口/对话框也得切换了哦

哈哈哈你的

土土的豆豆 发表于 2015-3-25 09:53
看看对象框是否能定位和识别正确，要正确加载并识别才能继续run啊~
另外，活动窗口/对话框也得切换了哦

亲，我就是不会怎么加载，识别。。。不会写代码，有没有什么万能代码能用的

q464907380

你把弹出来的错误提示框添加到对象仓库，在要弹出错误框那加if语句判断错误提示是否弹出  在加个for循环
比如
For i=1 to DataTable.GetSheet(1).GetRowCount
If Window("Internet Explorer").Dialog("来自网页的消息").WinButton("确定").Exist Then
          Window("Internet Explorer").Dialog("来自网页的消息").WinButton("确定").Click
         '继续执行的代码
       Else
          '继续执行的代码
       End if
      Next

哈哈哈你的

q464907380 发表于 2015-3-26 00:45
你把弹出来的错误提示框添加到对象仓库，在要弹出错误框那加if语句判断错误提示是否弹出  在加个for循环
...

不知对不对，先谢谢您，等一下试下

哈哈哈你的

q464907380 发表于 2015-3-26 00:45
你把弹出来的错误提示框添加到对象仓库，在要弹出错误框那加if语句判断错误提示是否弹出  在加个for循环
...

还想问怎么错误提示框添加到对象库啊，能详细点吗

哈哈哈你的

q464907380 发表于 2015-3-26 00:45
你把弹出来的错误提示框添加到对象仓库，在要弹出错误框那加if语句判断错误提示是否弹出  在加个for循环
...

Browser("电子商城").Page("电子商城").Image("fg-land").Check CheckPoint("fg-land_2")
Browser("电子商城").Page("电子商城").WebEdit("name").Set DataTable("p_name", dtGlobalSheet)
Browser("电子商城").Page("电子商城").WebEdit("password").SetSecure DataTable("p_password", dtGlobalSheet)
Browser("电子商城").Page("电子商城").Image("fg-land").Click 3, 12
If  Window("Internet Explorer").Dialog("来自网页的消息").WinButton("确定").exist Then
Window("Internet Explorer").Dialog("来自网页的消息").WinButton("确定").Click
else
Browser("电子商城").Page("电子商城_2").Link("安全退出").Click
Window("Internet Explorer").Dialog("来自网页的消息").WinButton("确定").Click
Browser("电子商城").Page("电子商城_2").Sync
Browser("电子商城").CloseAllTabs
End If

DataTable
p_name p_password
1           1
4           1
5641      1
6           1
5           6
其中5641  1 这组数据是错误的，就是没有这账号密码，其他能运行， 我没有加 for那条语句 ，就加了个判断语句，能算是自动化测试吗

哈哈哈你的

q464907380 发表于 2015-3-26 00:45
你把弹出来的错误提示框添加到对象仓库，在要弹出错误框那加if语句判断错误提示是否弹出  在加个for循环
...

Browser("电子商城").Page("电子商城").Image("fg-land").Check CheckPoint("fg-land_2")
Browser("电子商城").Page("电子商城").WebEdit("name").Set DataTable("p_name", dtGlobalSheet)
Browser("电子商城").Page("电子商城").WebEdit("password").SetSecure DataTable("p_password", dtGlobalSheet)
Browser("电子商城").Page("电子商城").Image("fg-land").Click 3, 12
For i=0 to datatable.GetSheet(action1).GetRowCount
If  Window("Internet Explorer").Dialog("来自网页的消息").WinButton("确定").exist Then
Window("Internet Explorer").Dialog("来自网页的消息").WinButton("确定").Click
else
Browser("电子商城").Page("电子商城_2").Link("安全退出").Click
Window("Internet Explorer").Dialog("来自网页的消息").WinButton("确定").Click
Browser("电子商城").Page("电子商城_2").Sync
Browser("电子商城").CloseAllTabs
End If
next
是这样吗。但加了FOR循环会出现The DataTable.GetSheet operation failed. Specify the sheet using a text string or numerical index value。
如果不要FOR语句 只要判断语句就可以了 但这算是自动化测试吗