HI all,
Problem opening an excel sheet
Below is the code where I am getting the inputs from Excel sheet and again
exporting the values to the same excel the below code is working fine. And
I can see the table in the result sheet. But when I go and open the excel
sheet sheet. I am getting an error message"Excel found unreadable content
in test1.xls. do yo want to recover the content" Can any one help me please
datatable.AddSheet(test)
datatable.ImportSheet "C:\Documents and Settings\aa\Desktop\test1.xls",1,3
r = datatable.GetSheet(3).GetRowCount
For i =1 to r
datatable.SetCurrentRow(i)
Window("Program Manager").WinListView("SysListView32").Activate "Flight"
Dialog("Login").WinEdit("Agent Name:").Set datatable("agent",3)
Dialog("Login").WinEdit("Agent Name:").Type micTab
Dialog("Login").WinEdit("Password:").Set datatable("pwd",3)
Dialog("Login").WinEdit("Password:").Type micReturn
If window("Flight Reservation").Exist Then
datatable("res",3)="pass"
else
datatable("res",3)="fail"
End If
Window("Flight Reservation").Close
Next
datatable.ExportSheet "C:\Documents and Settings\aa\Desktop\test1.xls",3
--
Regards
Shashidhar
+91 -8125564879
[email protected]
--
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
