USUÁRIO:      SENHA:        SALVAR LOGIN ?    Adicione o VBWEB na sua lista de favoritos   Fale conosco 

 

  Fórum

  Visual Basic
Voltar
Autor Assunto:  criar banco em tempo de execução (firebird)
jvlsm
SANTA MARIA
RS - BRASIL
Postada em 05/06/2005 22:38 hs            

Caros Colegas,

Alguem saberia me dizer como faço para criar um arquivo fdb (firebird) em tempo de execução no visual basic?

Para abrir eu faço assim:

Set Conn = New ADODB.Connection
Conn.Open "Provider=ZStyle IBOLE Provider;Password=masterkey;User ID=sysdba;Data Source='C:Teste.fdb" & "';SQL Dialect=3;Logging Level=0;Silent mode=True;Lock resolution=1;Isolation level=4096"

e funciona beleza...

 

Juliano V. Londero
jvlsm@terra.com.br
     
kerplunk
Pontos: 2843 Pontos: 2843 Pontos: 2843
SÃO PAULO
SP - BRASIL
Postada em 06/06/2005 10:51 hs         
Pode criar um fdb vazio e colocar ele em alguma pasta qq, dae é só copiar ele para a pasta de dados e renomear.
     
MARCONE
Pontos: 2843
BRASÍLIA
DF - BRASIL
Postada em 06/06/2005 15:02 hs            
 
'Criando a base de dados:
CREATE DATABASE 'SuaBaseDados.gdb' USER 'sysdba' PASSWORD 'masterkey';

'Criando uma tabela:
CREATE TABLE tblEstados (cod_estado VARCHAR(2) NOT NULL PRIMARY KEY, nome_estado VARCHAR(30) NOT NULL);

Inserindo registros na tabela criada:

INSERT INTO tblEstados (cod_estado, nome_estado) VALUES ('MG', 'Minas Gerais');

INSERT INTO tblEstados (cod_estado, nome_estado) VALUES ('DF', 'Distrito Federal');
 
Veja se o código acima ajuda..

MarconeEmoções

 

     
MARCONE
Pontos: 2843
BRASÍLIA
DF - BRASIL
Postada em 06/06/2005 15:07 hs            
Em tempo: você pode mudar a extensão do arquivo de .gdb para .fdb

MarconeEmoções

 

     
jvlsm
SANTA MARIA
RS - BRASIL
Postada em 06/06/2005 18:31 hs            
estou usando assim:
 
Dim cat As New ADOX.Catalog
cat.Create "Provider=ZStyle IBOLE Provider;Data Source=c:Teste.fdb"
Set cat = Nothing
 
mas esta dando o seguinte erro:
 
Não há suporte para esta interface...

Juliano V. Londero
jvlsm@terra.com.br
     
Página(s): 1/1    


Seu Nome:

Seu eMail:

ALTERAR PARA MODO HTML
Mensagem:

[:)] = 
[:P] = 
[:(] = 
[;)] = 

HTML DESLIGADO

     
 VOLTAR

  



CyberWEB Network Ltda.    © Copyright 2000-2025   -   Todos os direitos reservados.
Powered by HostingZone - A melhor hospedagem para seu site
Topo da página