`
tengzejun508
  • 浏览: 27208 次
  • 性别: Icon_minigender_1
  • 来自: 上海
社区版块
存档分类
最新评论
文章列表
<!--StartFragment -->Class clsTest1 Public oDict Private Sub class_initialize() Set oDict = CreateObject("Scripting.Dictionary") End Sub Public Function setting oDict.Add "a","" oDict.Add "b","" oDict.Add "c","" oDict.Add &q ...
QTP中利用DOM实现拖动浏览器滚动条   有的时候需要在测试的过程中需要模拟拖到浏览器的滚动条,我们可以通过Dom调用DocumentElement下的ScrollTop方法实现.   步骤:   (1)通过DOM获取Page的body高度,这个高度是滚动条滚动的最大范围   MaxHeight=Pageobj.Object.body.ClientHeight   (2)通过DOM调用Page的DocumentElement下的ScrollTop方法,为ScrollTop方式传入参数,实现滚动   Pageobj.Object.DocumentElement.ScrollTop ...
我们知道,像DOM,Html,CSS,XPath等对对象的识别策略广泛运用于一些开源的工具,例如:Selenium,Watir,Watir-Webdriver,以前qtp版本是不支持这些东西的,现在qtp11对这些已经支持了,下面我们就看看这些特性:          Document Object Model(DOM):这东西干嘛的 ,百度之。 像下面的这些方法能应用在qtp中: 方法 描述 getElementById 使用已知的元素id,返回第一个页面元素 getElementsByName 返回具有指定名称的一个 ...
package testng; import org.testng.TestListenerAdapter;import org.testng.TestNG;import org.testng.annotations.Test; public class A { @Test public void one() {  System.out.println("one"); }  @Test public void two() {  System.out.println("two"); }  @Test public void three() {  Sys ...
前段时间在做QTP脚本时,遇到一个问题,主要问题是给富文本框赋值的问题。在录制时可以录制到给富文框赋值的过程,但是当回放时却放不了。通过SPY查看,富文本框的outerHtml发现,设置富文本框实际上是一个BODY,而不是Edit,所以回放时赋值是失败的。那么如何解决这个问题呢?最终通过操纵IE DOM结构来完成了这一过程。废话不说了,直接上代码(注意使用Object时不能回放于fireFox中):   '设置富文本框的值 'bjtextAreaBelongFrameId:富文本框所在objFrame中的ID 'textAreaValue:想在富文本框中所设置的值 '返回想设置的值 ...
Dim oReporterManager Set oReporterManager = New ReportManager Call oReporterManager.StartReport("人人围登录1","C:\Report.xls","测试下而已1","sirrah1") Call oReporterManager.Report("Pass","Test_Case1","成功","成功","步骤详细1") ...
在WEB页面中隐藏对象的3种方式1、使用display例如:<label id="hiddenMessageDisplay" style="color:blue">This message is hidden using CSS display property</label><input onclick="if(this.value=='Show message'){this.value='Hide message';document.getElementById('hiddenMessageDisplay'). ...

QTP登录案例

    博客分类:
  • QTP
SystemUtil.Run "http://192.168.1.58:8080"'以下两个变量,记录用户名、密码的输入情况'0代表输入为空,1代表输入正确,2代表输入错误Dim Udatainfo,Pdatainfo,warnrowcount=DataTable.GetSheet("login").GetRowCountBrowser("畅贷网").Page("畅贷网").Link("登录").ClickFor j = 1 To rowcount Step 1    DataTable.Se ...
1、第一讲,QTP基本知识 http://v.youku.com/v_show/id_XNjA5MzU5MTAw.html 2、第二讲,QTP对象库上 http://v.youku.com/v_show/id_XNjEwNjU0MTA4.html 3、第三讲,QTP对象库中 http://v.youku.com/v_show/id_XNjIwNDI5NjQ0.html   备注:如果youku观看不清晰,请联系我所要原版,我的QQ:1836247149 ..................................待续.......................... ...
rowcount= DataTable.GetSheet("Action1").getrowcountFor i = 1 To rowcount Step 1     DataTable.SetCurrentRow i     data1=DataTable("A","Action1")     For j = i+1 To rowcount Step 1         DataTable.SetCurrentRow j         data2=DataTable("A","Action1" ...
自动化测试实际是将测试人员手工进行的工作脚本化,这就需要在测试脚本运行完成后,展示一个明了的测试报告,供相关人员查看测试结果,判断系统的正确性,以下代码实现的是一个EXCEL格式的测试报告,以Function为单位记 ...
SystemUtil.Run "http://www.jd.com"  set obj=Browser("京东网上商城").Page("京东网上商城").ObjectrowCount=DataTable.GetSheet("Action1").GetRowCountFor i = 1 To rowCount Step 1    DataTable.SetCurrentRow i    text=DataTable.Value("A",2)'    Browser("京东网上商城-综合 ...
    静态Web对象的识别 序号 Web对象
SystemUtil.Run "http://www.jd.com/"'打开京东网wait 3set object=Browser("京东网上商城-综合网购首选(JD.COM)-正品低价、品质保").Page("京东网上商城-综合网购首选(JD.COM)-正品低价、品质保").Object'获取link所在位置的父父节点set getdiv=object.getElementById("jdnews")'获取link所在位置的父节点Set getli=getdiv.getElementsByTagName(" ...
Browser("ITeye Java编程 Spring框架").Page("ITeye Java编程 Spring框架").Link("注册").Clickset color=Browser("ITeye Java编程 Spring框架").Page("ITeye - Java编程 Hibernate_2").Objectset bg=color.getElementById("user_name")set p = bg.CurrentStyleprint p.colorp ...
Global site tag (gtag.js) - Google Analytics