Hallo!
Bis vor ein paar Tagen funktionierte eine Dateisuche in dem Verzeichnis D:\zzz… (Programmbeispiel s. unten)
Auf einmal läuft die Suche nur noch auf Laufwertk C:, in jedem beliebigen Unterverzeichnis.
Auf D:\ oder E:\ werden keine Dateien mehr gefunden. Auch nicht, wenn ich den Unterverzeichnisschalter auf TRUE setze.
Ich habe in mehreren Programmen die selbe Suchfunktion, die bis dato alle liefen. Kann mir vielleicht jemand einen Hinweis geben, woran das liegt? Vielleicht habe ich ja aus Versehen irgendwo einen Schalter im Menü verändert, oder irgend etwas anderes dummes getan? An der Programmierung kann es nicht liegen, da ja LW C:~ richtig erkannt wird.
Im voraus vielen Dank für jede Antwort.
Viele Grüße
Uwe Zimmermann
…
With fs
.LookIn = „D:\ZZZ\Sort_EXP“
.FileName = „*.*“
.SearchSubFolders = True
If .Execute(SortBy:=msoSortByFileName, _
SortOrder:=msoSortOrderAscending) > 0 Then
MsgBox „There were " & .FoundFiles.Count & " file(s) found.“
For i = 1 To .FoundFiles.Count
SetAttr .FoundFiles(i), vbNormal
…