Gesundes neues Jahr noch
Hab mal wieder die "A"-Karte.
In meinem Projekt habe ich eine Master und 19 Detailtabellen.
Hab über die
ADO Connection1 die Verbindung erzeugt und dann Master und
Detaildaten verknüpft.
Alles läuft bisher "Bestens".
Aber ich möchte die Datenbank mit allen "Master+Detailtabellen" ablegen
unter einen anderen Namen und danach eine neue Datenbank ("Leere") anlegen.
Hab dazu noch Fastreports laufen.
Frage: Ist es Fastreports egal, wenn eine neue Datenbank erzeugt wird?
Oder wäre es besser den Connectionstring kurzzeitig zu schließen und die
Test.mdb in einen Ordner -> Datenbanken zu verschieben,die aw.mdb umzubenennen als aw_Backup.mdb ?
Hier habe ich die Verbindung:
Provider=Microsoft.Jet.OLEDB.4.0;
User ID=Admin;Data Source=aw.mdb;
Mode=Share Deny None;Jet OLEDB:
System database="";
Jet OLEDB:Registry Path="";
Jet OLEDB: Database Password="";
Jet OLEDB:Engine Type=5;
Jet OLEDB: Database Locking Mode=1;
Jet OLEDB:Global Partial Bulk Ops=2;Jet OLEDB:Global Bulk Transactions=1;
Jet OLEDB:New Database Password="";
Jet OLEDB:Create System Database=False;
Jet OLEDB:Encrypt Database=False;
Jet OLEDB: Don't Copy Locale on Compact=False;
Jet OLEDB:Compact Without Replica Repair=False;Jet OLEDB:SFP=False;
Ich habe vorher intensiv gegoogelt,komme leider nicht weiter.
Delphi-Quellcode:
procedure TForm1.FormCreate(Sender: TObject);
begin
AdoConnection1.Connected :=true;
ADOConnection2.Connected :=true;
AdoTable1.Active :=true;
AdoTable2.Active :=true;
AdoTable3.Active :=true;
AdoTable4.Active :=true;
ADOTable5.Active :=true;
ADOTable6.Active :=true;
ADOTable7.Active :=true;
ADOTable8.Active :=true;
ADOTable9.Active :=true;
ADOTable10.Active:=true;
ADOTable11.Active:=true;
ADOTable12.Active:=true;
ADOTable13.Active:=true;
ADOTable14.Active:=true;
ADOTable15.Active:=true;
ADOTable16.Active:=true;
ADOTable17.Active:=true;
ADOTable18.Active:=true;
ADOTable19.Active:=true;
ADOTable20.Active:=true;
end;
Bin leider kein Profi...
