Domino 9 und frühere Versionen > ND8: Entwicklung

Verzeichnis mit Hilfe eines FSO löschen

<< < (6/7) > >>

Keydins:
Merk dir doch in einer Liste oder einem Array die Namen der von dir erzeugten Dateien und lösche nach Abschluss der Verarbeitung alle gespeicherten Dateien über eine Schleife per 'Kill'. Bei diesem Vorgehen kannst du dir dann das Löschen des temp-Verzeichnises sparen, da du das ja bei der nächsten Verarbeitung sicher wieder brauchen wirst.

Du kannst z.B. über die 'Environ' Funktion im Windowsumfeld das temp-Verzeichnis des Betriebssystems abfragen und es für deine Zwecke als Zwischenspeicher nutzen, am Besten in Verbindung mit der Kill-Löschschleife, um unnützen Datenmüll zu vermeiden.

buzi:
Ein Kill auf den Dateien habe ich auch schon versucht. Da bekomme ich die selbe Fehlermeldung.

dnotes:
Mit diesem Code werden alle Dateien aus dem angegebenen Verzeichnis gelöscht und abschließend das Verzeichnis.


--- Code: ---        path = "c:\Test\"
Dim sess As New NotesSession
Dim alleDateien As Variant
Dim filename As String
Dim filepath As String
Dim sep As String
If path <> "" Then

If Instr(sess.Platform, "Windows") > 0 Then
sep = "\"
Else
sep = "/"
End If
Redim alleDateien(0)
If Instr(path, sep) > 0 Then
filepath = Strleftback(path, sep)
End If
filename = Dir(path, 16)
While filename <> ""
If filename <> "." And filename <> ".." Then
If (Getfileattr(filepath & sep & filename) And 16 >0) Then

alleDateien = Arrayappend(alleDateien,filepath & sep & filename )

End If
End If
filename = Dir
Wend
alleDateien = Fulltrim(alleDateien)
End If
Forall DT In alleDateien
Kill DT
End Forall
Rmdir path

--- Ende Code ---

ascabg:
Man koennte ihm in der DOS-Box ja auch noch zusaetzlich den Parameter /Q mitgeben.


Andreas

Peter Klett:
Kann es sein, dass, während Du mit Script die Dateien/den Ordner löschen willst, die Dateien noch von Open Office Writer gesperrt sind und es deshalb nicht funktioniert?

Du könntest testweise den Teil des Scriptes in eine andere Routine auslagern, der nur das Löschen vornimmt, und diese Routine separat laufen lassen. Funktioniert es dann, weißt Du, dass es "in einem Rutsch" nicht geht.

Dann solltest Du Die Löschroutine woanders unterbringen, z.B. im Queryclose des Dokuments, aus dem Du die Aktion startest, oder im Queryclose der Datenbank.

Navigation

[0] Themen-Index

[#] Nächste Seite

[*] Vorherige Sete