Criacao de banco de dados em run-time
25/11/2004
0
bom dia, sou iniciante em FireBird e Delphi, programo em C++ e gostaria de saber como faço para executar um script em um programa feito
em delphi, exemplo do script:
SET SQL DIALECT 3;
CREATE DATABASE ´C:\database\SuperBox FB\vendas.fb´ USER ´SYSDBA´ PASSWORD ´masterkey´;
CREATE DOMAIN T_YESNO AS CHAR(1) DEFAULT ´N´ CHECK((VALUE IS NULL) OR (VALUE IN (´N´,´Y´)));
CREATE TABLE ´ACADPROD´
(
´CODIGO´ VARCHAR(13) CHARACTER SET ISO8859_1 NOT NULL,
´GRUPO´ VARCHAR(6) CHARACTER SET ISO8859_1,
´FORNECEDOR´ VARCHAR(6) CHARACTER SET ISO8859_1,
´NOME´ VARCHAR(70) CHARACTER SET ISO8859_1,
´REFERENCIA´ VARCHAR(25) CHARACTER SET ISO8859_1,
´UNIDADE´ VARCHAR(3) CHARACTER SET ISO8859_1,
´SALDO_INI´ NUMERIC(10,2),
´BALANCA´ T_YESNO
);
ALTER TABLE ´ACADPROD´ ADD CONSTRAINT ´ACADPROD_PRIMARY´ PRIMARY KEY (´CODIGO´);
CREATE INDEX ´UNIDADE´ ON ´ACADPROD´ ´UNIDADE´;
COMMIT WORK;
SET AUTODDL OFF;
SET TERM^;
no ibexpert funciona perfeitamente, mas eu preciso fazer um programa que faça o mesmo que no
ibexpert, ah eu notei que no ibexpert nao é necessario conectar o banco de dados. ate porque eu vou
cria-lo no script.
obrigada a todos pela ajuda.
em delphi, exemplo do script:
SET SQL DIALECT 3;
CREATE DATABASE ´C:\database\SuperBox FB\vendas.fb´ USER ´SYSDBA´ PASSWORD ´masterkey´;
CREATE DOMAIN T_YESNO AS CHAR(1) DEFAULT ´N´ CHECK((VALUE IS NULL) OR (VALUE IN (´N´,´Y´)));
CREATE TABLE ´ACADPROD´
(
´CODIGO´ VARCHAR(13) CHARACTER SET ISO8859_1 NOT NULL,
´GRUPO´ VARCHAR(6) CHARACTER SET ISO8859_1,
´FORNECEDOR´ VARCHAR(6) CHARACTER SET ISO8859_1,
´NOME´ VARCHAR(70) CHARACTER SET ISO8859_1,
´REFERENCIA´ VARCHAR(25) CHARACTER SET ISO8859_1,
´UNIDADE´ VARCHAR(3) CHARACTER SET ISO8859_1,
´SALDO_INI´ NUMERIC(10,2),
´BALANCA´ T_YESNO
);
ALTER TABLE ´ACADPROD´ ADD CONSTRAINT ´ACADPROD_PRIMARY´ PRIMARY KEY (´CODIGO´);
CREATE INDEX ´UNIDADE´ ON ´ACADPROD´ ´UNIDADE´;
COMMIT WORK;
SET AUTODDL OFF;
SET TERM^;
no ibexpert funciona perfeitamente, mas eu preciso fazer um programa que faça o mesmo que no
ibexpert, ah eu notei que no ibexpert nao é necessario conectar o banco de dados. ate porque eu vou
cria-lo no script.
obrigada a todos pela ajuda.
Katiucy_gyn
Curtir tópico
+ 0
Responder
Posts
25/11/2004
Katiucy_gyn
muito obrigada gandalf.nho, sua dica foi de grande ajuda. so troquei o IBScript pelo MDOScript, funcionou perfeitamente.
Responder
Clique aqui para fazer login e interagir na Comunidade :)