导入的Excel的数据，执行的次数问题？

jino007

导入的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




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

jino007

其实global 和local的区别我看过了，只是用的时候就忘了~通过这次实践应该会加深记忆的~谢谢各位的提醒。

jino007

知道了~谢谢提醒~用local就好了

souchy

真服了LZ了，这么执着于用全局表，但又不去搞清全局表的特点！

jino007

不行啊~因为导入的excel有四行啊 QTP不是规定 有多少行就实行多少次么

TIB

cnt=DataTable.GetRowCount
For i=1 to cnt
       DataTable.SetCurrentRow(i)
       。。。
Next