自动化倚天剑-QTP（三）

最新推荐文章于 2024-08-02 21:26:35 发布

原创最新推荐文章于 2024-08-02 21:26:35 发布 · 1.9k 阅读

1 ·

CC 4.0 BY-SA版权

文章标签：

#dialog #excel #login #generator #string #测试

测试工具专栏收录该内容

10 篇文章

订阅专栏

本文介绍了如何使用Excel作为外部数据源，通过自动化脚本实现数据驱动的测试流程。详细阐述了从导入Excel数据到DataTable运行表，以及利用COM技术填充Excel文件的过程，旨在提高测试数据管理和执行效率。

章节的内容主要为：外部的数据源参数化

用外部数据驱动脚本的运行，这是经常用到的方法，这样可以很方便的组织测试数据。数据文件以excel为和txt为格式组织,以下介绍1种Excel的办法.

在QTp的主界面的下方也可以看到对应的表格形式.
用Excel组织测试数据是最常用的了。此种驱动可以采用两种方式，将数据导入到DataTab中或是利用COM来填满Excel文件。
导入到DataTable中
获得数据文件路径，并将数据文件导入到DataTable运行表中

LoginChk
Dim DataPath, SheetNum

DataPath = Parameter.Item("DataPath")'String类型
SheetNum = Parameter.Item("SheetNum")'String类型
print Num
print Path

DataTable.ImportSheet Path,Num,2   ‘这里存在问题,需要加1个类型正确为CInt(Num),2
                                       
Dim LogName,Password,Expresult,ActResult,CaseNum,ActNum
CaseNum = 0
ActNum = DataTable.GetSheet(2).GetRowCount
 ' print ActNum
While CaseNum<ActNum
     LogName = DataTable.RawValue("LoginName",2)
     Password = DataTable.RawValue("Password",2)
     ExpResult = DataTable.RawValue("ExpRslt",2)
        
     Dialog("Login").WinEdit("Agent Name:").Set LogName
     Dialog("Login").WinEdit("Password:").Set Password
    ' print LogName
     ' print Password
     Dialog("Login").WinButton("OK").Click

...

点击F7 弹出step generator

选择我们刚才写的那个函数并输入参数点击确定.