On Saturday, April 13, 2013 2:09:41 AM UTC-4, Zak Shah wrote: > > Dim bro, url, image > > bro = "iexplore" > url = "http://www.chevrolet.com/tools/help-choose-vehicles.html"; > systemutil.Run bro, url > browser("title:=.*").Sync > wait 2 > DataTable.GetRowCount > i=1 > > Set mypage=browser("title:=.*").page("title:=.*") > > > While mypage.image("class:=mm size_3","index:="&i).exist > mypage.Sync > wait 3 > > > > Datatable( "L1", dtGlobalSheet )= mypage.image("class:=mm > size_3","index:="&i).getroproperty("filename") > Datatable( "L1", dtGlobalSheet )= mypage.image("class:=mm > size_3","index:="&i).getroproperty("href") > > > > > > > Set desc=description.Create > desc("micclass").value="WebElement" > desc("class").value="tx_price" > Set obj=browser("title:=.*").page("title:=.*").ChildObjects(desc) > Datatable( "l2", dtGlobalSheet )= obj(0).getroproperty("innertext") > mypage.image("class:=mm size_3","index:="&i).click > mypage.Sync > wait 4 > > i=i+1 > > Set desc2=description.Create > desc2("micclass").value="WebElement" > desc2("class").value="pf6a" > Set obj2=browser("title:=.*").page("title:=.*").ChildObjects(desc2) > Datatable( "l3", dtGlobalSheet )=obj2(0).getroproperty("outertext") > > > Datatable.SetCurrentRow(i) > > wait 6 > browser("title:=.*").Back > > > > Wend > > > > Now i wanted to export to excel sheet from datatable can you guys help? > >
-- -- You received this message because you are subscribed to the Google "QTP - HP Quick Test Professional - Automated Software Testing" group. To post to this group, send email to [email protected] To unsubscribe from this group, send email to [email protected] For more options, visit this group at http://groups.google.com/group/MercuryQTP?hl=en --- You received this message because you are subscribed to the Google Groups "QTP - HP Quick Test Professional - Automated Software Testing" group. To unsubscribe from this group and stop receiving emails from it, send an email to [email protected]. For more options, visit https://groups.google.com/groups/opt_out.
