摘要:
原文章地址: http://www.sqaforums.com/showthreaded.php?Number=567717 设计思路如下: here comes the excel report, I made the modification from report manager and wrapped into 2 main functions to be called in QTP.Fu... 阅读全文
摘要:
orderpath=pathfinder.Locate("newteams.xlsx")ordersheet="order1"getdata()Function getData() '查找表中信息 set mydes=description.Create() mydes("micclass").value="WebTable" set buyerinfo=Browser("name:=browse... 阅读全文
摘要:
1,对已经存在Excel文件修改后保存时,会弹出一个询问对话框: --------------------------- 在当前位置发现已经存在名为“RESUME.XLW” 的文件。您希望将该文件替换掉吗? --------------------------- 在保存前设置DisplayAlerts属性,即可屏蔽该对话框。如下所示: On Erroe resume Next '注意这句 WorkBook.DisplayAlerts:=False; WorkBook.Save(); 或 ExcelApp.DisplayAlerts:=False; ExcelApp.Save(); .. 阅读全文
摘要:
开始的时候已经操作webtable中的相关的控件都是处采用DOM的方式遍历一行或者是一列的所有的值,现在参考了一些api发现webtable提供了一个更加快捷的方法,childItem方法,却是省了我不少的事。 参数只需要知道,哪一行,那一列,这个对象的类别,或者这个对象在该单元格中的索引,索引是从0开始的。 这个对于操作webtable很好,如果不行的话,可以再考虑DOM的方式获取该对... 阅读全文
摘要:
' ******************************** Function Library ********************************* ' Registering both functions RegisterUserFunc "WebTable", "ObjectsByMicClass", "ObjectsByMicClass" RegisterUserFun... 阅读全文
摘要:
'功能:提交bug信息到QC中'函数参数:url代表连接QC的url(例如http://localhost:8080/qcbin),projectname代表需要执行'QC'连接的工程名称,username代表QC的用户名,password代表连接QC的用户的密码,buginfo代'表连接QC后提交的bug信息,数组类型,数组中第一个代表bug的状态,第二个代表bug的主题,'第三个代表bug的优... 阅读全文
摘要:
采用vbs进行调用邮箱进行发送邮件,这个主要可以使用在QTP中例如执行完用例后调用该方法进行通知项目组的人员,测试的一些执行情况。 方法如下: Function SendMail(SendTo, Subject, Body, Attachment) Set ol=CreateObject("Outlook.Application") Set Mail=ol.CreateItem(0... 阅读全文
摘要:
'<--------- Browser("HTC Sense - Select your").Page("HTC Sense - Select your").Link(" United States").Click '录制点击“United States"的操作 '----------> '<--------- Browser("HTC Sense - Select your").Page("HT... 阅读全文
摘要:
*******************************************************************************************'功能:时间字符串格式转换'参数:str代表时间字符串,formatdata代表需要截取的字符'返回值:获取你所需指定的单元格的值'作者:'***************************************... 阅读全文
摘要:
SystemUtil.Run "http://www.kaixin001.com" ‘打开网址 SystemUtil.Run "F:\vb工程\vbscript学习\test.txt" ‘打开文件test.txt SystemUtil.CloseDescendentProcesses ‘关闭所有QTP打开的进程 SystemUtil.CloseProcessByName "iexplore.exe... 阅读全文
摘要:
How to import and export sheets from Quality Center using DataTable of QTP ? I came across this problem recently when we decided to store our excel files in test plan module of Quality Center(Version ... 阅读全文
摘要:
以下的方法采用 DeviceReplay 方法敲击页面中的任意一个对象,采用的是绝对路径x,y进行定位需要点击的对象。Sub RightClickObj(Obj, Offset_x, Offset_y) x_coord = Obj.GetROProperty("abs_x") '对象的相对坐标x y_coord = Obj.GetROProperty("abs_y") ... 阅读全文
摘要:
testrow=Browser("testip").Page("【testpage").Frame("mainFrame0_2").WebTable("testtable").GetRowWithCellText("a111230122")print "order list id"&cstr(testrow)Set des=description.Create()des("micclass").v... 阅读全文
摘要:
参考QTP的帮助说明,认真学好该模块的相关方法等。 阅读全文
摘要:
该方式更加的容易识别对象,想必是借鉴了RFT和selenium的优势啊。这个功能确实很强大。见如下代码,相信有了这个方式,识别对象不再是个问题。 代码如下:Browser("name:=Google").Page("title:=Google").WebEdit("xpath:=//INPUT[@name='q']").Set "advancedqtp" ,以上语法很简单,主要是学习使用xpath... 阅读全文
摘要:
1,最近测试中使用到了ajax的一个webedit自动填充的案例,想了好久,终于想到了一个解决的方案: Set deviceReplay = CreateObject ("Mercury.DeviceReplay") Browser("xx").Page("xx").WebEdit("xx").Object.focus deviceReplay.SendString(str) wait(10... 阅读全文
摘要:
对于QTP自动的usingExcel.vbs文件进行了相关的整理,使其更加适合自己的使用: QC 运行 QTP 脚本是不带参数的,因此当我们构建自己的框架,需要灵活配置一些东西的时候,需要在QTP中读取外部文件,清除和准备数据时需要操作数据库。 下面是简单实现代码,适用于10.0. 1,如何读取Excel (陈能技博客转) 所在机器必须安装Excel arrRange = ReadFile("c... 阅读全文
摘要:
1: QTP Excel函数 操作EXCEL 数据表格 表单 编辑EXCEL 工作表 2: Dim ExcelApp 'As Excel.Application 3: Dim excelSheet 'As Excel.worksheet 4: Dim excelBook 'As Excel.workbook 5: Dim fso 'As scrīpting.FileSystemObject 6: 7: ' ***********************************************************... 阅读全文
摘要:
1:'一下的代码记录的是我对于一个查询操作的自动化的思路。。。。。遗憾的是预期的结果可能需要手动输入到datatable中,以后逐步完善,将所有的预期值都自动输入到excel中。 '登陆系统 2: 3: RunAction "login [loginsystem]", oneIteration 4: '************************************************************************************************************** 5: '功能:产品名称 阅读全文
摘要:
1,windows 7安装中出现了一些意外的问题,最主要的要归结到windows 7设置的权限问题,(无法录制),具体的操作权限的方式,见下图所示;2,测试中得到的预期结果和实际结果打印的时候是相同的,可是在采用if比对的时候始终都是不相同的,可能的情况就是预期的字符串没有前后的空格,而对于实际的获取到的结果可能有空格,采用trim(str)方法进行转化即可;3,QTP测试的框架为如下: 可测试的内容,增删改查,这个比较的设计容易,QTP的核心是数据表,所有一定要学习好datatable对象,还有掌握住webtable对象的一些获取方法,因为如果是增删改查是离不开数据表的,所有掌握它是意义重大 阅读全文