Delphi (XE2) コードから SQL Server データベース スナップショット (MSSQL EXPRESS 2012 SP #1) を作成しようとしています。コードは問題なく実行されますが、実際にはスナップショット ファイルは作成されません。
コード例:
.... LoadStringfromFile(sqlFilename, sqlString);
sqlString := StringReplace(sqlString, 'db_snapshot_name', SnapshotName, []);
sqlString := StringReplace(sqlString, 'physical_file_name', SnapshotFolder, []);
sqlString := StringReplace(sqlString, 'logical_file_name', DatabaseName, []);
sqlString := StringReplace(sqlString, 'source_database_name', DatabaseName, []);
Memo1.Lines.Add(sqlString); // result see below ....
ExecuteSQLQuery(sqlString);
SSStatusBar.SimpleText := ' run sql file done ! ';
end;
procedure TSnapShotForm.ExecuteSQLQuery(const sqlValue: string);
var
aSQLQuery: .....;
begin
///
///
aSQLQuery:=.......Create(self);
aSQLQuery.Active := false;
aSQLQuery.Connection := aConnection;
aSQLQuery.SQL.Add(sqlValue) ;
aSQLQuery.Active := true;
aSQLQuery.Free;
end;
このテキストで使用される SQL ステートメントは次のようになります
CREATE DATABASE test_ss
ON ( NAME = 'test_evaluation',
FILENAME = 'd:\test_ss')
AS SNAPSHOT OF test_evaluation
ここで何が間違っているのですか?