02-23-2010, 02:26 PM
Take the first line of data and split the string after implex take that string as Name
take the second line and split by delimeter : and get the phone number
take the third line and trim it for Qualification
take the second line and split by delimeter : and get the phone number
take the third line and trim it for Qualification
Code:
Function GetPDFPageCount(filename)
Dim pdfFile,Acroapp,pdf
'PDF File preparations
Set Acroapp = CreateObject("AcroExch.App")
Set pdf = CreateObject("AcroExch.PDDoc")
pdf.Open filename,"temp"
Set pdfFile = pdf.GetPDDoc
GetPDFPageCount = pdfFile.GetNumPages
Set pdffile = nothing
Acroapp.Exit
End Function