Office: auch Unterordner berücksichtigen

Hallo,

ein ganz anderer Ansatz:

Auf der CMD-Ebene gibt es

find
findstr

Zumindest FINDSTR kann mit der Option /s alle Unterverzeichnisse durchsuchen. Die Performance sollte gut sein. Wie üblich wird der Befehl mit /? erklärt.

 

\@Fennek11:
Gleiche Problem mit dem CMD-Fenster und der fehlenden UNICODE-Unterstützung im VBA-Umfeld.

Trotzdem findet ich es grundsätzlich nicht verkehrt, auch über alternative Befehle nachzudenken. *cool.gif*

Gruß Ulrich

 

Danke für die Info, damit hat sich das auf WebDAV für mich erledigt, da kann sonst was für Dateiennamen liegen.

 

Leider bist du nicht auf meine Frage eingegangen, wo es relevant ist/wäre.
Was heißt "jeder lokale", und wo könnte es anders sein als \?
Die MS Hilfe schweigt sich dazu aus *frown.gif* .

 

\@RalfP
Application.PathSeparator wird relevant beim MAC, wo ein Forwardslash verwendet wird. Ein Backslash ist dort ein Escape-Zeichen, wie in UNIX üblich und das könnte dann zu Problemen führen.

Gruß Ulrich

 

Hallo Leute,

konnte der Diskussion leider nicht mehr weiter folgen. Wir hatten Mau-Mau Abend. *wink.gif*

Ulrich (Knobbi) hat meinen Hauptgrund für das FSO schon genannt ... die Unterstützung für Unicode-65001 und Win-1251. Die beiden Code-Pages brauche ich leider sehr oft. Wieso wohl ... *rolleyes.gif*

Außerdem ist 'langsam' in Zeiten von Server-Farmen und SSD-Speicher doch sehr, sehr relativ. *Smilie

Mir wurde leider ein neues Laptop geschenkt *biggrin.gif* , mein gutes Stück hat sich leider am 23.12. in einer kleinen Rauchwolke von mir verabschiedet. Und in dem 'Neuen' ist nicht nur ein AMD Okta-Core mit 16 GB Speicher drin, sondern auch eine SSD ... und mit der Ausrüstung, habe ich den gesamten Windows-Ordner mit dem FSO ausgelesen ... О господи ... von langsam, kann da überhaupt keine Rede sein.

Sabina

 

Hallo Excel-Fan's ,

ich bin auch auf FSO umgestiegen, aber aus einem ganz anderen Grund:
- einer meiner Kunden benutzte eine Office-365 Variante
- die mit der Dir-Funktion nicht umgehen konnte und ständig einen Fehler produzierte

Gruß von Luschi
aus klein-Paris

 

...da hab ich ja was losgetreten*wink.gif*

Werde mir morgen Eure Inputs genauer anschauen und in meiner Prozedur testen.
Ihr bekommt dann in jedem Fall eine Rückmeldung.

Auf jeden Fall schonmal ein herzliches Dankeschön an Euch alle *Smilie

 

Hallo Nepumuk, ich habe deinen Code heute testen können.
Jedoch erhalte ich in der Function GetFolder unter...

Code:

einen Fehler (Datei nicht gefunden). Was könnte das Problem sein?

Ich suche folgende Datei mit Teilstring:
FileName = Dir$(astrFolders(ialngFolders) & "*" & "*_Message.html")

Bestimmt liegt hier das Problem.

 

Hallo,

da wurde eine Datei oder ein Ordner mit einem "verbotenen" Zeichen gefunden.

Teste mal mit der Mappe im Anhang.

 

Hallo Max,

huuuiii ... FileSearch-Ersatz ... schon ein wenig heftig ... keine Korrektur des DIR()-Codes ? Verfälscht ein wenig die Ausgangslage ... oder ? *wink.gif*

Habe deinen DIR() Code gerade eben erst gestestet.
Bei mir steigt der Code schon bei "Eigene Dateien" oder "$NeuerOrdner" aus ... du wirst mir jetzt nicht erzählen, dass ein Leerzeichen oder ein "$", "verbotene" Zeichen sind ? Solange sich Zeichen in einem File- oder Path-Name verwenden lassen, sind sie für mich "erlaubt" und der restliche Code sollte sich daran orientieren. 8.3 - schon lang vorbei ...

BTW ... FSO schluckt das alles ... *biggrin.gif*
Selbst Kyrilisch ist für das FSO kein Problem ... GetAttrib steigt da leider aus.

Mein Code ist vielleicht "langsamer" ... aber er funktioniert zumindest ... was ist da jetzt besser ?[/Sarkasmus]

Sabina

 

Hallo miksman,

unabhängig von dem Code, womit du jetzt deine Dateien suchst, würde ich mir erstmal Gedanken darüber machen, daß dein Suchmuster möglicherweise so nicht stimmt:
... "*" & "*_Message.html")

Dann ist der Startverzeichnis "C:\Users" sicherlich nicht i.O. Dort hast du für eine Suche mit Unterverzeichnissen sicherlich nicht die passenden Zugriffsrechte.

Gruß Ulrich

 

Hallo Sabina,

in meinen C:\Users gibt es eine Datei mit einem ? im Namen, Und da steigt GetAttr aus.