Discussion :

[DJOUFOU]

Bonjour à tous,
je viens de terminer le fichier d'aide de mon application access. le fichier à été édité en MS Word mais j'ai enregistrée une copie en PDF
maintenant je souhaite pouvoir l'ouvrir en cliquant sur le bouton "Aide" dans l'application.

Quelqu'un pourrait il me mettre sur une voie svp?

Merci d'avance.

[RobiPMS]

Bonjour.
Tu peux utiliser la fonction Shellexecute, qui exploite l'association "type de fichier" <--> "application", dans une procédure événementielle sur click de ton bouton.
Dans le module du formulaire, dans les déclarations :

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
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

Ensuite, pour lancer le fichier pdf :

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
Private Sub BtnAide_Click()
    ShellExecute Me.hwnd, "open", "c:\Tonapplication\Aide.pdf", "", CurrentProject.Path, 1
End Sub

Il y a d'ailleurs une réponse à ce sujet dans la FAQ
Cordialement

[DJOUFOU]

Merci,
j'ai éssayé et j'avais un message d'erreur au depart. j'utilise une version access 64bits et un message me disais ""... mettre l'attribut PtrSafe.."
j'y suis arrivé par tatonnement car je ne savais pas exactement ou le mettre et voila mon nouveau code qui fonctionne tres bien:

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
5
6
7
Option Compare Database
Private Declare PtrSafe 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 Commande0_Click()
    ShellExecute Me.hwnd, "open", "C:\FreemanSoft\ressources\Aide.pdf", "", CurrentProject.Path, 1
End Sub

c'est super et merci beaucoup.

[RobiPMS]

Content que ton problème soit réglé. Il y a effectivement des incompatibilités entre le code access 32 bits et la version 64 bits. A éviter!