Create Database
Posted: Sat 04 Jun 2005 15:40
Hello, what is wrong with this script ? I get a lot of errormessages from SDAC and the DB SQL Monitor when executing the script with SDAC SQLScript
Script: (created with EMS SQL Manager)
CREATE DATABASE [rgea]
ON PRIMARY
( NAME = [rgeadat],
FILENAME = 'C:\Programme\Borland\Delphi7\Projects\rgea.21\daten\rgeadat.mdf',
SIZE = 1 MB,
MAXSIZE = UNLIMITED,
FILEGROWTH = 10 % )
LOG ON
( NAME = [rgealog],
FILENAME = 'C:\Programme\Borland\Delphi7\Projects\rgea.21\daten\rgealog.ldf',
SIZE = 1 MB,
MAXSIZE = UNLIMITED,
FILEGROWTH = 10 % )
GO
Delphi Code to use the script
begin
If Script.FileName>'' Then
Begin
SQLServer.Server:= Servername.Text;
SQLServer.Username:= Benutzer.Text;
SQLServer.Password:= Passwort.Text;
SQLServer.Database:= 'master';
SQLServer.Connected:= True;
SQLScript.SQL.Clear;
SQLScript.SQL.LoadFromFile(Script.FileName);
SQLScript.Execute;
End;
end;
Best regards
Stefan
Script: (created with EMS SQL Manager)
CREATE DATABASE [rgea]
ON PRIMARY
( NAME = [rgeadat],
FILENAME = 'C:\Programme\Borland\Delphi7\Projects\rgea.21\daten\rgeadat.mdf',
SIZE = 1 MB,
MAXSIZE = UNLIMITED,
FILEGROWTH = 10 % )
LOG ON
( NAME = [rgealog],
FILENAME = 'C:\Programme\Borland\Delphi7\Projects\rgea.21\daten\rgealog.ldf',
SIZE = 1 MB,
MAXSIZE = UNLIMITED,
FILEGROWTH = 10 % )
GO
Delphi Code to use the script
begin
If Script.FileName>'' Then
Begin
SQLServer.Server:= Servername.Text;
SQLServer.Username:= Benutzer.Text;
SQLServer.Password:= Passwort.Text;
SQLServer.Database:= 'master';
SQLServer.Connected:= True;
SQLScript.SQL.Clear;
SQLScript.SQL.LoadFromFile(Script.FileName);
SQLScript.Execute;
End;
end;
Best regards
Stefan