Follow along with the video below to see how to install our site as a web app on your home screen.
Note: This feature may not be available in some browsers.
'I tried this on Access 2002:
Option Compare Database
Option Explicit
Private Sub Command1_Click()
Dim dlg As FileDialog
Dim i As Long
Dim sFile As String
Set dlg = Application.FileDialog(msoFileDialogOpen)
With dlg
.Show
For i = 1 To .SelectedItems.Count
MsgBox .SelectedItems(i)
Next i
End With
Set dlg = Nothing
End Sub