Directory leeren

[Don Pasquale]

Hallo Leute,

wie kann ich aus LotusScript heraus ein Verzeichnis leeren
z.B. C:\TEMP\ , ohne dass Verzeichnis selbst zu löschen.
Oder ist es einfacher, dass Verzeichnis zu löschen und
wieder neu anzulegen ?

fragt sich (und Euch)

Don Pasquale

[eknori]

Mit der CLASSExplorer kein Problem

Kopiere die Explorer.txt in die Declaration section eines Action Buttons or what have you.

Beispiel:

Sub Click(Source As Button)
   Dim DF As New DiskFile
   dummy% = DF.DeleteFile ( "c:\temp\*.*" , FOF_FILESONLY)
End Sub

löscht alle Dateien aus dem verzeichnis c:\temp ; dabei bleiben Unterverzeichnisse erhalten.

Die Parameter findest du ebenfalls in der Klasse

[Don Pasquale]

Hallo Eknori,

ist ja echt komfortabel, allerdings finde ich micht mit der Klasse
so schnell nicht zurecht.

Mit genau diesem Code :

   Dim DF As New DiskFile
   dummy% = DF.DeleteFile ( ARCDIR , FOF_FILESONLY)

wird das komplette Verzeichnis gelöscht statt nur
geleert.

Ich würde ihm gerne noch zusätzlich
FOF_SILENT
als Parameter mitgeben, er mag aber nicht mehr als die
obigen Beiden Parameter akzeptieren.

Kannst Du mir da noch einen Tipp geben ?


Ciao
Don Pasquale

NACHTRAG :

   dummy% = DF.DeleteFile ( ARCDIR , FOF_FILESONLY + FOF_SILENT)


verhindert eine Nachfrage

[eknori]

versuche mal ARCDIR\*.*,  ( wobei ARCDIR = LW:\Pfad )

[Don Pasquale]

@EKNORI,

genau daran lag es. Das *.* fehlte.

Aber nun bekomme ich wieder die Sicherheitsabfrage.
Und die fragt zudem noch :
Wollen Sie den Papierkorb löschen ?"
very strange .

Der aktuelle Code

   Dim DF As New DiskFile
   strDIR$ = ARCDIR + "\*.*"
   dummy% = DF.DeleteFile ( strDir$ , FOF_FILESONLY + FOF_SILENT)

Ciao

Don Pasquale

[Don Pasquale]

Muss ich FOF_SILENT
nicht irgendwie vorher deklarieren ?

Die Sicherheitsabfrage kommt immer noch.

Ciao

Don Pasquale

[eknori]

HM strange;

FOF_Silent ist eigentlich als Const in der Klasse deklariert  ; muß ich wohl noch mal bei...

[eknori]

Nimm mal FOF_NOCONFIRMATION statt FOF_SILENT

[Don Pasquale]

HM strange;

FOF_Silent ist eigentlich als Const in der Klasse deklariert  ; muß ich wohl noch mal bei...

Ja, in der Klasse ist das so.

Aber aus dem Code, aus dem ich das aufrufe, klappt
das mit FOF_NONKONFIRMATION nur, wenn
ich es vorher als Integer deklariert habe.

Gruß
Don Pasquale

[eknori]

Hab es gerade bei mir ( NT4 ) noch mal getestet; geht auch ohne vorherige Deklaration.
Kannst ja mal in der Klasse die Const als Public Const deklarieren.