Hi,
Currently i am facing the problem with excel file unable to open after
reading the data through qtp.
i used the bellow code for read the data.
Set myxl = createobject("excel.application")
Set workBook=myxl.Workbooks.Open("E:\Projects\Data.xls")
set mysheet =workBook.worksheets("Login")
Field1= mysheet.cells(2,2).value
Field2= mysheet.cells(3,2).value
Field3=mysheet.cells(4,2).value
Field4=mysheet.cells(5,2).value
Field5=mysheet.cells(6,2).value
myxl.ActiveWorkbook.Close
myxl.Application.Quit
Set mysheet =nothing
Set workBook=nothing
Set myxl = nothing
After running the code unable to open the file manually.
--
--
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.
