Tek-Tips is the largest IT community on the Internet today!

Members share and learn making Tek-Tips Forums the best source of peer-reviewed technical information on the Internet!

  • Congratulations Mike Lewis on being selected by the Tek-Tips community for having the most helpful posts in the forums last week. Way to Go!

How to get the last page number (or page count) of a PDF document

Automation

How to get the last page number (or page count) of a PDF document

by  Mike Gagnon  Posted    (Edited  )
This requires Adobe Acrobat Professional to be installed (Or the appropriate runtime files minimum)

Code:
getlastpage('myPDF.pdf')  && Call the function

Procedure getlastpage(PDFDoc)
   Local oAcrobatExch
   oAcrobatExch = Createobject("AcroExch.PDDoc") &&Instanciate
   oAcrobatExch.Open(PDFDoc) && Open the document
   lnPagenum = oAcrobatExch.GetNumPages() && Get the last page number
   oAcrobatExch.Close() && Close the application
   Release oAcrobatExch
   Return lnPageNum
Endproc
Register to rate this FAQ  : BAD 1 2 3 4 5 6 7 8 9 10 GOOD
Please Note: 1 is Bad, 10 is Good :-)

Part and Inventory Search

Back
Top