- #1
C
CJaay
Guest
Weil die Daten auf dem FTP-Server nur temporär sind muss dafür gesorgt werden das sie sich nicht anhäufen und gelöscht werden.
Um denn FTP zu bereinigen muss eine Scriptdatei gemacht werden die alle Dateien die vor dem Zeitpunkt X erstellt wurde löscht.
ich kann Dateien mit meinem Script löschen die älter als x Tage sind leider schaffe ich es nicht die verschiedenen Ordner im Verzeichnis auch zu dursuchen und die entsprechenden Dateien darin zu löschen
Verzeichnis = C:\abfrage\ergebnis -> Bilder-Verzeichnis
Tage = 1
' Ende der Anpassungen
Set fso = CreateObject(Scripting.FileSystemObject)
Set ordner = fso.GetFolder(Verzeichnis)
Set dateien = ordner.Files
heute = Date()
For Each datei In dateien
If datei.DateLastModified < (heute - Tage) Then
datei.Delete
End If
Next
das ist mein momentaner Code, könnt ihr mir helfen?
Um denn FTP zu bereinigen muss eine Scriptdatei gemacht werden die alle Dateien die vor dem Zeitpunkt X erstellt wurde löscht.
ich kann Dateien mit meinem Script löschen die älter als x Tage sind leider schaffe ich es nicht die verschiedenen Ordner im Verzeichnis auch zu dursuchen und die entsprechenden Dateien darin zu löschen
Verzeichnis = C:\abfrage\ergebnis -> Bilder-Verzeichnis
Tage = 1
' Ende der Anpassungen
Set fso = CreateObject(Scripting.FileSystemObject)
Set ordner = fso.GetFolder(Verzeichnis)
Set dateien = ordner.Files
heute = Date()
For Each datei In dateien
If datei.DateLastModified < (heute - Tage) Then
datei.Delete
End If
Next
das ist mein momentaner Code, könnt ihr mir helfen?