2012年9月7日
QTP设计模式-单例设计模式
摘要： '单例设计模式举例:Option ExplicitPublic oExcel '声明全局变量Class ExcelWrapperPrivate oExcelObject'初始化类Private Sub Class_InitializeDim bAlreadyInit '判断对象是否存在的标志位'检查对象是否已经被初始化bAlreadyInit = FalseIf IsObject(oExcel) = True then'对象初始化If Not oExcel is Nothin then'激活状态bAlreadyInit = TrueEnd 阅读全文
posted @ 2012-09-07 18:04 dushuai 阅读(176) 评论(0) 推荐(0) 编辑
打印当前运行到的行号
摘要： Print Setting("executionline") + 1 阅读全文
posted @ 2012-09-07 14:15 dushuai 阅读(115) 评论(0) 推荐(0) 编辑
使用DOM操控各类HTML元素
摘要： '1.WebEdit:'HTML源代码样例:'<INPUT type="text" value="QuickTest" id="ID_001" name="NAME_001">'QTP中代码样例:'操作方式1:'获取DOM对象set oDocument = Browser("Browser").Page("Page").Object'使用GetElementByID获取对象元素,并更改文本框WebEdit的v 阅读全文
posted @ 2012-09-07 14:02 dushuai 阅读(287) 评论(0) 推荐(0) 编辑
IE HTML DOM的应用
摘要： '等待页面加载:'使用IE COM启动IESet oIE = CreateObject("InternetExplorer.Application")oIE.Visible = True '设置可见oIE.Navigate "http://www.baidu.com" '跳转URL'等待IE页面加载完毕While oIE.Busy: Wend'利用DOM操作测试对象'(1)通过getElementByID方法获取定位对象,并对其进行操作:'使用IE COM启动IEoIE.Visible = 阅读全文
posted @ 2012-09-07 10:36 dushuai 阅读(278) 评论(0) 推荐(0) 编辑