Previous | Next | (P-PDF) Acrobat 6.0

Topic: Troubles opening pdf file with Acrobat 6.0 reader
Conf: (P-PDF) Acrobat 6.0, Msg: 91243
From: treynolds
Date: 7/2/2003 01:51 AM

Using VB6 and Windows 2000 I had no trouble opening a pdf file in the Acrobat Reader. Now after upgrading to XP and Acrobat reader 6.0, I can't get my code to execute properly.

I get an "ActiveX component can't create object" error. The
line with *** on either end of it is the one that creates the
error.

Do you have a solution for me?

Here is my code:

Dim strStream As ADODB.Stream
Dim strPath As String
Dim AcroExchApp As Object
Dim AVDoc As Object

Set strStream = New ADODB.Stream
strStream.Type = adTypeBinary
strStream.Open
strStream.Write rs!PolicyDocument.Value
strPath = Write_Document_to_Desktop(strStream)

If Dir(strPath) = "" Or strPath = "" Then
strPath = strPath
End If

***Set AcroExchApp = CreateObject("AcroExch.App")***
AcroExchApp.Show

' Open the PDF
Set AVDoc = CreateObject("AcroExch.AVDoc")
If AVDoc.Open(strPath, "") <> True Then
Call MsgBox(EQCommon.ChangeTerm(UNABLE_TO_OPEN_POLICY_DOCUMENT), vbOKOnly, EQCommon.ChangeTerm(MODULE_DISPLAY_NAME))
End If

Thanks for your help,

TR