Componente AcroExch

Sergio de Mingo
29 de Enero del 2003
Este es mi código:

Private Sub Command1_Click()

Dim gApp As Acrobat.CAcroApp
Dim gPDDoc As Acrobat.CAcroPDDoc

Set gApp = CreateObject("AcroExch.App")
Set gPDDoc = CreateObject("AcroExch.PDDoc")

If gPDDoc.Open("c:adobe.pdf") Then
gApp.Show
End If

End Sub

Y el problema es que el componente ActiveX no puede crear el objeto. Supongo que es porque no tengo el componente AcroExch. ¿Dónde puedo conseguirlo? Gratis o pagando, no importa

Gracias


[email protected]