2、positoryManager来手工的进行操作,比如测试对象的增删改,XML对象库的导出和导入,检索以及复制测试对象等等。instructions:ObjectMotelDescriptionObjectRepositoryUtil可以在QTP外部对对象库文件中的对象进行操作和管理TOCollection测试对象的集合,可以通过ObjectRepositoryUtil返回Example:1.在vbsEdti中创建ObjectRepositoryUtil对象Set autoRepository= C
4、riptingbyzzxxbb112 ********************* OptionExplicit '强制所有变量的显式声明 DimautoRepository,TOCollection,testobject,i '声明变量 Set autoRepository= CreateObject("Mercury.ObjectRepositoryUtil") '创建ORAOM对象 autoRepository.Load "d:/baidu.tsr" '导入对象库文件 Set TOColle
5、ction=autoRepository.GetAllObjectsByClass("Link") '获取所有链接类的对象集合 For i=0 To TOCollection.count-1 '遍历所有测试对象 Set testobject=TOCollection.item(i) '获取测试对象 If autoRepository.GetLogicalName(testobject)="知道" Then '判断对象名称为“知道”执行一下操作 testobject
6、.SetTOproperty "text","图片" '更改对象库的TEXT属性为“图片” autoRepository.UpdateObject testobject '更新对象 autoRepository.RenameObject testobject,"图片" '重命名对象名称 autoRepository.Save '保存对象库 ExitFor '退出循环 EndIf Next Set testobject=
7、 Nothing Set TOCollection= Nothing Set autoRepository= Nothing '释放所有对象 '******************************* end ****************************注意:经本人研究,以上代码的对象释放不可省略,并且要由里向外的释放,否则会造成运行时报错,这一点在QTP的帮助文档里也没有提到 执行完以上脚本之后我们重新打开之前的那个TSR文件可以清楚的看到之前LINK类的"知道"对象