文章分类 -  QTP技巧-DP相关

摘要:Dim RepositorySet Repository = CreateObject("Mercury.ObjectRepositoryUtil.1")Repository.Load "C:\Test.tsr"'Set Repository = XMLUtil.CreateXMLFromFile("C:\Temp\TestOR.xml")'This array will be used to store all the object definitionsDim outArrayRedim outArray(0)&# 阅读全文
posted @ 2013-06-14 16:37 dushuai 阅读(177) 评论(0) 推荐(0)
摘要:1.Msgbox Browser("百度一下,你就知道").Page("百度一下,你就知道").WebEdit("wd").GetROProperty("attribute/Start")2.Browser("百度一下,你就知道").Page("百度一下,你就知道").WebEdit("wd").CheckProperty "attribute/Start","fileopen"3.Browser("百度一 阅读全文
posted @ 2012-07-08 18:03 dushuai 阅读(132) 评论(0) 推荐(0)
摘要:Set oDescBrowser = Description.CreateoDescBrowser("micclass").value = "Browser"Set allBrowsers = Desktop.ChildObjects(oDescBrowser)Msgbox allBrowsers.Count 阅读全文
posted @ 2012-06-12 21:19 dushuai 阅读(96) 评论(0) 推荐(0)
摘要:'Retrieve the Handle of the target WinEditiHWND = Window("").WinEdit("").GetROProperty("hwnd")Set oDesc = Description.CreateoDesc("micclass").Value = "WinEdit"Set oParent = Window("").ChildObjects(oDesc)For i = 0 to oParent.Count - 1if 阅读全文
posted @ 2012-06-12 21:10 dushuai 阅读(152) 评论(0) 推荐(0)