MSSQL DB Restore Problem

[Pet04]

Hallo Zusammen,

Ich habe folgenden Problem.
Ich möchte eine Datenbank (Backupdatei .bak Datei) von einem SQL Server 2008 R2 Express nach SQL 2017 Express einspielen.

Dabei muss ich nun mit move den Pfade für den 2017er Server Ordner angeben.

Dabei scheitere ich momentan an die Syntax.

Mein alter Code, ohne Pfadangebe "MOVE TO" :

Code:

  ...
          with ADOQ1 do
          begin
         
            ProgressBar2.Position := 50;
            SQL.clear;
            SQL.Text := 'restore database :DBName from '
                        +'Disk = :BakPfadName ';                
            Parameters.ParamByName('BakPfadName').Value := sTemp;
            Parameters.ParamByName('DBName').Value := sDBName;
            ExecSQL();
          end; (*with*)
          …

Über das MM Studio funktioniert es:

Code:

RESTORE DATABASE [db_Name] FILE = N'db_Name' FROM  DISK = N'E:\Pfad des Backups\db_Name.bak' WITH  FILE = 1,  MOVE N'db_Name' TO N'C:\Program Files\Microsoft SQL Server\MSSQL14.SQLEXPRESS\MSSQL\DATA\db_Name.mdf',  MOVE N'db_Name_log' TO N'C:\Program Files\Microsoft SQL Server\MSSQL14.SQLEXPRESS\MSSQL\DATA\db_Name.LDF',  NOUNLOAD,  REPLACE

Wie muss die Syntax aussehen, dass ich die Pfade, MDF und LDF als Variable / Parameter übergeben kann ?

Beispielcode wäre schön.


Vielen Dank.

[jobo]

Na offensichtlich so, wenn das funktioniert?!
das Statement unten ist jedenfalls etwas 'ausführlicher' formuliert, behandelt mögliche widechar Zeichen, liefert zusätzliche Option (die aber vielleicht default sind. usw. usw.

Wieso verwendest Du das nicht so, wenn es funktioniert?

Zitat von Pet04:

Über das MM Studio funktioniert es:

Code:

RESTORE DATABASE [db_Name] FILE = N'db_Name' FROM  DISK = N'E:\Pfad des Backups\db_Name.bak' WITH  FILE = 1,  MOVE N'db_Name' TO N'C:\Program Files\Microsoft SQL Server\MSSQL14.SQLEXPRESS\MSSQL\DATA\db_Name.mdf',  MOVE N'db_Name_log' TO N'C:\Program Files\Microsoft SQL Server\MSSQL14.SQLEXPRESS\MSSQL\DATA\db_Name.LDF',  NOUNLOAD,  REPLACE

[Pet04]

weil nicht immer das MM Studio auf den PC's ist und ich es gerne mit Delphi lösen will.
Ich habe ein kleines DB-Tool welches meine DB erstellt, sichert und wiederherstellt.
Der DB Name ändert sich auch.

[p80286]

Darum geht es nicht, sondern um die Formulierung de Statements, das im MMStudio etwas ausführlicher scheint. Mal abgesehen von der eckigen Klammer um den DBNamen.

Gruß
K-H

[jobo]

Das funktionierende Statement müsstest du 1:1 in Deinen Code übernehmen können. - zur Probe
Dann / dort sollte es ebenfalls funktionieren. In der Umgebung, aus der das MM Studio Statement stammt.

Dann muss natürlich die Parameterierung angepasst werden, damit es wieder dynamisch ist.

Ich weiß nicht was ich übersehe oder ob es Dir nicht klar ist. p80286 hat es auch geschrieben.

Was Du aus MM Studio gezeigt hast, ist SQL und SQL führst Du auch in Deinem Client aus.
Wie die Parameter richtig zu befüllen sind (Verzeichnis, Pfadnamen, .. und wie Du sie dynamisch bestimmst, musst Du allerdings selbst wissen.

Analogie:
wenn Du MM Studio hast und damit eine Tabelle abfragst, funktioniert es natürlich. Funktioniert es in Deinem Programm dann nicht, wenn kein MM Studio da ist? Nein, Du kannst die gleiche Abfrage einer Tabelle auch in Deinem Programm laufen lassen.

Ach so: mir fällt gerade ein, dass Du unter MM Studio vielleicht einen anderen User verwendest. Backup / Restore ist ja etwas administratives und der SQL(?) User, den Du im Client verwendest hat dazu vielleicht nicht die Rechte.

[Pet04]

der erste Code funktioniert ja.
Nun möchte ich ihn mit den Parametern erweitern, woran ich momentan schreitere.

dbPath2 ist die Pfadangabe vom SQL Server 2017

Code:

 with ADOQ1 do
          begin
            dbPath2 := dbPath +sDBName+'.mdf';
            log := dbPath +sDBName+'_log.ldf';
         
            ProgressBar2.Position := 50;
            SQL.clear;         
            SQL.Text := 'restore database :DBName from '
                    //    +'Disk = :BakPfadName with Replace';
                          +'Disk = :BakPfadName WITH  FILE = 1, Replace,  MOVE :DBName TO :dbPath2,  MOVE :logfile TO :log   ';
            Parameters.ParamByName('BakPfadName').Value := sTemp;
            Parameters.ParamByName('DBName').Value := sDBName;
            Parameters.ParamByName('dbPath2').Value := dbPath2;
            Parameters.ParamByName('logfile').Value := sDBName+'_log';
             Parameters.ParamByName('log').Value := log;
            ExecSQL();

Ich glaube, dass hier der Fehler bzw. die Syntax falsch ist.

Code:

 
SQL.Text := 'restore database :DBName from '                   
            +'Disk = :BakPfadName WITH  FILE = 1, Replace,  MOVE :DBName TO :dbPath2,  MOVE :logfile TO :log   ';