51Testing软件测试论坛

标题: 导入的Excel的数据，执行的次数问题？ [打印本页]

作者: jino007 时间: 2010-5-24 13:32
标题: 导入的Excel的数据，执行的次数问题？
导入的Excel的数据，执行的次数问题？

datatable.ImportSheet "D:\aa.xls","Global","Global"'第一个global是原excel表的sheet名称，第二个是QTP里面的sheet的名称。
Dim dtsheet
Set dtsheet=datatable.GetSheet("Global")'设置qtp中excel对象实例。
'i=dtsheet.GetRowCount
'msgbox i

Browser("Browser").Page("Find a Flight: Mercury").WebList("passCount").Select "4"
Browser("Browser").Page("Find a Flight: Mercury").WebList("fromDay").Select "20"
Browser("Browser").Page("Find a Flight: Mercury").WebList("toPort").Select "Frankfurt"
Browser("Browser").Page("Find a Flight: Mercury").Image("findFlights").Click 64,11
Browser("Browser").Page("Select a Flight: Mercury").Image("reserveFlights").Click 60,9

For i=0 to 3
' wait 1
Browser("Browser").Page("Book a Flight: Mercury").WebEdit("name:=passFirst"&i).Set DataTable("li", dtGlobalSheet)'li是导入的excel表第一行的数据，一般设置为列的名称。
Browser("Browser").Page("Book a Flight: Mercury").WebEdit("name:=passLast"&i).Set DataTable("ww", dtGlobalSheet)
'dtsheet.SetNextRow'下一行。
'wait 1
Next

我导入的是四行数据，是不是一定会执行四次呢？

作者: TIB 时间: 2010-5-24 16:33
cnt=DataTable.GetRowCount
For i=1 to cnt
DataTable.SetCurrentRow(i)
。。。
Next

作者: jino007 时间: 2010-5-25 10:52
不行啊~因为导入的excel有四行啊 QTP不是规定有多少行就实行多少次么

作者: souchy 时间: 2010-5-25 12:24
真服了LZ了，这么执着于用全局表，但又不去搞清全局表的特点！

作者: jino007 时间: 2010-5-25 13:47
知道了~谢谢提醒~用local就好了

作者: jino007 时间: 2010-5-25 13:53
其实global 和local的区别我看过了，只是用的时候就忘了~通过这次实践应该会加深记忆的~谢谢各位的提醒。

欢迎光临 51Testing软件测试论坛 (http://bbs.51testing.com/)