Bonjour tout le monde,
Je suis à la recherche d'un bout de code me permettant de vérifier si la chaine de caractère que je rentre mène a un fichier ou à un dossier.  
Je connais le test "Len(Dir(MaChaine, vbDirectory))>0" mais j'utilise déja un Dir() dans mon code, et l'utiliser a nouveau me remet a zero l'exploration de mon dossier...
 
Donc, objectif = Définir si "MaChaine" est un chemin pour un dossier ou pour un fichier sans utiliser Dir()
 
Merci d'avance !

Bonjour,
 
Enregistre ton précédent dir() ou appelle-le plus tard ?

Bonjour,
 
Tu peux utiliser le FSO :
http://warin.developpez.com/access/fichiers/

Merci à vous !
 
@MaybeEijOrNot : Je ne connais pas la procédure pour enregistrer un Dir() à l'endroit ou il en est... Si je repasse le Dir() avec le précédent chemin, il repart à zéro et scanne a nouveau les fichiers déjà scanné. Au pire, je journalise dans un tableau les fichiers déja scannés et les ignore au 2eme scan (probable perte de temps d'exécution mais pas gênant vu que ma boucle est assez courte...)
 
@Patrice33740 : Je regarde cette doc ! Merci

Merci à tous,
 
@Patrice33740 : Avec la fonction oFSO.FolderExists() j'ai fait mes tests et conservé ma "progression" dans mon Dir ! Ca roule impec
Juste faire attention au déploiement d'avoir bien les memes versions des "librairies" sur les différents postes !

Alors :
 
1/  ' Activer "Microsoft Scripting Runtime"
 
2/  'Instanciation du FSO :
Set oFSO = New Scripting.FileSystemObject
 
3/ 'Test du chemin :
If oFSO.FolderExists(FileScan) Then
   - Action !
End If
 
Et pour moi, ca marche
Merci bcp !