Ouvrir un fichier pdf avec Access VBA

bonjour,
je sais bien qu'on a déjà parlé de ça dans de nombreuses discussions mais je viens de les lire toutes (si si !) et je n'ai toujours pas trouvé de réponse à mon problème...
je voudrais ouvrir un pdf à partir d'Access, donc
le nom du fichier se trouve dans une variable
voici le code dans mon module :

Code:

---

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

---

puis :

Code:

---

ShellExecute Me.hwnd, "open", nomFich, "", CurrentProject.path, 1

---

avec dans nom de fichier : "C:\documents and settings\fichier.pdf"

à l'exécution je n'ai pas d'erreur mais il ne se passe rien ! rien de rien !

Faut-il déclarer autre chose autre part ?? (API dans références... un truc comme ça ??)

je sèche complet, ça fait 3 heures que je suis là-dessus
please help !

merci de votre aide

Dom

salut,
2 petites choses:
- as-tu adobe en logiciel par défaut pour les pdf ?
- lorsque tu lances le shellexecute, si tu fais ctrl alt sup, as-tu le process adobe de lancé ?

j'ai vérifié :
j'ai bien adobe par défaut pour les pdf
et non, je n'ai pas le process adobe après avoir lancé le shellexecute

c'est grave docteur ??

Bonjour

1 - Ton code est dans un module, mets Public au lieu de Private.

2 - L'appel de ce code est bien dans un formulaire ? As-tu un message d'erreur ?

Starec

et avec ceci ?

Code:

---

ShellExecute Me.hWnd, "open", nomFich, "", vbNullString, 1

---

en fait la déclaration est déjà en public dans un module général
l'appel se fait bien dans un formuliare oui, sur clic d'un bouton et je n'ai pas de message d'erreur
il ne se passe rien tout simplement...:pleure:

jpcheck
j'ai essayé ya suggestion, rien ne change...

starec, tu crois que ca pourrait venir du fichier dll ?

starec est déconnecté.... le méchant !

Citation:

---

Envoyé par dflamme

starec est déconnecté.... le méchant !

---

:langue:

As-tu essayé avec un autre type de fichier Word, Excel, etc ... ?
Car je ne vois pas, s'il n'y a pas de message d'erreur.

Starec

hello starec, contente de te retrouver !!

non je n'ai pas essayé mais je vais le faire immédiatement

Citation:

---

Envoyé par dflamme

hello starec, contente de te retrouver !!

---

:oops: Tu sais, j'ai aussi un métier, il faut quand même que je gagne ma vie.

:oops:
ok dac !
bon voici les dernières news :
j'ai essayé avec un fichier word et ça marche !

je n'avais pas la dernière version d'acrobat reader, j'ai fait installer la dernière mais que nenni, c'est pareil !

je n'y comprends rien... :evilred:

Re

Ok, si cela marche avec un fichier Word, cela signifie que ta syntaxe est correcte (c'est ce qu'il me semblait, mais je voulais en être sûr).

A priori tu as bien Adobe par défaut pour les PDF. Est-ce que lorsque tu doubles-cliques sur un fichier PDF celui-ci s'ouvre correctement ? (en fait la fonction ShellExecute réalise cette opération).

De plus à la place de CurrentProject.Path essaye de mettre l'endroit où se trouve ton fichier.

Si cela ne marche toujours pas d'autres pistes

:fleche: A la place de Me.Hwnd mets Application.hWndAccessApp

Si cela ne marche toujours pas essaye cela :

:fleche: Change le chiffre à la fin (cela va de 0 à 10)

Si cela ne marche toujours pas essaye cela :

Code:

---

1 2 3

dim Ret as Variant Ret = ShellExecute(.....) msgbox Ret

---

et regarde le résultat, si tu as un chiffre comme cela :

Les différentes valeurs et significations de ces codes d'erreur sont les suivantes:

Citation:

---

0 Le système manque de mémoire ou de ressources, l'exécutable est corrompu ou.réallocations non valides.
2 Fichier non trouvé.
3 Chemin non trouvé.
5 Une tentative a été faite pour se lier dynamiquement à une tache, ou il y a eu une erreur de partage ou de protection réseau.
6 La librairie requiert des segments de données séparés pour chaque tâche.
8 Il n'y a pas assez de mémoire disponible pour lancer l'application.
10 Version de Windows incorrecte.
11 Le fichier executable n'est pas correct, il se peut que ce ne soit pas une application Windows, ou qu'il y ait une erreur dans le fichier .EXE;
12 L'application a été conçue pour un autre système d'exploitation.
13 L'application a été conçue pour MS-DOS 4.0.
14 Le type de fichier executable est inconnu.
15 Tentative de chargement d'une application en mode réel.
16 Tentative de charger une seconde instance d'un fichier exécutable contenant plusieurs segments de données qui ne sont pas marqués en lecture seule.
19 Tentative de charger un fichier exécutable compressé, le fichier doit être décompressé avant d'être chargé.
20 Fichier de librairie liée dynamiquement (DLL) incorrect, une des DLLs requise pour exécuter cette application est corrompue.
21 L'application requiert les extensions Microsoft Windows 32-bit.
31 Il n'y a pas d'association le le type de fichier spécifié, ou il n'y a pas d'association pour l'action choisie pour le type de fichier choisi

---

.

Et si cela ne fonctionne toujours pas essaye de récupérer sur le net un lecteur de fichier PDF autre qu'Acrobat (il y'en a beaucoup de gratuits), et mets le pour ouverture par défaut. Si cela fonctionne cela viendrait de ton Acrobat Reader.

Et si cela ne fonctionne toujours pas, il ne reste qu'une chose :pleure: car là j'aurais épuisé toutes mes connaisssances.

Starec

:merci: beaucoup de prendre tout ce temps pour mon petit problème
je vais essayer tout ça et je te dis ce qu'il en est



Dom

j'ai un début de réponse :

les premières modifs que tu me suggères n'ont rien changé

par contre, le fait de récupérer le résultat de shellexecute (fonction) m'a donné le code erreur 31 : pas d'association de type de fichier
et effectivement, j'ai été obligée de faire l'association à la main après l'install de la nouvelle version d'acrobat tout à l'heure :yaisse2:

je mets la hot line locale sur le coup et je te tiens au courant

encore merci pour ton aide

Dom

De rien

Pour l'association tu l'as fait à partir des options des dossiers qui se trouve dans le panneau de configuration Windows ?

Starec

J'vais p't'êt' dire une connerie mais pourquoi s'acharner sur un ShellExecute ?
Pourquoi ne pas faire un simple Shell ?

Citation:

---

Envoyé par Kloun

J'vais p't'êt' dire une connerie mais pourquoi s'acharner sur un ShellExecute ?
Pourquoi ne pas faire un simple Shell ?

---

L'avantage de l'API ShellExecute c'est que cela sera plus générique, par exemple tu veux ouvrir un fichier Excel, mais le post n'a pas Excel, mais OpenOffice, si le fichier Excel est aussi associé à OpenOffice cela fonctionnera, avec la fonction Shell, tu plantes.

De plus si sur un poste une installation n'est pas conforme (chemin d'accés différents), pas de soucis avec ShellExecute, c'est comme si tu double-cliquait sur le fichier.

Starec

oui à partir des options des dossiers
et l'assoc existe bien, correcte et propre... malheureusement....

kesqui pourrait faire que le shellexecute ne reconnait pas l'assoc ????