摘要: 有个程序里很多表格,表格中的信息是动态显示的,要验证表格中的信息(WebElement)。我尝试了一下,遇到一些问题:object.ChildItem (Row, Column, MicClass, Index),按类型和索引返回单元格中的测试对象。使用此方法时总提示我“缺少对象”,只有第一行第一列可以取到值,不知问题出在哪。脚本:On error resume next'msgbox browser("浏览器").Page("页面").WebTable("表格").RowCount '获取行数 = 13 同理得到列数 阅读全文
posted @ 2013-09-05 14:39 芯树 阅读(432) 评论(0) 推荐(0) 编辑
摘要: 有的程序制作菜单目录树时会使用WinTree控件,我们想打开目录树中的某个节点时,该如何去做呢?方法如下:(1)按照节点目录顺序一级一级的展开节点所在的目录(使用WinTree的Expand方法)Expand方法参数有两种类型:一种是目录的名称,一种是目录的序号,由于目录的序号会随当前展开的目录的不同而可能会变化,所以我们可以使用目录的名称作为参数,那么如何知道我们想要的节点的目录名称是什么呢,当我们用spy试图去获取WinTree某个节点时,我们会发现没法定位到该节点,只能定位到WinTree控件范围,不必惊慌,先用spy把WinTree的属性获取到,我们会看见WinTree中有一个属性se 阅读全文
posted @ 2013-09-03 15:39 芯树 阅读(110) 评论(0) 推荐(0) 编辑
摘要: Version:0.9 StartHTML:00000107 EndHTML:00007546 EndFragment:00007506 EndFragment:00000000'************************************'鍔熻兘:鑾峰彇褰撳墠骞存湀鏃ユ椂鍒嗙鐨勮繛缁暟瀛楀瓧绗︿覆'鍙傛暟:鏃�'璋冪敤鏂瑰紡: ret = GetCurrentTime()'杩斿洖鍊�:杩斿洖骞存湀鏃ユ椂鍒嗙鐨勮繛缁暟瀛楀瓧绗︿覆濡�:20130808080808'浣滆€�:HF'鏃ユ湡:2013-08-19' 阅读全文
posted @ 2013-08-19 15:49 芯树 阅读(120) 评论(0) 推荐(0) 编辑
摘要: 1.如何遍历WebTable的所有单元格? QTP中的WebTable测试对象提供了RowCount和ColumnCount,可用于遍历WebTable中的所有单元格。 再配合GetCellData、ChildItem等,就可以对WebTable中的每一个单元格中的对象进行操作。 下面的例子获取到WebTable每一个单元格中的链接对象: Set w_WebTable = Browser(XXX).Page(XXX).WebTable(XXX) For I = 1 To w_WebTable.RowCount For J =1 To w_WebTable.ColumnCount(1) ' 阅读全文
posted @ 2013-08-14 15:36 芯树 阅读(564) 评论(0) 推荐(0) 编辑
摘要: Microsoft Office Professional Plus 2007 在安装过程中出错。Error 1406.Setup cannot write the value Microsoft Pinyin IME Migration to the registry key \Software\Microsoft\Windows\CurrentVersion\Run.Verify that you have sufficient permissions to access the registry or contact Microsoft Product Support Servicess 阅读全文
posted @ 2013-08-02 10:46 芯树 阅读(856) 评论(0) 推荐(0) 编辑
摘要: 有的程序制作菜单目录树时会使用WinTree控件,我们想打开目录树中的某个节点时,该如何去做呢?方法如下:(1)按照节点目录顺序一级一级的展开节点所在的目录(使用WinTree的Expand方法)Expand方法参数有两种类型:一种是目录的名称,一种是目录的序号,由于目录的序号会随当前展开的目录的不同而可能会变化,所以我们可以使用目录的名称作为参数,那么如何知道我们想要的节点的目录名称是什么呢,当我们用spy试图去获取WinTree某个节点时,我们会发现没法定位到该节点,只能定位到WinTree控件范围,不必惊慌,先用spy把WinTree的属性获取到,我们会看见WinTree中有一个属性s. 阅读全文
posted @ 2013-07-29 14:25 芯树 阅读(553) 评论(0) 推荐(0) 编辑
摘要: **********************************************************************1.打开已存在的excel文件,并使其可见***************************************************Set excelApp = CreateObject("excel.application")excelApp.Visible = True '使excel程序可见excelApp.Workbooks.Open"d:\test.xls" '打开d:\test 阅读全文
posted @ 2013-07-26 11:08 芯树 阅读(278) 评论(0) 推荐(0) 编辑
摘要: 方法1 ——借助Class' 定义一个有多个变量成员的类Class MultiValue Dim a, b, cEnd ClassFunction ClassMulti(param1, param2, param3) Dim oClass ' 实例化类 Set oClass = New MultiValue oClass.a = param1 oClass.b = param2 oClass.c = param3 ' 指定函数返回为oClass对象 Set ClassMulti = oClassEnd FunctionDim oClassSet oClass = Cla 阅读全文
posted @ 2013-07-16 11:18 芯树 阅读(2047) 评论(0) 推荐(0) 编辑
摘要: QTP的回放模式有两种,如下所示:1.Event模式--事件跟踪2.Mouse模式--鼠标跟踪Event模式就是我们平时默认用的模式,也就是事件,其实QTP的click方法只是触发了对象的CLICK事件,而并未真正通过鼠标来进行点击按钮。而如果我们使用的是Mouse模式的话,我们会看到回放的时候,鼠标是跟着对象走的,也就是鼠标跟踪模式。下面我们来具体看一下是怎么切换回放模式:切换回放模式有两种方法:a.修改QTPOPTIONS设置我们进入到TOOLS--》options--》WEB-->ADVANCED然后列表拖到最下面可以找到REPLAYTYPE,可以选择是通过Event或者Mouse 阅读全文
posted @ 2013-07-13 16:48 芯树 阅读(343) 评论(0) 推荐(0) 编辑
摘要: 在vbs中有两种方法运行一个指定的应用程序:1. 使用wshShell对象提供的run()方法执行:Set wshell=CreateObject("WScript.Shell")wshell.Run """C:\Program Files\360\360se3\360se.exe""",0,True Set wshell = Nothing2. 使用wshShell对象提供的exec()方法执行:Dim WshShell, oExecSet WshShell = CreateObject("WScrip 阅读全文
posted @ 2013-07-11 16:06 芯树 阅读(1201) 评论(0) 推荐(0) 编辑