Open pdf file from Access form

[lios1984]

I have a form where I enter data about Cities (just an example). The user will be able to to pick a pdf file (for example history of the city) and add its location in the matching record. Then anyone reading the form will be able to open (from a simple command button) the proper file.
City File
London london.pdf
Athens athens.pdf

and so on...

How can I do that?



I need a browse button to help the user select the proper file and a command button. And I thinnk that the file should always be available in the same URL.

[orange]

Do some research on

Application.Followhyperlink .........location of your pdf file

but other methods are available
see http://www.utteraccess.com/wiki/inde...es_From_Access

[lios1984]

I read a lot of links and I must admit I am kind of puzzled. So far the only suggestion that has almost worked is the one described here.

I have done it and it succesfully opens the dialog box, it selects the file and it puts its path into the textbox. The only problem is that when I press on the hyperlink in the textbox, it does nothing instead of what I want: open the file.

What can I do?

[lios1984]

Sorry, I have to add one more problem with this solution: the file pathname doesn't remain when I reopen the form. I want it to stay there for other users to see and open if they like.

[orange]

This is a simple example of opening a pdf file using VBA

Sub Open_pdf()
Dim str As String ' this is the path to the file
str = "C:\Users\Jack\Documents\"  'path to .pdf
Application.FollowHyperlink str & "NASCAROrderFeb122011.pdf"
End Sub

This will open the pdf file C:\Users\Jack\Documents\NASCAROrderFeb122011.pdf in a new browser window

[lios1984]

But this means that I have to know in advance which file's path will be in the hyperlink. That's not what I'm looking for. I want the user to select from a browse box the file and then the hyperlink box will have its pathname available to select and open the file.

Browser box: Select myfile.pdf
Hyperlink box: Insert and save path to myfile.pdf

Then the user, whenever he/she wants, can open the file through the hyperlink box.

[June7]

You want user to select a file with Windows file dialog browser and open a selected file? Try:

Private Sub cmdFileDialog_Click()
' Requires reference to Microsoft Office 1x.0 Object Library.
   Dim fDialog As Office.FileDialog
   Dim varFile As Variant
   ' Clear listbox contents.
   ''Me.FileList.RowSource = ""
   ' Set up the File Dialog.
   Set fDialog = Application.FileDialog(msoFileDialogFilePicker)
   With fDialog
      ' Allow user to make multiple selections in dialog box
      ''.AllowMultiSelect = True
      .AllowMultiSelect = False
      ' Set the title of the dialog box.
      .Title = "Please select one or more files"
      ' Clear out the current filters, and add our own.
      .Filters.Clear
      .Filters.Add "Access Databases", "*.MDB"
      .Filters.Add "Access Projects", "*.ADP"
      .Filters.Add "All Files", "*.*"
      ' Show the dialog box. If the .Show method returns True, the
      ' user picked at least one file. If the .Show method returns
      ' False, the user clicked Cancel.
      If .Show = True Then
         ' Loop through each file selected and add it to our list box.
         For Each varFile In .SelectedItems
            ''Me.FileList.AddItem varFile
            Application.FollowHyperlink varFile
         Next
      Else
         MsgBox "You clicked Cancel in the file dialog box."
      End If
   End With
End Sub

[lios1984]

I have a problem with opening a FileDialog. It's asking me to register OLE server when I press ActiveXControls. The other day it was working...