Previous | Next | (P-PDF) Acrobat 6.0
Topic: Using VB to instantiate Set PDDoc = CreateObject("CAcroPDDoc")
Conf: (P-PDF) Acrobat 6.0, Msg: 110278
From: johnconnolly
Date: 4/24/2004 03:34 AM
When I try to instantiate CAcroPDDoc, I get a Object cannot be created error message, however, the Adobe Acorbat Type Library 6.0 says that all of these methods exist.
Please Help!
Private Sub Command1_Click()
Dim PDDoc As CAcroPDDoc
Dim PDPage As CAcroPDPage
Dim PDAnnot As CAcroPDAnnot
Dim AcroApp As CAcroApp
Dim souttxt
Dim sFileName
Dim sDocFile
Dim gblOutputFileName
Dim PCount As Long
Dim i As Long
Set PDDoc = CreateObject("CAcroPDDoc")
i = PDDoc.Open("C:\toc.pdf")
PCount = PDDoc.GetNumPages
For i = 1 To PCount
Set PDPage = PDDoc.AcquirePage(i)
For j = 1 To PDPage.GetNumAnnots
PDAnnot = PDPage.GetAnnot(j)
If PDAnnot.IsValid And PDAnnot.GetSubtype = "Link" Then
souttxt = souttxt & PDAnnot.GetContents
End If
Next j
Next i
