Bonjour,
J'étais déjà venu pour d'autres petits soucies finalement résolu et je vous en remercie encore!
Je suis donc encore en stage, et je bloque depuis ce matin sur un problème dont je ne comprend pas la raison...
Je souhaite donc vérifier dans le chemin d'un fichier si il y a "old" ou "OLD", si ce mot s'y trouve, on ne copie pas le nom du fichier dans un fichier texte créé pour l'occasion. Sinon on le copie dans le fichier texte.
J'ai donc pondu ce code :
C'est le premier teste que j'ai rajouté. Celui avec le filtre fonctionne très bien.
IgnorerDossier est un tableau de chaine de caractères, et la case 1 contient "old", la case 2 contient "OLD".
Problème quand je lance une recherche dans le fichier texte je retrouve des chemins contenant ces 2 mots, du genre :
"..\Truc\bidule\old\chouette\"
Voilà si vous comprennez pourquoi mon teste ne fonctionne pas... Personnellement je ne trouve pas... Et ça fait presque 3heures que je cherche. J'ai vérifier dans la logique si les OU ne devaient pas être remplacer par des ET, s'il fallait mettre différent ou égale à 0 avec InStr...
Merci de votre aide et de votre attention 🙂
J'étais déjà venu pour d'autres petits soucies finalement résolu et je vous en remercie encore!
Je suis donc encore en stage, et je bloque depuis ce matin sur un problème dont je ne comprend pas la raison...
Je souhaite donc vérifier dans le chemin d'un fichier si il y a "old" ou "OLD", si ce mot s'y trouve, on ne copie pas le nom du fichier dans un fichier texte créé pour l'occasion. Sinon on le copie dans le fichier texte.
J'ai donc pondu ce code :
Code:
If InStr(FileItem.Path, IgnorerDossier(1)) = 0 Or _
InStr(FileItem.Path, IgnorerDossier(11)) = 0 Then
'Teste du filtre
If FileItem.Type = Filtre(1) Or FileItem.Type = Filtre(2) Or FileItem.Type = Filtre(3) Then
' On écrit dans le fichier texte, le nom du fichier
Txt.WriteLine FileItem.Name
' et le chemin pour y accéder
Txt.WriteLine FileItem.ParentFolder
End If
End IfC'est le premier teste que j'ai rajouté. Celui avec le filtre fonctionne très bien.
IgnorerDossier est un tableau de chaine de caractères, et la case 1 contient "old", la case 2 contient "OLD".
Problème quand je lance une recherche dans le fichier texte je retrouve des chemins contenant ces 2 mots, du genre :
"..\Truc\bidule\old\chouette\"
Voilà si vous comprennez pourquoi mon teste ne fonctionne pas... Personnellement je ne trouve pas... Et ça fait presque 3heures que je cherche. J'ai vérifier dans la logique si les OU ne devaient pas être remplacer par des ET, s'il fallait mettre différent ou égale à 0 avec InStr...
Merci de votre aide et de votre attention 🙂