Dienstag, 9. Dezember 2008

Dim Mind As Variant, TimeToRebound As Long
Visual Basic unter MS Office 2007 kennt das FileSearch-Objekt nicht mehr - schöne  Sch Bescherung, wenn man in einem dynamischen Datenpool unterwegs zu sein hat. Habe das erst über die Funktion Dir nachbauen wollen, aber es bedarf vieler Schleifen, will man beliebige Subfolders miterwischen bis in die n-te Ebene. Rad neuerfinden ist ja immer sehr ehrenvoll, doch inzwischen habe ich aus dem Netz eine schöne Klassendefinition gefischt (dort schon als alter Hut gehandelt...), welche sauber funktioniert und die wichtigsten Methoden und Eigenschaften von FileSearch zur Verfügung stellt.
Ha! Prima.

 
Hätte Rekursion geholfen?

... anzeigen  
 
Ganz sicher. Gelegentlich ist es aber sehr entspannend und schlicht bequem, andere für sich arbeiten zu lassen, bzw. schon gearbeitet haben zu lassen...

Elegant wäre das schon, was? Nun hab ich natürlich keine Ruhe mehr und Sie sind schuld.

... anzeigen