`
文章列表

截图本地环境

testDir = Environment.Value("TestDir") testName = Environment.Value("TestName") actionName = Environment.Value("ActionName") dateArrary = Split(Date,"/") vDate = dateArrary(0)&dateArrary(1)&dateArrary(2) print vDate filepath = testDir&"\ ...
'此代码是参照精通QTP-自动化测试技术导航来写的 '获取当前发件箱中的所有表格行,和列 '并指定搜索三篇文章在左边的checkbox打勾 '最后是搜到的文章的发表时间写入测试报告中 Dim search1,search2,search3,cRow,tDate,cellData search1 = "QTP自动化":search2 = "51tesing测试数据":search3 = "test" With Browser("个人空间管理").Page("个人空间管理") tR ...
此代码只提供一些思路,在实际项目中是否适用,看具体情况。 之前网上在操作webTable时,代码太繁琐了,要获取row,column总数,在循环等,这里有线性代码可以简单解决: Set oDesc = Description.Create() oDesc("micClass").Value = "Link" oDesc("target").Value = "_blank" Set l_link=Browser("个人空间管理").Page("个人空间管理").We ...
DataTable的操作包括:DataTable.GetSheet(dtSheet)DataTable.GetSheetCountDataTable.[GetSheet.]GetRowCountDataTable.[GetSheet.]GetParameterCountDataTable.GetSheet(sSheetName).GetParameter(“ColumName”).ValueByName(iRowNumber)DataTable.[GetSheet.]GetCurrentRowDataTable.[GetSheet.]SetCurrentRow( ...
QTP 录制 回放 原理    自动化测试可以基于代码,例如junit,cppunit,可以基于协议,例如loadrunner,QTP是基于GUI界面的自动化测试工具。junit和cppunit属于单元测试,loadrunner和QTP属于系统测试。loadrunner用于系统的性能测试,QTP用 ...
此脚本是验证51test博客发博客到私人信箱里面。下图如已经登录了页面   Option Explicit Browser("284772894 日志 - 284772894的个人空间").Page("284772894 日志 - 284772894的个人空间").Link("发布新日志")_;_script infofile_;_ZIP::ssf2.xml_;_ Browser("284772894 日志 - 284772894的个人空间").Page("284772894 日志 - 284 ...
SystemUtil.Run "www.baidu.com" Set oDesc = Description.Create() /*创建线性编程对象*/ Browser("百度一下,你就知道").Page("百度一下,你就知道").Link("Link") oDesc("micClass").Value = "Link" /*描述一个Link对象*/ Set Lists = Browser("百度一下,你就知道").Page("百度一 ...
此脚本是一个打开百度并登录,最后判断登录是否成功。运用的知识有,vbclass,多action。此脚本只是个人的一些思路而已:有三个脚本,一个类,类用来操作公共数据,我这里用来存borwser和page的title,actio_init初始化数据(打开百度弹出数据),action主脚本(输入用户名和密码),action_end最后的脚本,关闭窗口,输出验证报表。 下面是类:   Class bParameters 'get set 方法 Private s_brower_title Private s_page_title '--------------get ...
http://blog.csdn.net/zzxxbb112/article/details/4489342 http://blog.csdn.net/hyholine/article/details/7218067  首先在qtp中打开spying对话框可以发现两个选项卡,一个是Native Properties,一个是Identification Proterties Native Properties是本地属性,Identification Proterties是QTP自己封装的属性,这些属性的封装信息可以在QTP注册表中发现(Mercury Interactive->Qui ...

qtb一些小结

一、描述性编程 1、对象名(“属性名:=属性值”) 第一种:单属性及其属性值来描述对象 Browser("micClass:=Browser").Page("micClass:=Page").WebEdit("name:=wd").Set "QTP自动化测试技术领航" Browser("micClass:=Browser").Page("micClass:=Page").WebButton("name:=百度一下").Click 第二种:描述多个 ...

VBS基础知识

    博客分类:
  • VBS
  该章我们将讲解vbs的基础知识,主要内容如下: 一、变量 [html] view plaincopy   Option Explicit   

Option Explicit 的使用

    博客分类:
  • QTP
Option Explicit   在 vbs 中语法不严谨,比如变量可以不用声明,看起来好像可以少写代码,但是这样做可读性不强,出错了不容易排查,同时增加维护成本。在首行加入 Option Explicit   dim helloworld=“1234654” msgbox helloworld  这里如果helloworld没有声明会报错
Private Function HReport(ExpectedValue,ActualValue,testStatus,nodename) Set oEventDesc = CreateObject("Scripting.Dictionary") //创建一个key-value字典 oEventDesc("Status") = micFail //本代码中无实际意义 oEventDesc("EnableFilter") = False //同上 oEventDesc("Node ...
区别   RO:runtime object  TO:testtime object   GetROProperty():取得实际对象的某个属性的值 语法:object.GetROProperty (Property, [PropData])    实例:获取登录按钮中的text属性,该属性是在运行脚本时登录按钮对应的text属性的实际值

QTP 验证数据

    博客分类:
  • QTP
 Browser("百度一下,你就知道").Page("百度一下,你就知道").WebEdit("wd").Set "d" Browser("百度一下,你就知道").Page("百度一下,你就知道").WebEdit("wd").CheckProperty "value","d1"  这里d1的值是和webedit中的值做比较 CheckProperty 后面的value是用自带工具jack抓取的。就是文本框wd ...
Global site tag (gtag.js) - Google Analytics