由于一直以来事情都比较多,最近上课还有其它的事情,所以本来答应一个朋友把脚本帮他写一些,但是耽误了3-4天了,实在不好意思。这里把脚本简单说一下,我们分析一下。
欢迎光临!pK03atestingsfwtrznt
当时问题是这样的,“我的错误的用户名就没办法登陆”,其实含义就是脚本最好能处理成功的用户名错误的用户名,那么这里涉及到脚本的设计。
欢迎光临!pK03atestingsfwtrznt
目标如下:
欢迎光临!pK03atestingsfwtrznt
1. 脚本需要处理成功和失败的用户的登陆
欢迎光临!pK03atestingsfwtrznt
2. 数据驱动
欢迎光临!pK03atestingsfwtrznt
欢迎光临!pK03atestingsfwtrznt
设计开发脚本如下:
欢迎光临!pK03atestingsfwtrznt
欢迎光临!pK03atestingsfwtrznt
欢迎光临!pK03atestingsfwtrznt
第一步录制脚本如下
欢迎光临!pK03atestingsfwtrznt
Browser("智能变电巡检仪系统 4.0").Page("智能变电巡检仪系统 4.0").WebEdit("txtLoginName").Set "吕巍"
欢迎光临!pK03atestingsfwtrznt
Browser("智能变电巡检仪系统 4.0").Page("智能变电巡检仪系统 4.0").WebButton("登 录").set ""
欢迎光临!pK03atestingsfwtrznt
Browser("智能变电巡检仪系统 4.0").Page("Page").Syn
欢迎光临!pK03atestingsfwtrznt
Browser("智能变电巡检仪系统 4.0").Close
欢迎光临!pK03atestingsfwtrznt
欢迎光临!pK03atestingsfwtrznt
以上为录制的正确的用户名,下边录制错误的用户名
欢迎光临!pK03atestingsfwtrznt
Browser("智能变电巡检仪系统 4.0").Page("智能变电巡检仪系统 4.0").WebEdit("txtLoginName").Set "xx"
欢迎光临!pK03atestingsfwtrznt
Browser("智能变电巡检仪系统 4.0").Page("智能变电巡检仪系统 4.0").WebButton("登 录").set ""
欢迎光临!pK03atestingsfwtrznt
出现错误提示“该用户不存在”
欢迎光临!pK03atestingsfwtrznt
欢迎光临!pK03atestingsfwtrznt
第二步 增强脚本
欢迎光临!pK03atestingsfwtrznt
欢迎光临!pK03atestingsfwtrznt
现在需要设计的是一套脚本驱动所有的
测试数据,这样可以驱动所有的用例数据,qtp中提供了datatable。
欢迎光临!pK03atestingsfwtrznt
但是有数据驱动也要做一个事情就是如何处理错误的用户名和正确的用户名,如何结合起来呢?
欢迎光临!pK03atestingsfwtrznt
这里我把datatable看作存放测试用例的地方,里面放入测试数据,还放入测试的预期结果。这样我的设计已经出现雏形了。
欢迎光临!pK03atestingsfwtrznt
我把datatable设计为三列
欢迎光临!pK03atestingsfwtrznt
欢迎光临!pK03atestingsfwtrznt
username password status
欢迎光临!pK03atestingsfwtrznt
吕x
欢迎光临!pK03atestingsfwtrznt
xxx xxxx 该用户不存在
欢迎光临!pK03atestingsfwtrznt
欢迎光临!pK03atestingsfwtrznt
第三列放入最后执行的结果,我设计的是空为成功登陆,如果有信息就用实际运行的结果和这一列对比.好了万事俱备只欠东风了
欢迎光临!pK03atestingsfwtrznt
欢迎光临!pK03atestingsfwtrznt
修改脚本如下:
欢迎光临!pK03atestingsfwtrznt
Dim iStatus
欢迎光临!pK03atestingsfwtrznt
欢迎光临!pK03atestingsfwtrznt
Browser("智能变电巡检仪系统 4.0").Page("智能变电巡检仪系统 4.0").WebEdit("txtLoginName").Set DataTable("username", dtLocalSheet)
欢迎光临!pK03atestingsfwtrznt
Browser("智能变电巡检仪系统 4.0").Page("智能变电巡检仪系统 4.0").WebButton("登 录").set DataTable("password", dtLocalSheet)
欢迎光临!pK03atestingsfwtrznt
iStatus = DataTable("status", dtLocalSheet)
欢迎光临!pK03atestingsfwtrznt
欢迎光临!pK03atestingsfwtrznt
If iStatus="" Then
欢迎光临!pK03atestingsfwtrznt
Browser("智能变电巡检仪系统 4.0").Close
欢迎光临!pK03atestingsfwtrznt
End If
欢迎光临!pK03atestingsfwtrznt
欢迎光临!pK03atestingsfwtrznt
欢迎光临!pK03atestingsfwtrznt
If iStatus="该用户不存在" Then
欢迎光临!pK03atestingsfwtrznt
Reporter.ReportEvent micFail, "登陆", "登陆失败."
欢迎光临!pK03atestingsfwtrznt
End If
欢迎光临!pK03atestingsfwtrznt
欢迎光临!pK03atestingsfwtrznt
Browser("智能变电巡检仪系统 4.0").Close
欢迎光临!pK03atestingsfwtrznt
欢迎光临!pK03atestingsfwtrznt
第三步,设置脚本运行过程
欢迎光临!pK03atestingsfwtrznt
欢迎光临!pK03atestingsfwtrznt
打开 tests-〉settings
欢迎光临!pK03atestingsfwtrznt
设置RUN TAB页面下 Datatable iterations中 Run On all rows
欢迎光临!pK03atestingsfwtrznt
欢迎光临!pK03atestingsfwtrznt
这样就完成了整个脚本的设计
工作,以上通过一个简单例子吧脚本的设计和软件的功能结合起来,达成脚本的设计效果。