WEB登录

上一篇 / 下一篇 2017-09-22 16:59:09 / 个人分类：QTP小结

忙了近半个月，终于把WEB登录给跑通了。总结了下，主要有以下几个知识点的收获。

一、EXCEL导入、excel中取值、字段值参数化

Dim i,str,expect

str="d:\study\test.xls"'定义excel路径

DataTable.ImportSheet str,"login","Action1"'将excel中的login sheet页的数据加载到QTP的Action1上

expect=DataTable.GetSheet("Action1").GetParameter("expect").Value

Browser("东风汽车股份有限公司营销领域服务系统").Page("东风汽车股份有限公司营销领域服务系统").WebEdit("password_").Set DataTable("password","Action1")'字段值参数化

二、for语句

for i=1 to DataTable.GetSheet("Action1").GetRowCount

操作步骤

DataTable.GetSheet("Action1").SetNextRow'在操作完成后，读取EXCEL中下一行数据

三、if语句

IF ... THEN

Reporter.ReportEvent micPass,"登录","登录成功"

...

else

Reporter.ReportEvent micFail,"登录","登录失败"

end if

四、打印变量值

print expect'打印变量值

四、手动添加对象

object spy抓取的对象与实际不符时，移动鼠标找到对应的控件位置（凭感觉找到控件：IE上显示的控件与实际录制的对象位置不一致）---还没找到解决方案

TAG: