Announcement

Collapse
No announcement yet.

Dringend! Fehler beim Anlegen von DB auf IB5

Collapse
X
  • Filter
  • Time
  • Show
Clear All
new posts

  • Dringend! Fehler beim Anlegen von DB auf IB5

    Hi<br>
    Ich schreibe folgendes SQL Skript:<br>
    CREATE DATABASE Versicherung
    CREATE TABLE Markler(name VARCHAR(25) NOT NULL);<br>

    Wenn ich dieses Skript in ISQL öffne, dann wird keine DB angelegt, ich sehe zumindest nirgends ein gdb File, und das Outputfile ist leer.
    <br>
    Danke im Voraus<br>
    Othmar

  • #2
    Hallo,

    so geht das auch nicht. Wenn die Datenbank mit seinen Tabellen über ein Script angelegt werden soll, muss man sich schon an die vom InterBase 5 erwartete Syntax halten. Das folgende Beispiel (stammt aus meinem Buch <i>Client/Server-Datenbankentwicklung mit Delphi</i>) demonstriert diesen Weg:
    <pre>
    SET NAMES ISO8859_1;

    /* Datenbank erzeugen */

    CREATE DATABASE "C:\Buch\DB\CDROM\Database\SRCARC.GDB"
    USER "SYSDBA" PASSWORD "masterkey"
    DEFAULT CHARACTER SET ISO8859_1;

    /* Domains der Datenbank festlegen */

    CREATE DOMAIN TIdNr AS INTEGER NOT NULL;

    CREATE DOMAIN TProjektName AS VARCHAR(30) CHECK(VALUE LIKE "%.DPR") NOT NULL;

    CREATE DOMAIN TFileName AS VARCHAR(30) NOT NULL COLLATE DE_DE;

    CREATE DOMAIN TDatum AS DATE DEFAULT "NOW" NOT NULL;

    CREATE DOMAIN TDelphiVersion AS SMALLINT NOT NULL
    CHECK (VALUE In (1,2,3,4,5));

    CREATE DOMAIN TProjektPfad AS VARCHAR (255) NOT NULL COLLATE DE_DE;

    CREATE DOMAIN TBoolean AS CHAR(1) NOT NULL CHECK (VALUE IN ("J","N"));

    CREATE DOMAIN TTextBLOB AS BLOB SUB_TYPE 1;

    CREATE DOMAIN TBinBLOB AS BLOB SUB_TYPE 0;

    /* Generatoren festlegen */

    CREATE GENERATOR Gen_ProNr;
    SET GENERATOR Gen_ProNr TO 1000;

    CREATE GENERATOR Gen_VerNr;
    SET GENERATOR Gen_VerNr TO 1;

    CREATE GENERATOR Gen_FileNr;
    SET GENERATOR Gen_FileNr TO 1;

    /* Tabellen */

    CREATE TABLE ProMain (
    ProNr TIdNr PRIMARY KEY,
    ProDatum TDatum,
    ProName TProjektName,
    ProPfad TProjektPfad,
    DVersion TDelphiVersion,
    Abschluss TBoolean,
    Bemerkung TTextBLOB );
    CREATE UNIQUE INDEX IdxProName ON ProMain(ProName);

    ... (usw.)
    <pre&gt

    Comment

    Working...
    X