Foros Club Delphi - Crear Tabla Firebird

Foros Club Delphi (https://www.clubdelphi.com/foros/index.php)

- Firebird e Interbase (https://www.clubdelphi.com/foros/forumdisplay.php?f=19)

- - Crear Tabla Firebird (https://www.clubdelphi.com/foros/showthread.php?t=48664)

mjjj	01-10-2007 19:17:46

Crear Tabla Firebird

HOLA AMIGOS... TENGO UNA PREGUNTA...

UTILIZO DELPHI 2006, FIREBIRD 2.0.1

NECESITO CREAR UNA TABLA EN FIREBIRD DESDE UN PROGRAMA DE DELPHI... UNA VEZ QUE EL PROGRAMA ESTA CORRINDO.

LA BASE DE DATOS SE ESTA EN ESTA DIRECCION: localhost:C:\TABLAS\DATOS.FDB

LA TABLA SE LLAMA: OCTUBRE
DEBE TENER LOS SIGUIENTES CAMPOS:
OT: CHAR (5)
SUB: CHAR(1)
BATCH: INTEGER
ESTADO: CHAR(1)
TEMPERATURA: INTEGER
PRESION: INTEGER
DIA: DATE
HORA: TIME

COMO DEBERIA SER EL CODIGO PARA PODER REALIZAR ESTA OPERACION??
QUE COMPONENTE NECESITO??

ESPERO ME PUEDAN AYUDAR... GRACIAS

egostar

01-10-2007 19:47:47

Necesitas un componente que te permita ejecutar una DDL en mi Delphi uso IBScript

Aqui la sentecia que deberias de ejecutar para crear una tabla

Código SQL [-]SET SQL DIALECT 3;

CREATE DATABASE 'CWSupport.fdb'
USER 'SYSDBA' PASSWORD 'masterkey'
PAGE_SIZE 1024
DEFAULT CHARACTER SET NONE;

CREATE TABLE PRODUCTS
(
 ProductID VARCHAR(10) NOT NULL,
 Name VARCHAR(50),
 VBClass VARCHAR(15),
 Internal VARCHAR(5),
 Distrib VARCHAR(5),
 Extranet VARCHAR(5),
 Interra VARCHAR(5),
 CONSTRAINT PK_PRODUCTS PRIMARY KEY (ProductID)
);

Salud OS

mjjj	01-10-2007 22:25:29

eso lo tengo que ascribir en la propiedad SCRIPT del componente IBSCRIPT...

como puedo escribir eso mismo en codigo DELPHI??

como se llama al IBSCRIPT en tiempo de ejecucion en delphi... podria ser con un boton... como seria ese codigo??

gracias por su tiempo.... saludos

mjjj	01-10-2007 23:40:27

Otra Cosa... Al Parecer El Codigo Que Me Enviaste Es Para Crear Una Base De Datos Nueva... Yo Solo Quiero Crear Una Tabla Dentro De Una Base De Datos Existente

Como Hago Eso???

egostar

01-10-2007 23:56:06

Cita:

Empezado por mjjj (Mensaje 235400)

Si, pegas el código en la propiedad Script y lo ejecutas así

Código Delphi [-]IBScript1.ExecuteScript;

Cita:

Empezado por mjjj (Mensaje 235429)

Otra Cosa... Al Parecer El Codigo Que Me Enviaste Es Para Crear Una Base De Datos Nueva... Yo Solo Quiero Crear Una Tabla Dentro De Una Base De Datos Existente

Como Hago Eso???

Solo borra esa parte de la Base de Datos

Código SQL [-]CREATE TABLE mjjj
(
 ProductID VARCHAR(10) NOT NULL,
 Name VARCHAR(50),
 VBClass VARCHAR(15),
 Internal VARCHAR(5),
 Distrib VARCHAR(5),
 Extranet VARCHAR(5),
 Interra VARCHAR(5),
 CONSTRAINT PK_PRODUCTS PRIMARY KEY (ProductID)
);

Salud OS

semaral

25-05-2008 13:21:31

Problema al crear una baste de datos en firebird

Cita:

Empezado por egostar (Mensaje 235340)

Necesitas un componente que te permita ejecutar una DDL en mi Delphi uso IBScript

Aqui la sentecia que deberias de ejecutar para crear una tabla

Código SQL [-]
SET SQL DIALECT 3;

CREATE DATABASE 'CWSupport.fdb'
USER 'SYSDBA' PASSWORD 'masterkey'
PAGE_SIZE 1024
DEFAULT CHARACTER SET NONE;

CREATE TABLE PRODUCTS
(
ProductID VARCHAR(10) NOT NULL,
Name VARCHAR(50),
VBClass VARCHAR(15),
Internal VARCHAR(5),
Distrib VARCHAR(5),
Extranet VARCHAR(5),
Interra VARCHAR(5),
CONSTRAINT PK_PRODUCTS PRIMARY KEY (ProductID)
);

Salud OS

Hola amigos:

he Buscado en el club un script para la creación de bases de datos, y he encontrado éste, pero al aplicarlo a mi programa me dice que el usuario o password está mal. A ver si pueden ayudarme. Utilizo Delphi 2007 y firebird 2.0. Utilizo un componente ibscript1:TIBScript

Código Delphi

Código:

 

    with ibscript1.Script do

    begin

      clear;

      append('SET SQL DIALECT 3;');

      append('CREATE DATABASE '+quotedstr('.\bdreembolsos\bdreembolsos.gdb'));

      append('USER '+QUOTEDSTR('SYSDBA')+' PASSWORD ' + QUOTEDSTR('masterkey'));

      append('PAGE_SIZE 1024');

      append('DEFAULT CHARACTER SET NONE;');

    end;

    ibscript1.ExecuteScript;

Muchisimas gracias por vuestra ayuda.

semaral

26-05-2008 18:12:16

Hola, buenos días. Ya está solucionado. El error no me lo daban estas instrucciones. Estas instrucciones funcionan perfectamente. Muchas gracias a todos.

La franja horaria es GMT +2. Ahora son las 20:40:10.