Trouver la présence d'un répertoire ou fichier

Soyez le premier à donner votre avis sur cette source.

Snippet vu 6 197 fois - Téléchargée 29 fois

Contenu du snippet

Pas grd chose à dire lol tt est dans le titreuu :)
Méthode simple est efficace.

Source / Exemple :


1 > Trouver la présence d'un Répertoire
_____________________________________

Créez dans une form, un bouton et nommez-le "repertoire" puis collez les lignes suivantes: 

Private Sub repertoire_Click()
'on declare la variable
   Dim chemin As String 
   chemin = "c:\windows" 
'on fouille si le dossier existe
   If Dir(chemin, vbDirectory) <> "" Then 
        MsgBox " Le répertoire " & " "" " & chemin & " "" " & " existe bien !", 64, "Existe-t-il?" 
   Else 
        MsgBox " Le répertoire " & " "" " & chemin & " "" " & " L'existe pas ton répertoire !", 32, "Existe-t-il?" 
   End If 
   End 
End Sub

1 > Trouver la présence d'un Fichier
_________________________________

Créez dans une form, un bouton et nommez-le "fichier" puis collez les lignes suivantes: 

Private Sub fichier_Click()
'on declare la variable
   Dim chemin As String 
   chemin = "c:\autoexec.bat"
'on fouille si le fichier existe
   If Dir(chemin, vbNormal Or vbReadOnly Or vbHidden Or vbSystem Or vbArchive) <> "" Then 
        MsgBox " Le fichier " & " "" " & chemin & " "" " & " existe bien !", 64, "Existe-t-il?" 
   Else 
        MsgBox " Le fichier " & " "" " & chemin & " "" " & " L'existe pas ton fichier !", 32, "Existe-t-il?" 
   End If 
   End 
End Sub
__________________________________

Voilou voilou Bien à vous - Angie

A voir également

Ajouter un commentaire

Commentaires

Messages postés
9
Date d'inscription
vendredi 27 janvier 2006
Statut
Membre
Dernière intervention
21 avril 2008

Je met 10/10 à cette source géniale qui correspond exactement à ce que je charchais !

Encore merci !!!!
Messages postés
3
Date d'inscription
jeudi 3 mars 2005
Statut
Membre
Dernière intervention
11 août 2006

Merci pour cette source !
Avant, VB plantait quand je voulais créer un dossier déjà existant.
Bonne continuation.
Messages postés
78
Date d'inscription
mardi 8 avril 2003
Statut
Membre
Dernière intervention
25 janvier 2007

merci pour cette efficace source ;) 10/10
Messages postés
130
Date d'inscription
samedi 29 novembre 2003
Statut
Membre
Dernière intervention
26 septembre 2008

perso je ne pense pas que ce soit parce qu'il été caché mais parce que ton slash est a l'envers. ce n'est pas C:/windows mais C:\windows.

Sinon meme s'il était caché, je pense que t'as methode le trouverais enfin je dis ca comme ca


PS : Merci quand meme pour la source simple et efficace ;)
Messages postés
33
Date d'inscription
jeudi 4 septembre 2003
Statut
Membre
Dernière intervention
25 août 2004

a bha merci la note ralf19b3 :)
bah la tu voit t'ouvre une porte j'avé pa fé gaffe pour les fichiers cachés :( mais merci
Bien a toi - Angie
Afficher les 12 commentaires

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.