NTC is correct, if you have attachments for your database and you want to store the items as links the files would have to be available in both locations (that could be handled simply just by copying the file from your 'local' network to the 'remote' network.
you could do something like:
Code:
Public Function OpenWordPad(strFile As String)
Dim x As Variant
x = Shell("write.exe " & strFile, 1)
End Function
Public Function OpenNotePad(strFile As String)
Dim x As Variant
x = Shell("notepad.exe " & strFile, 1)
End Function
Public Function OpenWord(strFile As String)
Dim x As Variant
x = Shell("WINWORD.exe " & strFile, 1)
End Function
Public Function OpenExcel(strFile As String)
Dim x As Variant
x = Shell("EXCEL.exe " & strFile, 1)
End Function
Private Sub List0_DblClick(Cancel As Integer)
Dim spath As String
Dim sfile As String
spath = CurrentProject.Path
sfile = spath & "\files\" & List0.Column(3)
If Right(sfile, 4) = ".doc" Or Right(sfile, 4) = "docx" Then
OpenWord (sfile)
ElseIf Right(sfile, 4) = ".xls" Or Right(sfile, 4) = "xlsx" Then
OpenExcel (sfile)
Else
'.... other file types
End If
End Sub
in my sample database I've got a folder in the same folder as the database and I'm just dumping all the relevant files in there and this code works.
for the pdf's you've got to find where the program is installed on the 'remote' computer and create a function for that specific item