AGB  ·  Datenschutz  ·  Impressum  







Anmelden
Nützliche Links
Registrieren
Zurück Delphi-PRAXiS Programmierung allgemein Datenbanken Delphi IB Expert und Tabelle Anlegen
Thema durchsuchen
Ansicht
Themen-Optionen

IB Expert und Tabelle Anlegen

Ein Thema von SaFu · begonnen am 24. Okt 2009 · letzter Beitrag vom 27. Okt 2009
Antwort Antwort
Hansa

Registriert seit: 9. Jun 2002
Ort: Saarland
7.554 Beiträge
 
Delphi 8 Professional
 
#1

Re: IB Expert und Tabelle Anlegen

  Alt 26. Okt 2009, 13:56
Schon 4 Seiten. Tut langsam weh.

Gehe in die "Script Executive" unter "Tools" und kopiere disen Text da rein :
SQL-Code:
/******************************************************************************/
/****         Generated by IBExpert 2006.08.17 26.10.2009 13:49:00         ****/
/******************************************************************************/

SET SQL DIALECT 3;

SET NAMES ISO8859_1;

CREATE DATABASE 'C:\XYZ.FDB'
USER 'SYSDBA' PASSWORD 'masterkey'
PAGE_SIZE 4096
DEFAULT CHARACTER SET ISO8859_1;



/******************************************************************************/
/****                              Generators                              ****/
/******************************************************************************/

CREATE GENERATOR GEN_TESTTABLE_ID;
SET GENERATOR GEN_TESTTABLE_ID TO 20;



/******************************************************************************/
/****                                Tables                                ****/
/******************************************************************************/



CREATE TABLE TESTTABLE (
    ID INTEGER NOT NULL,
    CITYNO INTEGER NOT NULL,
    COUNTRY VARCHAR(20),
    CITY VARCHAR(20)
);




/******************************************************************************/
/****                             Primary Keys                             ****/
/******************************************************************************/

ALTER TABLE TESTTABLE ADD CONSTRAINT PK_TESTTABLE PRIMARY KEY (ID);


/******************************************************************************/
/****                               Triggers                               ****/
/******************************************************************************/


SET TERM ^ ;


/******************************************************************************/
/****                         Triggers for tables                          ****/
/******************************************************************************/



/* Trigger: TESTTABLE_BI0 */
CREATE TRIGGER TESTTABLE_BI0 FOR TESTTABLE
ACTIVE BEFORE INSERT POSITION 0
AS
BEGIN
  IF (NEW.ID IS NULL) THEN
    NEW.ID = GEN_ID(GEN_TESTTABLE_ID, 1);
END
^


SET TERM ; ^
Lasse es dann (am besten unverändert) laufen. DB dürfte dann erzeugt sein. Nächster Schritt : IBExpert mitteilen, dass es eine neue DB gibt. Also Database -> register database. Local etc. einstellen, Datei u. Pfad auswählen. Sollte das tatsächlich gelingen, dann damit spielen. Die ID in Ruhe lassen, Felder umbennen, statt CITYNO eben ARTNR etc. 8)
Gruß
Hansa
  Mit Zitat antworten Zitat
Antwort Antwort


Forumregeln

Es ist dir nicht erlaubt, neue Themen zu verfassen.
Es ist dir nicht erlaubt, auf Beiträge zu antworten.
Es ist dir nicht erlaubt, Anhänge hochzuladen.
Es ist dir nicht erlaubt, deine Beiträge zu bearbeiten.

BB-Code ist an.
Smileys sind an.
[IMG] Code ist an.
HTML-Code ist aus.
Trackbacks are an
Pingbacks are an
Refbacks are aus

Gehe zu:

Impressum · AGB · Datenschutz · Nach oben
Alle Zeitangaben in WEZ +1. Es ist jetzt 22:22 Uhr.
Powered by vBulletin® Copyright ©2000 - 2025, Jelsoft Enterprises Ltd.
LinkBacks Enabled by vBSEO © 2011, Crawlability, Inc.
Delphi-PRAXiS (c) 2002 - 2023 by Daniel R. Wolf, 2024 by Thomas Breitkreuz