QTP 表格的导入导出异常信息 笔记
0 环境
系统环境:win7
1 操作
1.1 前言
与异常遍历结合 需要表格记录下来(读写) 代码大概跑了一下 若细节有错 请自行更改
1.2 导出
systemutil.Run "D:\Program Files (x86)\HP\QuickTest Professional\samples\flight\app\flight4a.exe" Dialog("Login").WinEdit("Agent Name:").Set datatable("username",dtlocalsheet) Dialog("Login").WinEdit("Agent Name:").Type micTab Dialog("Login").WinEdit("Password:").Set datatable("password",dtlocalsheet) Dialog("Login").WinButton("OK").Click If dialog("Login").Dialog("Flight Reservations").Exist Then warning = dialog("Login").Dialog("Flight Reservations").Static("Incorrect password. Please").GetROProperty("text") datatable("warnning",dtlocalsheet) = warning reporter.ReportEvent micPass,"对话提示框,验证异常","通过 显示:" &warning dialog("Login").Dialog("Flight Reservations").WinButton("确定").Click else reporter.ReportEvent micFail,"对话提示框,验证异常","未通过" End If dialog("Login").WinButton("Cancel").Click datatable.Export("e:/111/info.xls")
1.3 导入导出(读取值修改后再保存)
systemutil.Run "D:\Program Files (x86)\HP\QuickTest Professional\samples\flight\app\flight4a.exe" datatable.Import("e:/111/info.xls") Dialog("Login").WinEdit("Agent Name:").Set datatable("username",dtlocalsheet) Dialog("Login").WinEdit("Agent Name:").Type micTab Dialog("Login").WinEdit("Password:").Set datatable("password",dtlocalsheet) dialog("Login").WinButton("OK").Click If dialog("Login").Dialog("Flight Reservations").Exist Then actul = dialog("Login").Dialog("Flight Reservations").Static("Incorrect password. Please").GetROProperty("text") 'msgbox actul datatable("actul",dtlocalsheet) = actul warning = datatable("warnning",dtlocalsheet) 'msgbox warning If warning = actul Then 'reporter.ReportEvent micPass,"对话异常提示框","通过 显示:"&actul datatable("result",dtlocalsheet) = "pass" else datatable("result",dtlocalsheet) = "fail" 'reporter.ReportEvent micFail,"对话异常提示框","不通过" End If dialog("Login").Dialog("Flight Reservations").WinButton("确定").Click End If dialog("Login").WinButton("Cancel").Click datatable.Export("e:/111/info.xls")
设置一下遍历所有行和全局运行exe环境
表格的导入
首先添加好登录和异常弹出框相关的控件
利用小飞机 获static文本的异常值 保存位置表格actul字段
判断表格内的warnning的值与实际actul的值是否一致
一致 表格result写入pass
否则 表格result写入fail
逐层关闭弹出框
表格的导出
作者:以罗伊
本文版权归作者和博客园共有,欢迎转载,但未经作者同意必须在文章页面给出原文链接,否则保留追究法律责任的权利。