51Testing软件测试论坛

标题: 请教:QTP对象不能识别 [打印本页]

作者: caibei    时间: 2010-6-2 11:18
标题: 请教:QTP对象不能识别
代码如下:
Dim sheetname, i, rowcount

sheetname = datatable.GetSheet(dtlocalsheet).Name
datatable.ImportSheet "E:\TEST\Excel.xls", "Sheet1", sheetname
rowcount = datatable.GetSheet(dtlocalsheet).GetRowCount
i = 0
Do until i>rowcount
        i = i+1
        datatable.GetSheet("Action1").SetCurrentRow(i)
Browser("Welcome: Mercury Tours").Page("Sign-on: Mercury Tours").WebEdit("userName").Set datatable("Login", dtlocalsheet)
Browser("Welcome: Mercury Tours").Page("Sign-on: Mercury Tours").WebEdit("password").Set datatable("Pwd", dtlocalsheet)
Browser("Welcome: Mercury Tours").Page("Sign-on: Mercury Tours").VirtualButton("login_button").Click
Browser("Welcome: Mercury Tours").Page("Find a Flight: Mercury").WebList("fromPort").Select datatable("FromPort", dtlocalsheet)
Browser("Welcome: Mercury Tours").Page("Find a Flight: Mercury").WebRadioGroup("servClass").Select "Business"
Browser("Welcome: Mercury Tours").Page("Find a Flight: Mercury").Image("findFlights").Click 7,10
Browser("Welcome: Mercury Tours").Page("Select a Flight: Mercury").WebRadioGroup("outFlight").Select "Blue Skies Airlines$361$271$7:10"
Browser("Welcome: Mercury Tours").Page("Select a Flight: Mercury").WebRadioGroup("inFlight").Select "Blue Skies Airlines$631$273$14:30"
Browser("Welcome: Mercury Tours").Page("Select a Flight: Mercury").Image("reserveFlights").Click 32,11
Browser("Welcome: Mercury Tours").Page("Book a Flight: Mercury").WebEdit("passFirst0").Set "f1"
Browser("Welcome: Mercury Tours").Page("Book a Flight: Mercury").WebEdit("passLast0").Set "f2"
Browser("Welcome: Mercury Tours").Page("Book a Flight: Mercury").WebEdit("creditnumber").Set "1000"
Browser("Welcome: Mercury Tours").Page("Book a Flight: Mercury").WebList("pass.0.meal").Select datatable("Meal", dtlocalsheet)
Browser("Welcome: Mercury Tours").Page("Book a Flight: Mercury").Image("buyFlights").Click 6,15
Browser("Welcome: Mercury Tours").Page("Flight Confirmation: Mercury").Image("Logout").Click
Loop

脚本运行完毕后,出现错误提示框:“Cannot identify the object "fromPort"(of class WebList). Verify that this object's properties match an object currently displayed in your application”

在比较object仓库与runtime object 属性值后,未发现明显的区别?;"fromPort"对象的继承关系class等属性也是一致的,不知道问题出在哪里了,劳烦知道的同学,传授下经验!
作者: TIB    时间: 2010-6-2 11:22
如果登录用户名、密码错误了,则登录不了,去不到指定的页面,这样也就找不到指定的对象了,检查一下datatable("Login", dtlocalsheet)和("Pwd", dtlocalsheet)取到的值
作者: caibei    时间: 2010-6-2 11:44
标题: 回复 2# 的帖子
Dim sheetname, i, rowcount, mlogin, mpwd

sheetname = datatable.GetSheet(dtlocalsheet).Name
datatable.ImportSheet "E:\TEST\Excel.xls", "Sheet1", sheetname
rowcount = datatable.GetSheet(dtlocalsheet).GetRowCount
i = 0
Do until i>rowcount
        i = i+1
        datatable.GetSheet("Action1").SetCurrentRow(i)
Browser("Welcome: Mercury Tours").Page("Sign-on: Mercury Tours").WebEdit("userName").Set datatable("Login", dtlocalsheet)
mlogin = datatable("Login", dtlocalsheet)
msgbox mlogin
Browser("Welcome: Mercury Tours").Page("Sign-on: Mercury Tours").WebEdit("password").Set datatable("Pwd", dtlocalsheet)
mpwd = datatable("Pwd", dtlocalsheet)
msgbox mpwd

可以打印出登录名与密码!
作者: sc_zk2008    时间: 2010-6-2 14:00
试试检查下是否有相同属性的对象存在
作者: yylfchl    时间: 2011-10-19 14:23
SystemUtil.Run "C:\Program Files\Internet Explorer\iexplore.exe","","C:\Documents and Settings\pc003-2011","open"
Browser("百度一下,你就知道").WinEdit("Edit").SetSelection 0,21
Browser("百度一下,你就知道").WinEdit("Edit").Type "http://192.168.10.148:8080/ca"
Browser("百度一下,你就知道").WinEdit("Edit").Set "http://192.168.10.148:8080/cas"
Browser("百度一下,你就知道").WinEdit("Edit").Type  micReturn
Browser("百度一下,你就知道").Page("电子交易平台管理系统").WebEdit("empAcct").Set "yyl"
Browser("百度一下,你就知道").Page("电子交易平台管理系统").WebEdit("password").Click
Browser("百度一下,你就知道").Page("电子交易平台管理系统").WebEdit("password").SetSecure "4e9e6909c197016bc6d605678fda"
Browser("百度一下,你就知道").Page("电子交易平台管理系统").WebEdit("validcode").Click
Browser("百度一下,你就知道").Page("电子交易平台管理系统").WebEdit("validcode").Set "8020"
Browser("百度一下,你就知道").Page("电子交易平台管理系统").Image("dl").Click
Browser("百度一下,你就知道").Page("电子交易平台后台管理系统").Link("交易管理").Click
Browser("百度一下,你就知道").Page("交易管理").Sync
Browser("百度一下,你就知道").Close
回放出错:Cannot identify the object "交易管理" (of class Link). Verify that this object's properties match an object currently displayed in your application.
求帮忙解决
作者: wx小鱼    时间: 2011-10-20 09:55
学习了




欢迎光临 51Testing软件测试论坛 (http://bbs.51testing.com/) Powered by Discuz! X3.2