datenbank clonen

[sancho1980]

hallo
weiß jemand von euch, ob es möglich ist, über die interbase-komponenten in delphi eine neue datenbank zu erstellen, die genau die selben metadaten hat, wie eine bereits existierende? oder muss ich dazu das sql-script in meine anwendung einbinden?

[mkinzler]

Hast du es schon mal über gbak versucht?

[sancho1980]

hmmm, du meinst diese interbase-tools, ich weiß
aber ich will die datenbank ja von meinem delphi-client aus erstellen, verstehste wie ich meine?
also der anwender soll nen namen für die neue datenbank eingeben und der client soll dann den server dazu veranlassen, eine datenbank mit diesem namen und einer vorgegebenen struktur zu erzeugen

[mkinzler]

Dann würde ich mit einem Verwaltungstool ( IBConsole oder IBExpert) die Metadaten in Form eines DDL-Skriptes extrahieren und dieses dann Verwenden um die neue DB zu erstellen.

[sancho1980]

hmmm, will dich jetzt nicht nerven aber steht sowas irgendwo beschrieben?
ich meine metadaten extrahieren, wie das geht weiß ich ja aber ich hab keine ahnung wie meine tibdatabase-komponente damit was anstellen kann...

[mkinzler]

Im IBExpert unter Nützliches -> Extrahiere Metadaten

[sancho1980]

ne das mein ich net...ich meine wie ich meine tibdatabase-komponente in delphi konfigurieren muss, damit sie mit hilfe einer solchen dll eine neue datenbank nach dem vorbild der metadaten erzeugt

[sancho1980]

ich will ja, dass der benutzer mit meiner delphi-anwendung eine datenbank erzeugen kann

[mkinzler]

Mit TIBScript sollte es möglich sein ein DDL-Skript auszuführen.

[sancho1980]

hmmm, diese komponente hab ich gar nicht
aber ich hab mittlerweile rausgefunden, wie ich mit ibexpert ein sql-script erzeugt bekomme, dass sämtliche metadaten enthält...also hab ich versucht, diese daten einfach in den die sql-property meiner tibquery-komponente einzufügen aber irgendwie klappt das nicht...will einer mal nen blick drauf werfen? das programm an sich is gar nicht von mir sondern einfach nur aus nem buch, damit sollte eigentlich nur gezeigt werden, wie mit einer tibdatabase-komponente eine neue datenbank erzeugt wird und ich wollte jetzt versuchen, diese neu erzeugte datenbank mit tabellen und allem pipapo zu füllen; sicherlich hab ich irgendwo nen denkfehler; sagt mir mal bitte wo das problem liegt!
danke,
martin

das programm is 1:1 aus dem buch übernommen; nur die tibquery und tibtransaction hab ich hinzugefügt und folgende 3 statements am ende von procedure TMainForm.BtnCreateDBClick(Sender: TObject); :

Delphi-Quellcode:

self.IBDatabase1.Connected := true;
self.IBQuery1.Active := true;
self.IBQuery1.ExecSQL();

grüße und danke
martin