|
IndexNum=Browser("Welcome: Mercury Tours").Page("Find a Flight: Mercury").WebList("fromPort").GetROProperty("all items")
MyArray=split(IndexNum,";",-1,1)
DataTable.SetCurrentRow(id)
DataTable.Value("web_item",Global)=MyArray(id)
DataTable.GetSheet("Global").SetNextRow
'Browser("Welcome: Mercury Tours").Page("Find a Flight: Mercury").WebList("fromPort").Select DataTable("web_item", dtGlobalSheet)
Browser("Welcome: Mercury Tours").Page("Find a Flight: Mercury").WebList("fromPort").Select "#"&id
参考吧 |
|