Supportnet / Forum / Skripte(PHP,ASP,Perl...)
Dateien löschen unter VB
Frage
Hi,
ich scuhe eine möglichkeit, die es mir erlaubt, Dateien (sicherungen einer datenbank), die in Access angelegt werden über folgenden Code
[code]
Private Sub Form_Open(Cancel As Integer)
Dim SaveDatei As String
Dim SavePfad As String
SaveDatei = "DATEN" & Format(Now(), "yymmdd") & ".MDB"
SavePfad = "X:\Save\" & SaveDatei
If SaveDatei = Dir(SavePfad) Then
'nothing
Else
FileCopy OrginalDaten, SavePfad
DoCmd.OpenQuery "Startabfrage Einzug"
DoCmd.OpenQuery "Startabfrage Rechnung"
End If
NewLog "Datenbank öffnen"
If CheckJoh() Then
Me.STATUS.Visible = True
Else
Me.STATUS.Visible = False
End If
DoCmd.Maximize
End Sub
[/code]
zu löschen.
Die Dateien werden in einem bestimmten Ordner gespeichert, der in der Variable SavePfad festgelegt ist.
Die Datenbanken werden jeden Tag neu gesichert. Demnach werden das irgednwann zich sicherungen, die niemand mehr benötigt.
Wie kriege ich die Dateien nun gelöscht. Es sollen aber immer 14 aktuellere sicherungen bestehen bleiben.
Das heisst alle alten datein vor 14 tagen können gelöscht werden :-)=
Wer kann da helfen?=
Gruss
Christian
Antwort 1 von Christian01
Mir ist grade aufgefallen, dass die lösung oben Z nciht gehen wird, wegen dem monats oder gar jahresprung.
wie kann man denn einen zähler erstelen also
dass die sicherungsdatei dann heisst
daten1
daten2
daten3
etc.
gruss und thx
christian
wie kann man denn einen zähler erstelen also
dass die sicherungsdatei dann heisst
daten1
daten2
daten3
etc.
gruss und thx
christian

