Dossier existant?
Résolu
turlututuchapopointu
Messages postés
38
Date d'inscription
mardi 21 novembre 2000
Statut
Membre
Dernière intervention
12 août 2005
-
4 août 2005 à 10:56
violent_ken Messages postés 1812 Date d'inscription mardi 31 mai 2005 Statut Membre Dernière intervention 26 octobre 2010 - 4 août 2005 à 14:52
violent_ken Messages postés 1812 Date d'inscription mardi 31 mai 2005 Statut Membre Dernière intervention 26 octobre 2010 - 4 août 2005 à 14:52
3 réponses
cs_Douns
Messages postés
100
Date d'inscription
lundi 16 septembre 2002
Statut
Membre
Dernière intervention
19 septembre 2005
1
4 août 2005 à 11:00
4 août 2005 à 11:00
T'y était presque :
If Dir("c:/toto", vbDirectory) <> "" Then
'dossier existe
else
'dossier existe pas
end if
If Dir("c:/toto", vbDirectory) <> "" Then
'dossier existe
else
'dossier existe pas
end if
turlututuchapopointu
Messages postés
38
Date d'inscription
mardi 21 novembre 2000
Statut
Membre
Dernière intervention
12 août 2005
4 août 2005 à 11:03
4 août 2005 à 11:03
Yeah! Ca gère man!
Merci
Merci
violent_ken
Messages postés
1812
Date d'inscription
mardi 31 mai 2005
Statut
Membre
Dernière intervention
26 octobre 2010
2
4 août 2005 à 14:52
4 août 2005 à 14:52
Violent Ken
Deuxième méthode:
-mettre Microsoft scripting Runtine en référence puis comme code :
Dim fs As New FileSystemObject
If fs.FolderExists("c:\exemple") = True Then
'existe
Else
'existe pas
End If
Deuxième méthode:
-mettre Microsoft scripting Runtine en référence puis comme code :
Dim fs As New FileSystemObject
If fs.FolderExists("c:\exemple") = True Then
'existe
Else
'existe pas
End If
