Hallo und Danke! Da h�tte ich eigentlich auch selbst drauf kommen k�nnen - aber derzeit �berarbeite ich hier das Qualit�ts-Management. Nach der 34.212 Erw�hnung selbigen Wortes ist in meinem Hirn leider nicht mehr viel Platz zum freien Denken verblieben. *g*
Danke nochmal f�r's Anschubsen :-) Olli -----Urspr�ngliche Nachricht----- Von: Claudius Ceteras [mailto:[EMAIL PROTECTED]] Gesendet: Freitag, 21. Februar 2003 11:10 An: [EMAIL PROTECTED] Betreff: [Coffeehouse] RE: [Coffeehouse] Dateien z�hlen > Hallo Liste, > > kann mir jemand nen Tipp geben, wie ich am einfachsten die > HTML/ASP-Files in > mehreren Verzeichnissen zusammenz�hlen kann!? Wenn ich im Explorer auf > Eigenschaften klick, bekomme ich ja auch die Bilder usw. Rekursiv in die Verzeichnisse mit dem FSO absteigen und jeweils die Dateien mit bestimmten Endungen addieren... Achtung pseudocode!!!! FSO-Aufrufe fehlen teilweise Function fileAnzahl(pfad) dim anzahl anzahl = 0 for each subFolder in Folder anzahl = anzahl + fileAnzahl(subFolder.path) next for each file in Folder.Files if file.endung="asp" then anzahl = anzahl + 1 end if next fileAnzahl = anzahl End function Claudius ~~~~~~~~~~~~~~~~~~~~~~~~~~~sponsored by United Planet~~~~~~~~~~~~~~~~~ Kaffeepause im United Planet Communityserver ... http://www.intrexx.com/communityserver _______________________________________________ Coffeehouse mailing list [EMAIL PROTECTED] http://www.glengamoi.com/mailman/listinfo/coffeehouse ~~~~~~~~~~~~~~~~~~~~~~~~~~~sponsored by United Planet~~~~~~~~~~~~~~~~~ Kaffeepause im United Planet Communityserver ... http://www.intrexx.com/communityserver _______________________________________________ Coffeehouse mailing list [EMAIL PROTECTED] http://www.glengamoi.com/mailman/listinfo/coffeehouse
