View PDF in Access Form

[redbaron06]

Hi all - I thumbed through the previous posts and was hoping to find more on the subject of displaying actual pdf documents in Access, without have them inserted as OLE obejects. I was wondering has anyone done anything simlar?

I have a database that includes hyperlinks to file paths. It would be nice if users could toggle the form with their criteria and have the pdf's located at these file paths (there could be more than one) displayed in the form.

Any help/insight is appreciated.

Cheers
-Terry

 

[jasmith4]

You can put in hyperlinks, but I think a separate browser application window will pop up if you click it. Also, if you really want to try this, go into the form's VBA module, pull down Tools/References, and look down the list for entries that begin with "Acrobat", "Adobe" and "PDF". For specifics on all these, try Adobe's forums from www.adobe.com

 

[redbaron06]

Thanks jasmith4, I went in and enabled them.

I have been trying, with no success, to generate some VB code (for MSA 2007) to get the pdf to display/be previewed using activex control (without have the user to click the hyperlinks, which I already have or a command button - which will most likely be grayed out when the user selects toggle filter). Once the form filter is activated, I am unable to get the activex box to even display with the pdf icon default.

 

[redbaron06]

Option Compare Database
Private Sub AcroPDF5_Updated(Code As Integer)
Dim pdfImage As PdfLib.Pdf, strPath As String
Dim strRecord As String
Set pdfImage = Me.Pdf2.Object
strRecord = PCCD_Database.Fields("File_Path")
strPath = strRecord & Me.txtPDFName
pdfImage.LoadFile strPath
End Sub

What I have so far, I am use to VBA in Excel. Thanks for any help.

 

[redbaron06]

Also attempted this to try to open the pdf up in a browser window using Activex in the form, but go a "object doesn't support this object or method" warning:

Private Sub Form_Current()
    
    If Len([File_Path]) > 0 Then
            Me!File_Path.Navigate2 [URL="http://www.mrexcel.com/forum/="]URL:=[/URL][File_Path]
        Else
            wbbWebsite.Navigate [URL="http://www.google.com/"]URL:="http://www.google.com/[/URL]"

    End If
End Sub

With the File_Path field containing different hyperlinks to U:/different_file_numbers.pdf. Any thoughts?

Thanks,
Terry