QTP心得_Cindy.docVIP

QTP安装 一.安装破解的程序方法 安装步骤：br1. 运行setup.exe 文件；br2. 输入序列号：0123-2820602186br3. 安装完毕，将mgn-mqt82.exe.txt放置到bin下面 4. 运行mgn-mqt82.exe,进行密码破解；br5. 重起电脑 二、安dotnet插件 qtp92-net-addin.zip 安完之后发现是14天限制的，而且把程序变成英文的了 QTP使用 1.没录制操作 第一次录制自己的.net程序时发现只录下来运行文件的一行记录SystemUtil.Run,,,,，没录下来其他操作。后来发现Record and Run Settings里面“windows applications”选项卡里面，默认是第二项，改为选第一项就可以录制所有操作了。 2.关于注释 好多人一直抱怨QTP为什么不提供多行注释代码,而有单行注释的 ;其实QTP已经为我们提供了多行注释的功能: 选中要注释的行-在选中行上右键 选择Comment Block 取消多行注释-在选中行上右键 选择Uncomment Block”7,20”是控件内相对位置 SwfWindow(运行平台登录).SwfObject(btnOKChecked).Click 7,20 后来经研究代码发现开始出现的确认框是btnOKUnChecked,只有当它执行MouseEnter事件时btnOKChecked才会出现，所以执行： 在Object Repository中添加Object “btnOKUnChecked” 添加代码 SwfWindow(运行平台登录).SwfObject(btnOKUnchecked).FireEvent(MouseEnter) If (SwfWindow(运行平台登录).SwfObject(btnOKChecked).Exist) then SwfWindow(运行平台登录).SwfObject(btnOKChecked).FireEvent(onfocus) 使一个控件获取焦点 SwfWindow(运行平台登录).SwfObject(btnOKChecked).Click 27,12 else msgbox(btnOKChecked没有出现) end if 就OK了 结论： 1) 使用FireEvent(*****)引发事件 2）Qtp中的语句类似vb 二、登录之后以“业务功能;IPIC系统;基础设置;盐分设置”新增为例子学习使用DataTable为参数的参数化编程 由于界面上的文本框为自定义控件，识别出来的五个文本框都是tzTextBoxBase，形成的名字是tzTextBoxBase1、tzTextBoxBase1-2等名字，不容易识别，所以在Object Repository中将其改为文本框对应的父项的ControlID，分别是SoilEC、Cropsubtle、WaterEC、CropCritical、SoilCode 获取文本框的ControlID： SwfWindow(运行支撑平台).SwfWindow(盐分设置录入---新增).SwfEdit(SoilCode).Object.Parent.GetControlID 将输入文本从Action1表中获取: Old code: SwfWindow(运行支撑平台).SwfWindow(盐分设置录入---新增).SwfEdit(SoilCode).Set 1 New code: SwfWindow(运行支撑平台).SwfWindow(盐分设置录入---新增).SwfEdit(SoilCode).Set DataTable(SoilCode, dtLocalSheet) 循环读取参数 dim countNum countNum = DataTable.GetSheet(Global).GetRowCount 循环读取Globle表中的数据 For i=1 to countNum msgbox(i) DataTable.SetCurrentRow(i) 新增操作 SwfWindow(运行支撑平台).SwfToolbar(toolBarBase).Press 新增 SwfWindow(运行支撑平台).SwfWindow(盐分设置录入---新增).SwfEdit(SoilCode).Set DataTable(SoilCode, dtLocalSheet) ‘省略其他文本框 获取文本框的ControlID： SwfWindow(运行支撑平台).SwfWindow(盐分设置录入---新增).SwfButton(保存(S)).Click SwfWindow(运行支撑平台).SwfWindow(盐分设置录入---新增).D