Discussion :

[antakini]

Bonjour,
J'ai dans un formulaire (access 2000) un bouton me permettant d'ouvrir un fichier dont le nom est fonction d'un de mes champs.
J'utilise le code suivant :

Code :

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

1
2
3
4
5
 
Dim lefichier As String
  lefichier = CurrentProject.Path & "\toto" & Me.nom.Value & ".pdf"
 
 shellexecute Me.hwnd, vbNullString, lelienHYDRO, "", vbNullString, 1

Ce code marche bien, mais parfois le fichier n'existe pas et lorsque je clique sur le bouton, rien ne se passe.
Je souhaiterai que dans ce cas apparaisse une MsgBox me disant que le fichier n'existe pas.
J'avais pensé utiliser : On Error, mais le fait de ne pas trouver le fichier ne semble pas être considéré comme une erreur.

auriez vous une idée ou unlien vers la FAQ, je n'ai rien su trouvé
merci

[fulgaro]

bonjour,
tu fais un test sur l'existance du fichier ...
si il existe tu exécutes sinon tu fais un msgbox..

utilises la fonction Dir ...

[Arkham46]

bjr,

l'API est une fonction qui renvoie le code retour
il suffit de tester ce que renvoit la fonction

Voir ici :
http://support.microsoft.com/kb/170918/fr

[antakini]

Salut et merci à FULGARO?

ca marche !!!!

a+

[antakini]

merci aussi à ARKHAM46,
Si ce n'est tous, dumoins plusieurs chemins menent à Rome !!!

a+