création d'une base de données interbase avec delphi

Question

bonjour,

j'aimerais créer à partir de delphi une base de données (sous interbase). j'utilise un IBConnection et un IBTransaction d'après un tutoriel (http://www.jcolibri.com/index.html), et en voulant créer une nouvelle base, j'ai toujours l'erreur suivante:
  -->  Unable to complete network request to host "Server"

et voici le code que j'emploie:

begin
  with DataModule1.IBDatabase1 do
  begin
    DatabaseName:= getcurrentdir + '\BDD INTERBASE	est.gdb';
    SqlDialect:= 3;
    Params.Add('USER "SYSDBA"');
    Params.Add('PASSWORD "masterkey"');
    Params.Add('PAGE_SIZE 4096');
    CreateDatabase;
  end;
  DataModule1.IBTransaction1.Active := true;
end;

si quelqu'un peut m'aider...

merci d'avance

PalaisDorOran · Answer

begin
with DataModule1.IBDatabase1 do
begin
DatabaseName:=Localhost:getcurrentdir + '\BDD INTERBASE	est.gdb';
SqlDialect:= 3;
Params.Add('USER "SYSDBA"');
Params.Add('PASSWORD "masterkey"');
Params.Add('PAGE_SIZE 4096');
CreateDatabase;
end;
DataModule1.IBTransaction1.Active := true;
end;

PalaisDorOran · Answer

Exemple plus simple
procedure TForm1.Nouveau1Click(Sender: TObject);
begin
with DataModule6.IBDatabase1 do
begin
DatabaseName:= 'localhost:c:	est.gdb';
SqlDialect:= 3;
Params.Add('USER "SYSDBA"');
Params.Add('PASSWORD "masterkey"');
Params.Add('PAGE_SIZE 4096');
CreateDatabase;
end;
DataModule6.IBTransaction1.Active := true;
end;

Création d'une base de données interbase avec delphi

2 réponses

Votre réponse

Discussions similaires