图1-214就是设置Global Sheet中的列。
图1-214
由图1-214可以看到,这个单元格里是没有数据的。接下来继续看看脚本2。
脚本2:
Run_Time = DataTable.Value("Runtime_Data","Global") CheckValue = Browser("百度一下,你就知道").Page("百度搜索结果页面")._ WebEdit("结果页面_关键字输入框").GetROProperty("value") If CheckValue = Run_Time Then msgbox "Passed" else msgbox "Failed" End If |
最后就是将脚本1和2组合在一起的脚本X了,这里不贴出这部分脚本,因为这将是下一个章节的学习内容。
从脚本2中可以看到,如果最终验证通过了,会弹出对话框,显示“Passed”。那么,来看一下运行结果到底是什么呢?最终是否验证成功呢?如图1-215所示。
图1-215
我们可以看到,自动化测试圆满成功!接下来,让我们见证是否Run-time Data的生命周期相当的短,QTP运行完毕就会消失,如图1-216所示。
图1-216
再让我们看看,QTP运行期间是否有数据被填写到Runtime_Data这个列中,如图1-217所示。
图1-217
最后,让我们验证是否可以在QTP的Test Report中看到运行时所用到的数据,如图1-218所示。
图1-218