关于QTP的问题，软件测试

来源：百度知道 编辑：UC知道 时间：2024/06/11 21:39:38
Dim i,m

Browser("Find a Flight: Mercury").Page("Flight Confirmation: Mercury").Link("Flights").Click
Browser("Find a Flight: Mercury").Page("Find a Flight: Mercury").WebList("passCount").Select DataTable("passenger", dtGlobalSheet)

m = Browser("Find a Flight: Mercury").Page("Find a Flight: Mercury").WebList("passCount").GetROProperty("all items")

Browser("Find a Flight: Mercury").Page("Find a Flight: Mercury").Image("findFlights").Click 59,17
Browser("Find a Flight: Mercury").Page("Select a Flight: Mercury").Image("reserveFlights").Click 51,10
For i = 0 To m-1 Step 1
Browser("Find a Flight: Mercury").Page("Book a Flight: Mercury").WebEdit("passFirst&i").Set "j"
Browser("Find a Flight: Mercury").Page("

1. m = Browser("Find a Flight: Mercury").Page("Find a Flight: Mercury").WebList("passCount").GetROProperty("all items")
2. For i = 0 To m-1 Step 1
For语句中m应该是整型，但all items取得是字符串，所以类型不匹配
应该改为
m = Browser("Find a Flight: Mercury").Page("Find a Flight: Mercury").WebList("passCount").GetROProperty("items count")
根据我的经验错误应该是这样的，

你应该把错误提示信息贴出来啊

错误在哪里？

你应该把提示错误的信息也写出来。再加上该段代码的主要功能