Tester la presence d'un fichier (autre méthode)

Soyez le premier à donner votre avis sur cette source.

Vue 12 342 fois - Téléchargée 539 fois

Description

Comment puis-je tester la présence d'un fichier ?

Utilisez ce code :

Source / Exemple :


Dim MonFichier As String
MonFichier = "c:\autoexec.bat"

If Dir(MonFichier, vbNormal or vbReadOnly or vbHidden or vbSystem or vbArchive) = "" then
        Call Msgbox ("Ce fichier n'existe pas !")
Else
        Call msgbox ("Ce Fichier existe !")
End If

Codes Sources

A voir également

Ajouter un commentaire Commentaires
ICIoBRa
Messages postés
368
Date d'inscription
dimanche 24 juin 2001
Statut
Membre
Dernière intervention
7 décembre 2015

23 avril 2003 à 12:45
FSO hein ? normal l'été arrive ... :)
BinOff
Messages postés
25
Date d'inscription
mardi 24 juillet 2001
Statut
Membre
Dernière intervention
13 décembre 2007

2 mars 2002 à 16:06
FSO est incompatible avec Windows 95....
Vaut mieux utiliser la bonne vieille méthode avec DIR.
Perso, c celle que je préfère.
Je trouve que la méthode avec la fonction LEN est bien moins interressante (il y en a de proposées sur ce site).

Enfin faites ce que vous voulez ... ;-)
Meme si Win95 est de moins en moins utilisé...
cs_IZNOGOOD
Messages postés
3
Date d'inscription
vendredi 20 avril 2001
Statut
Membre
Dernière intervention
7 mars 2002

27 févr. 2002 à 22:44
Tu peux essayer avec un file system object ...

Public Function bPuGetIsFileExist(ByVal sFile As String) As Boolean
On Error GoTo bPuErGetIsFileExist
Dim fs As Object
Set fs = CreateObject("Scripting.FileSystemObject")
bPuGetIsFileExist = fs.FileExists(sFile)
Exit Function
bPuErGetIsFileExist:
bPuGetIsFileExist = False
End Function
Tu passe ton fichier en parametre (path+fichier)
gcorp
Messages postés
7
Date d'inscription
dimanche 30 décembre 2001
Statut
Membre
Dernière intervention
13 janvier 2002

30 déc. 2001 à 08:34
ça marche pas ce truc avec moi : la fonction dir ne me renvoie jamais "" mais le nom du premier fichier du répertoire du projet ?!!? :-(
Quelqu'un sait-il où j'ai pu me planter ?
on peut egalement utiliser la methode FileExists d'un objet FileSystemObject

Vous n'êtes pas encore membre ?

inscrivez-vous, c'est gratuit et ça prend moins d'une minute !

Les membres obtiennent plus de réponses que les utilisateurs anonymes.

Le fait d'être membre vous permet d'avoir un suivi détaillé de vos demandes et codes sources.

Le fait d'être membre vous permet d'avoir des options supplémentaires.