Verzeichnis rekursiv löschen

[derhansen]

Hallo!

Kenn jemand eine Funktion, mit der man ein ganzes Verzeichnis inkl. Unterverzeichnisse und Dateien löschen kann? rmdir kann ja bekanntlich nur leere Verzeichnisse löschen.

Vielleicht hat ja schon mal jemand solch eine Funktion programmiert und kann sie zur Verfügung stellen.

Einzige Alternative ist sonst, während der Laufzeit eine Batch-Datei zu erzeugen, in der ein DOS rmdir /q /s %ordner% reingeschrieben, und dann aufgerufen wird (Ist aber nicht wirklich elegant und auf einen Server habe ich es auch noch nicht getestet)

Gruß,
Torben Hansen

[Semeaphoros]

Da werden Erinnerungen wach, das hatte ich mal in Assembler programiert vor vielen, vielen Jahren, später gabs in DOS ein Deltree, scheint es aber nicht mehr zu geben. Schade, habe das alte Teil nicht mehr, würde möglicherweise sogar noch funktionieren

[derhansen]

Naja, dann werde ich mich mal dran machen eine Funktion zu schreiben, die das für mich macht.

Gruß,
Torben Hansen

[animate]

such doch mal hier http://www-10.lotus.com/ldd/46dom.nsf
da gibts bestimmt sowas

[Don Pasquale]

Oder Du googlest mal nach folgendem Suchstring:
"Einführung in die Arbeit mit den FSO"
FSO ist das FileSystemObject
In LotusScript kannst Du dann die API Deklarationen einbinden
und dann ganz normal in LotusScript programmieren


Ciao
Don Pasquale

[derhansen]

Dank Dir! Der Tip war Gold wert. Statt mühsehlig rekursive Funktionsaufrufe zu starten, reichen nun 2 Zeilen Code um das Verzeichnis inkl. aller Dateien und Unterordner zu löschen.

Set fso = createObject("Scripting.FileSystemObject")
fso.DeleteFolder "c:\Ordnername", False

Gruß,
Torben Hansen

[TMC]

... später gabs in DOS ein Deltree, scheint es aber nicht mehr zu geben. Schade, habe das alte Teil nicht mehr, würde möglicherweise sogar noch funktionieren ....

Habe deltree auch schon vermisst, aber in Win2000 / XP - DOS-Konsole hilft
rd /s

Matthias

[Semeaphoros]

Ah, super, danke Matthias. Möglich, dass es den Deltree nur bei IBM gegeben hat, das rd /s hat natürlich genau die Funktion

[TMC]

gern geschehen.
Den deltree gabs afaik im MS-DOS mal, ich weiss aber nicht mehr seit wann nicht mehr.... (evtl. sogar noch auf NT4.0 ??)

Matthias

[Semeaphoros]

Da hat mich die Erinnerung doch nicht im Stich gelasen

Mein Name gefiel mir aber besser: rmpath und das Ding war wahnsinnig schnell, weil in Assembler geschrieben. Der Benutzer hätte es sich ja sonst noch anders überlegen können ....

[hampa]

Dank Dir! Der Tip war Gold wert. Statt mühsehlig rekursive Funktionsaufrufe zu starten, reichen nun 2 Zeilen Code um das Verzeichnis inkl. aller Dateien und Unterordner zu löschen.

Set fso = createObject("Scripting.FileSystemObject")
fso.DeleteFolder "c:\Ordnername", False

Gruß,
Torben Hansen

Hallor Torben

Da ich in meinen Scripten immer "Option Declare" verwende, frage ich Dich, mit welchem Typ ich fso deklarieren muss? (Dim fso as xxxxx)

Vielen Dank für Deine Auskunft
Gruss Hampa

[derhansen]

Hallo Hampa,

Ich verwende da leider kein Option Declare. Probiere es doch einfach mal als "Variant". Das müßte klappen.

Gruß,
Torben Hansen

[Semeaphoros]

Option Declare nicht zu verwenden ist schon fast fatal ......

[hampa]

Hallo Torben

Danke für den Hinweis.

Hallo Semeaphoros

Option Declare nicht zu verwenden ist schon fast fatal ......

Weisst eventuell Du, wie das Objekt zu "dimensionieren" ist?

Gruss Hampa

[Semeaphoros]

Wie schon erwähnt als Variant

[hampa]

Wie schon erwähnt als Variant

Hallo Semeaphoros

Ach so. Auch Dir vielen Dank. Wer lesen kann ist eben extrem im Vorteil. 

Gruss Hampa