VÉRIFIER LA PRÉSENCE D'UN FICHIER (SIMPLE À COMPRENDRE)

soussou - 3 mars 2001 à 01:22
Renfield Messages postés 17287 Date d'inscription mercredi 2 janvier 2002 Statut Modérateur Dernière intervention 27 septembre 2021 - 18 avril 2010 à 22:49
Cette discussion concerne un article du site. Pour la consulter dans son contexte d'origine, cliquez sur le lien ci-dessous.

https://codes-sources.commentcamarche.net/source/729-verifier-la-presence-d-un-fichier-simple-a-comprendre

Renfield Messages postés 17287 Date d'inscription mercredi 2 janvier 2002 Statut Modérateur Dernière intervention 27 septembre 2021 74
18 avril 2010 à 22:49
utiliser l'API findfirstfile.

elle sert a ca ^^
mySQL15 Messages postés 79 Date d'inscription samedi 5 novembre 2005 Statut Membre Dernière intervention 28 août 2010
17 avril 2010 à 00:07
marche pas si c'est un fichier protégé systeme il le trouve pas
Renfield Messages postés 17287 Date d'inscription mercredi 2 janvier 2002 Statut Modérateur Dernière intervention 27 septembre 2021 74
24 janv. 2006 à 10:15
il faut utiliser :

Public Function IsFileExisting(ByRef Path As String) As Boolean
IsFileExisting = (GetFileAttributes(Path) <> INVALID_FILE_ATTRIBUTES)
End Function

dans le cas de fichier reseau, par exemple, Dir$ plante si le chemin est incorrect, ou n'existe pas...
SeeNapse Messages postés 33 Date d'inscription vendredi 24 janvier 2003 Statut Membre Dernière intervention 18 mai 2004
11 mars 2003 à 15:11
Unseul mot suffit : MAGNIFIQUE !!!!!!!!

Mais dans :

If Dir$("NomDeMonFichier", 7)<> VbNullString

C'est le tout le chemin d'accès ainsi que le de fichier qu'il faut mettre
laurent207 Messages postés 101 Date d'inscription jeudi 31 janvier 2002 Statut Membre Dernière intervention 11 avril 2008
15 janv. 2003 à 10:15
et pour un fichier qui est sur le réseau ont fait comment ?
J'ai utilisé le code et tout fonctionne à merveille. Merci beaucoup.
Petit complément:
If Dir$("NomDeMonFichier", 7)<> VbNullString
Le 7 n'est important que si vous voulez trouvez des fichiers cachés, systèmes, etc.
Bravo pour le code. je te notes 150/10.
Rejoignez-nous