[RESOLVED] My existing code

[James Cole]

Option Compare Database
Option Explicit

Sub PDFpagecount()

Dim objPDF As AcroPDDoc, FN As String
Dim objDoc As AcroApp
Dim rs As Recordset, doc As String
Set rs = CurrentDb.OpenRecordset("PDF")
Set objDoc = "iprosystemadmin80.pdf"

rs!Field2 = objPDF.GetNumPages


End Sub

[tr333]

it would help if you actually asked a question.

[James Cole]

My codes relate to the question I asked two doors down....How can I populate a field in Access 2000 with the page number of .pdfs

[tr333]

sorry, didnt read the previous thread.

don't know the answer.