51Testing软件测试论坛

标题: qtp 插入文本输出点，获取不到网页输出的文本 [打印本页]
作者: 雪景    时间: 2011-8-10 18:09
标题: qtp 插入文本输出点，获取不到网页输出的文本
求助
qtp 录制登录功能的脚本，插入了一个文本输出点，输出系统的实际值并将值保存在datatable        outmsg列中，选择文本后右击---》insert text output---》modify----》输入outmsg---》current  action  sheet（local）


运行时outmsg的值都是空的

  2. Dim i
  3. Dim fact_inf '定义读取系统实际提示信息的变量
  4. Dim exp_inf'读取系统预期提示信息的变量
  5. For i = 1 to DataTable.GetSheet("Action1").getRowCount
  6. Browser("BugFree").Page("BugFree").WebEdit("TestUserName").Set DataTable("uname", dtLocalSheet)
  7. Browser("BugFree").Page("BugFree").WebEdit("TestUserPWD").SetSecure DataTable("pwd", dtLocalSheet)
  8. Browser("BugFree").Page("BugFree").WebButton("登录(L)").Click
  9. Browser("BugFree").Page("BugFree").WebEdit("TestUserPWD").SetSecure "4e40cc3c2f5a"
  10. Browser("BugFree").Page("BugFree").WebEdit("TestUserPWD").SetSecure "4e40cc49c2f0264021623fce16d8b40f7719"
  11. Browser("BugFree").Page("BugFree").WebButton("登录(L)").Click
  12. Browser("BugFree").Page("BugFree").Output CheckPoint("BugFree")‘插入文本输出点

  14. fact_inf = dataTable("outmsg",dtLocalSheet)'将实际输出值赋予变量
  15. exp_inf = dataTable("status",dtLocalSheet)
  16. If  fact_inf<>exp_inf Then
  17. reporter.ReportEvent 1,"登陆功能测试","预期值为："+exp_inf+"实际值为："+fact_inf
  18. End If

  20. dataTable.GetSheet("Action1").SetNextRow '获取下一行数据
  21. next
  22. Browser("BugFree").Page("BugFree_2").Frame("NavFrame").Link("退出").Click
  23. Browser("BugFree").Page("BugFree").Sync
  24. Browser("BugFree").Close


复制代码


作者: rogerliu0303    时间: 2011-8-12 16:59
页面的text属性本身就是空。不信你GetROproperty试试看。
作者: rogerliu0303    时间: 2011-8-12 17:00
页面的text属性本身就是空。不信你GetROproperty试试看。
作者: tiankai30    时间: 2011-8-15 13:05
输出是在结果分析表里的吧
作者: 雪景    时间: 2011-8-22 18:03
回复 3# rogerliu0303


    可是页面确实有输出的文本啊
作者: 雪景    时间: 2011-8-22 18:04
回复 4# tiankai30


    那里也没有，都是空
作者: rogerliu0303    时间: 2011-8-24 15:17
回复 5# 雪景
有文本也未必就是text属性啊，你自己get来看看嘛



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