qtp参数化-通过excel导入到datatable中
2013-11-28 16:20
726 查看
1.说明:sheet1 是EXCEL的标签页
actiion1是QTP DATATABLE的标签页
DataTable.ImportSheet "C:\login.xls", "sheet1", "actiion1"
在下面用datatable.Value("Username", dtLocalsheet) 赋值就可以
2.具体应用如下:
Dim DataStr //声明文件的路径
DataStr= "d:/W706.xls"
DataTable.AddSheet("Action1")//在datatable中增加一个action
DataTable.ImportSheet DataStr,"Sheet1","Action1"//把W706.xls文件中名字为sheet1的导入到datatable中action1中
//赋值方式1
selectName = DataTable.Value("证件类型","Action1")//证件类型是W706.xls中sheet1中的列名,在qtp中如下引用
Browser("3G电子化销售服务系统").Page("3G电子化销售服务系统").Frame("frameMain").WebList("select").Select selectName
//赋值方式2
Browser("3G电子化销售服务系统").Page("3G电子化销售服务系统").Frame("frameMain").WebList("select").Select DataTable("证件类型", dtLocalSheet)//赋值方式2
//赋值方式3
If DataTable("证件类型",dtLocalSheet) <> "" Then
Browser("3G电子化销售服务系统").Page("3G电子化销售服务系统").Frame("frameMain").WebList("select").Select DataTable("证件类型", dtLocalSheet)
end if
![](http://hiphotos.baidu.com/%CC%EC%CA%B9macun/pic/item/06988e12738da97775bb4b94b051f8198718e397.jpg)
3.Global也可以引用
Dim DataStr //声明文件的路径
DataStr= "d:/W706.xls"
DataTable.AddSheet("Global")//在datatable中增加一个action
DataTable.ImportSheet DataStr,"Global","Global"//把W706.xls文件中名字为Global的导入到datatable中Global中
引用方式和上面的相同
actiion1是QTP DATATABLE的标签页
DataTable.ImportSheet "C:\login.xls", "sheet1", "actiion1"
在下面用datatable.Value("Username", dtLocalsheet) 赋值就可以
2.具体应用如下:
Dim DataStr //声明文件的路径
DataStr= "d:/W706.xls"
DataTable.AddSheet("Action1")//在datatable中增加一个action
DataTable.ImportSheet DataStr,"Sheet1","Action1"//把W706.xls文件中名字为sheet1的导入到datatable中action1中
//赋值方式1
selectName = DataTable.Value("证件类型","Action1")//证件类型是W706.xls中sheet1中的列名,在qtp中如下引用
Browser("3G电子化销售服务系统").Page("3G电子化销售服务系统").Frame("frameMain").WebList("select").Select selectName
//赋值方式2
Browser("3G电子化销售服务系统").Page("3G电子化销售服务系统").Frame("frameMain").WebList("select").Select DataTable("证件类型", dtLocalSheet)//赋值方式2
//赋值方式3
If DataTable("证件类型",dtLocalSheet) <> "" Then
Browser("3G电子化销售服务系统").Page("3G电子化销售服务系统").Frame("frameMain").WebList("select").Select DataTable("证件类型", dtLocalSheet)
end if
![](http://hiphotos.baidu.com/%CC%EC%CA%B9macun/pic/item/06988e12738da97775bb4b94b051f8198718e397.jpg)
3.Global也可以引用
Dim DataStr //声明文件的路径
DataStr= "d:/W706.xls"
DataTable.AddSheet("Global")//在datatable中增加一个action
DataTable.ImportSheet DataStr,"Global","Global"//把W706.xls文件中名字为Global的导入到datatable中Global中
引用方式和上面的相同
相关文章推荐
- 禁止QQ上网的vbs脚本代码
- 用vbs实现cmd功能的代码
- 不错的主要用于加密的vbs(asp)位移运算类
- VBS教程:对象-Err
- VBS InternetExplorer.Application的属性和方法介绍
- 用vbs实现的简单的服务器文件备份办法压缩文件名自动按日期命名
- VBS基础编程教程 (第1篇)
- 自动切换能播放音乐列表 vbs
- VBS 两数相加取值问题分析
- VBScript 打造自己的远程CMDShell附使用教程
- VBS基础编程教程 (第3篇)
- 用vbs删除某些类型文件和磁盘空间报告的脚本
- 非常棒的lcx写的非常规运行vbs
- windows2003一句话开3389的vbs代码
- vbs 获取radmin注册表中的信息
- 用vbs实现虚拟主机和域名查循的脚本
- vbs 注册表操作代码(添加删除)
- VBS调用WMI快速关闭IE的脚本
- 用vbs实现获取电脑硬件信息的脚本_最新版第1/4页
- VBS基础视频教程 批处理之家broly出品