Moin Gemeinde,
gibt es eine Möglichkeit das Backend vom Frontend zu trennen sodass mau aus dem Frontend heraus eine Datensicherung durchführen kann?
Wünsche allen frohe Pfingsten
Jörg
Hallo Jörg,
das BE ist normalerweise per verknüpfter Tabellen eingebunden, welche du alle löschen kannst. Nach der Sicherung erstellst du diese Verknüpfungen wieder neu.
Knobbi38
Ich hab da vor einiger Zeit mal etwas Code mit Erläuterung gefunden, der bei mir gut funktioniert hat.
http://www.ramses.de/?p=827 (http://www.ramses.de/?p=827)
Die Idee aus dem Link (#2) ist sicherlich besser als das Löschen der Verknüpfungen, aber vielleicht sollte man doch prüfen, ob eine Lockdatei existiert. Das ganze Gedöns mit Schleife über Tabledefs, Stringverarbeitung usw. lässt sich auch mit viel weniger Code eleganter lösen:
strQuellPfad = Nz(DLookup("Database", "MSysObjects", "Type = 6"), "")
If strQuellPfad = "" Then
MsgBox "Keine verknüpften Tabellen gefunden.", vbExclamation, "Abbruch"
Exit Sub
End If
Und ansatt eine alte Backup-Datei einfach zu "killen", könnte man auch jeweils eine neue Datei mit einem Timestamp anlegen.
Nur mal so ... ;)
Moin Knobbi,
das mit dem Timestamp mache ich in meiner bisherigen Datensicherung sowieso.
Aber verstanden was der von dir gepostete Code macht hab ich überhaupt nicht.
Würdest du mir das bitte erklären?
Liebe Grüße
Jörg
Hallo Jörg,
anstatt die Tabledefs-Auflistung nach verknüpften Tabellen zu durchsuchen, wird mit dem Code direkt über die Systemtabelle auf das Feld Database einer verknüpften Tabelle zugegriffen. Du kannst das auch im Direktfenster aufrufen:
? Nz(DLookup("Database", "MSysObjects", "Type = 6"), "") Damit wird natürlich nur eine BE unterstützt, wenn du mehrere hast, müsstest du den Code erweitern.
Schau dir mal die Tabelle MSysObject direkt an, dann wird das etwas klarer.
Gruß Knobbi38