άνοιγμα αρχείου pdf με εντολή

[manto]

Γεια χαρά σε όλους!Είμαι καινούργια στο forum αλλά και στην access, προσπαθώ να δημιουργήσω ένα button στη φόρμα μου και να προσθέσω τον κώδικα που θα μου ανοίγει συγκεκριμένο αρχείο σε .pdf που βρίσκεται στον c: (το ποιό αρχείο θα είναι αυτό είναι τιμή ενός πεδίου της φόρμας). Αρχικά, αρχάρια γαρ, ήθελα να πειραματιστώ και να ανοίξω ένα συγκεκριμένο pdf που έχω στο c: (το 750.pdf) χρησιμοποιώντας τον παρακάτω κώδικα που έχετε παραθέσει και εσείς.....Δυστυχώς δεν....Τι μπορεί να κάνω λάθος???

Option Compare Database
Option Explicit

Private Const SW_SHOWNORMAL = 1

Private Declare Function ShellExecute _
Lib "shell32.dll" Alias _
"ShellExecuteA" ( _
ByVal hwnd As Long, ByVal lpOperation As String, _
ByVal lpFile As String, ByVal lpParameters As String, _
ByVal lpDirectory As String, ByVal nShowCmd As Long) As Long

Private Sub Εντολή43_Click()

Dim OpenFile As Long
OpenFile = ShellExecute(0, "open", "C:\750.pdf", "", "C:\", SW_SHOWNORMAL)

End Sub

Ευχαριστώ εκ των προτέρων,
Μαρία