Hallo Leute,
wie warte ich am geschicktesten auf das Verschieben einer Datei?
Hintergrund: Mein Programm überprüft ein Verzeichnis (FilesSystemWatcher) und soll sobald eine .bak Datei in das Verzeichnis gelegt wird, wird die Datenbank wiederherstellen.
Was soweit auch einwandfrei funktioniert, bis es zu einer größeren Datenbank kommt. Denn dann versucht er schon die Datenbank einzuspielen ob wohl das Backup noch gar nicht vollständig verschoben wurde.
Anderes Thema: Wenn noch jemand einen Tipp hat wie ich bei FileSystemWatcher nur auf zwei Dateiendungen Filtern kann, wäre ich auch glücklich.
wie warte ich am geschicktesten auf das Verschieben einer Datei?
Hintergrund: Mein Programm überprüft ein Verzeichnis (FilesSystemWatcher) und soll sobald eine .bak Datei in das Verzeichnis gelegt wird, wird die Datenbank wiederherstellen.
Was soweit auch einwandfrei funktioniert, bis es zu einer größeren Datenbank kommt. Denn dann versucht er schon die Datenbank einzuspielen ob wohl das Backup noch gar nicht vollständig verschoben wurde.
VB.NET-Quellcode
- Public Sub DS_neu(ByVal source As Object, ByVal e As FileSystemEventArgs)
- MsgBox("Datei " & e.FullPath & " wurde neu angelegt!")
- bakname = Path.GetFileNameWithoutExtension(e.FullPath)
- extension = Path.GetExtension(e.FullPath)
- Fullpath = Path.GetDirectoryName(e.FullPath)
- toDelete = Path.GetFileName(e.FullPath)
- zipPath = e.FullPath
- ziparchiv = backuppath & "\" & Path.GetFileNameWithoutExtension(e.FullPath) & localDate & ".zip"
- If (extension = ".zip") Then
- ZipFile.ExtractToDirectory(zipPath, Pfad)
- db.Restore(Pbakname, Fullpath)
- ElseIf (extension = ".bak") Then
- db.Restore(Pbakname, Fullpath)
- End If
- If Not IO.File.Exists(ziparchiv) Then
- ZipFile.CreateFromDirectory(Pfad, ziparchiv)
- Else
- IO.File.Delete(ziparchiv)
- ZipFile.CreateFromDirectory(Pfad, ziparchiv)
- End If
- IO.File.Delete(e.FullPath)
- End Sub
Anderes Thema: Wenn noch jemand einen Tipp hat wie ich bei FileSystemWatcher nur auf zwei Dateiendungen Filtern kann, wäre ich auch glücklich.