1. Accueil
  2. Forum Codes-Sources
  3. Visual Basic
Sujet Précédent Sujet Suivant

Dire si un fichier existe

Messages postés
287
Date d'inscription
vendredi 25 octobre 2002
Statut
Membre
Dernière intervention
18 janvier 2004
 -
Messages postés
94
Date d'inscription
lundi 23 septembre 2002
Statut
Membre
Dernière intervention
22 avril 2003
 -
Comment dit on "si un fichier existe"?
Merci de me répondre.

4 réponses

Réponse 1 / 4
Messages postés
1471
Date d'inscription
mardi 5 février 2002
Statut
Membre
Dernière intervention
20 octobre 2014
 12
Declare Function PathFileExists Lib "shlwapi.dll" Alias "PathFileExistsA" (ByVal pszPath As String) As Long

s'utilise :
dim Fexiste as boolean

Fexiste=PathFileExists("C:\Program files\Desk3\readme.txt")

Fexiste=True si le fichier existe
Réponse 2 / 4
Messages postés
37
Date d'inscription
lundi 1 juillet 2002
Statut
Membre
Dernière intervention
5 mai 2004
Tu peux aussi faire comme ca. 

Set fs = CreateObject("Scripting.FileSystemObject")
fs.FileExists("c:\boot.ini")
Réponse 3 / 4
Messages postés
15814
Date d'inscription
jeudi 8 août 2002
Statut
Modérateur
Dernière intervention
4 mars 2013
 133
J'ai fait une source nommée OBJET : Gestion fichiers qui parle de ca, va la voir si tu veux un exemple concret.

DARK SIDIOUS
Réponse 4 / 4
Messages postés
94
Date d'inscription
lundi 23 septembre 2002
Statut
Membre
Dernière intervention
22 avril 2003
Il y a beaucoup plus simple :

private function FichierExist(cheminFichier as string)as boolean

FichierExist = iif(Dir(cheminFichier)<>"",True,False)

end function
Posez votre question