Het klinkt als filename die in uw lijst bevat reeds de periode wordt opgeslagen (.) welke het van de dossieruitbreiding veroorzaakt, of dat filename in uw lijst wordt opgeslagen die niet volledig is. Probeer:
strFileName = werkt Dir („f:\Test Directory\Live\“ & FName & „*.*“) dit niet
De reden het vindt het zelfde dossier elke keer is dat u niet het dossier verwijdert u enkel vond, kopi�ërt u het. In uw originele post zei u: „Als zij dan de dossiers naar folder“ verplaatsen. Maar het bevel FileCopy beweegt niet het dossier, kopi�ërt het het enkel. Die I waarom in mijn meest recente code u zult zien dat ik het dossier anders noemde, dat het eigenlijk naar de nieuwe folder verplaatst.
Naam „C:\Access\test\Source\“ & strFileName als „C:\Access\test\Destination\“ & strFileName
Ook, als u de () functie Dir gebruikt en het een foldername elke keer overgaat, zal het het eerste dossier in de omslag, elke keer terugkeren. Als u werkelijk alle dossiers in een omslag wilt tonen, zou u iets als moeten gebruiken:
strFileName = Dir („f:\Test Directory\Live“)
debug.print strFileName
strFileName = Dir ()
debug.print strFileName
Lijn terwijl Len (strFileName) > 0
Ook, zal de code u gebruikt niet zoeken naar een tweede of derde dossier met de zelfde dossieruitbreiding. Het zal enkel die mijden. Als dat geen kwestie toen toen is verlaat uw code de manier het is. Als dat een kwestie zou kunnen zijn toen moet u mijn meest recente codesegment en exemplaar die logica bekijken.
