View PDF in a form (1 Viewer)

[rangersedge]

I'm trying to view a pdf in a form if the file exists. My search has brought me to trying the WebBrowser control. I have it loading the file but it launches Adobe instead of just showing the PDF in the window on the form. Am I missing something?

 

[MarkK]

You have not provided anything for us to troubleshoot. Presumably you have VBA code which produces an html file.

 

[rangersedge]

I've been reading that all I have to do is put a Webbrowser control on a form and point it to the file path of a PDF and it will display the PDF in the box. Instead it opens Adobe and the browser is just blank.

Is there another way to display a PDF inside a form? I have both Adobe AcrobatX and Adobe Reader installed but neither show up in the ActiveX Controls or the Reference tools in VBA.

 

[MarkK]

There must be some code though. How to direct the web browser to the file? Like, remember in high school math, show your work! How do we troubleshoot where your process breaks down if you don't show your process?

point it to the file path of a PDF

How, exactly, do you do that?

 

[rangersedge]

I'm only using VBA to create the file path. I use this code to find the file...

Public Function GetDBPath() As String
GetDBPath = CurrentProject.Path & "\" & Me.SetNumber
End Function

I then have this to put the path into a text box for troubleshooting and to ensure the path is correct.

Private Sub Form_Current()
Dim Path As String

Path = GetDBPath
Me.Textbox1 = Path

Then I put a WebBrowser control on the form. I've tried setting the control source to the text box and even tried using the VBA code to set the path like this...

WebBrowser1.ControlSource(Me.Textbox1)

I can get the correct address in the text box and all the codes work. The problem is
that it opens up Adobe instead of just displaying the PDF in the window.

 

[TJPoorman]

Try this for your Current Event:

Private Sub Form_Current()
Dim Path As String

Path = GetDBPath
Me.Textbox1 = Path

Me.WebBrowser1.Object.Navigate Path
End Sub

 

[MarkK]

See how TJP is calling the Navigate() method of the web browser object, and passing in the path, which is the URL?

So once you are not worried about debugging anymore, you can refactor to . . .

Private Sub Form_Current()
   Me.WebBrowser1.Object.Navigate CurrentProject.Path & "\" & Me.SetNumber
End Sub

 

[rangersedge]

When I tried to use the Navigate command it didn't show up in the list of commands. When I typed it in anyway it gave an error saying that is not a valid command. This is the first time I've seen the Object put in front like that. I will give it a try.

 

[rangersedge]

The WebBrowser is still not showing the PDF. All it does is open Adobe to full screen and shows the PDF that way. I'm trying to get the PDF to view in the form itself. Navigating to the file is the easy part. The part I can't figure out is to make it stop opening Adobe and just show the PDF.

 

[MarkK]

It looks like this may be a setting in the Browser . . .

http://helpx.adobe.com/acrobat/using/display-pdf-browser-acrobat-xi.html

. . . check out the link.

 

[rangersedge]

That must have been the problem. I reinstalled Adobe Reader and then finally found the extension in the IE under the tab "Run without permission". Took to searching but now it works.

 

[rangersedge]

Would you happen to know how to make the PDF stay full screen inside the webbrowser? When I go to a new record it automatically has the PDF controls.

 

[MarkK]

It appears to me that this kind of thing is browser dependent, and in that case your google is as good as mine, sorry,

 

[rangersedge]

I have found this code to make the PDF fullscreen by setting the PDF viewer toolbar and nav panes to 0. Doesn't seem to work on Access 2013 with Adobe Reader XI

webBrowserControl.Navigate(filePath & "#toolbar=0&navpanes=0&scrollbar=0")