Hi,
I have PDF file in table format (like rows and columns), for each column
i have some values and i need to compare that values with DB.
Any simple way to read columns and values in PDF using QTP?
sofar, i prepared the below code,
Dim Acroapp,
AcroAVDoc,AcroPDDoc,i,j,Page_No,Pagecontent,AcroTextSelect,content
'Set AcroApp = New AcroExch.App
Set Acroapp = CreateObject("AcroExch.App")
Acroapp.Show
Set AcroAVDoc = Createobject("AcroExch.AVDoc")
AcroAVDoc.Open "D:\Reqfile.PDF",""
wait(5)
Set AcroAVDoc =Acroapp.GetActiveDoc
Set AcroPDDoc = AcroAVDoc.GetPDDoc
GetPDFPageCount = AcroPDDoc.GetNumPages
For i=0 to 1
'For i=1 to GetPDFPageCount
Set Page_No = AcroPDDoc.AcquirePage(i)
Set Pagecontent = Createobject("AcroExch.HiliteList")
Pagecontent.Add 0,20
Set AcroTextSelect=Page_No.CreateWordHilite(Pagecontent)
For j=0 to AcroTextSelect.GetNumText
content =content&AcroTextSelect.GetText(j)
Next
Next
Print content
AcroAVDoc.Close True
Acroapp.Exit
Set AcroAVDoc = nothing
Set AcroPDDoc = nothing
Set Acroapp = nothing
--
--
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/d/optout.
