DBGRID COM FIREBIRD

DAVID.SP 26/10/2009 18:07:36
#326311
boa noite caros,

Uma pequena dúvida. Estou começando a utilizar o FireBird agora, e paquei numa questão.
Como conectar o DBGrid com o FireBird?

Obrigado
TECLA 26/10/2009 19:26:18
#326313
O DBGrid não tem propriedades suficientes para estabelecer comunicação com um banco de dados.
Mas sim, através de um controle de dados vinculado (DataControl) e conectado a este BD, é que se consegue exibir os dados no Grid.

Voltando ao problema, sugiro que PESQUISE no site, pois tem INÚMEROS exemplos com este objetivo.

  • 1º Exemplo
    CADASTRO SIMPLES VB X FIREBIRD

  • 2º Exemplo
    COMO USAR O IBEXPERT COM O FIREBIRD

    Para buscar no site por FIREBIRD, clique no link abaixo:
    FIREBIRD
    •
    DAVID.SP 26/10/2009 20:18:49
    #326317
    Meu caro TECLA,

    Esse material eu tenho, eu nao tenho problemas com o IB Expert consigo trabalhar normalmente com ele.
    Estou com problemas para conectar o DBGrid e o FireBird, quando eu utilizava o Access eu conectava com o DataControl, mas nas propriedades ele trazia a extensão MDB, a minha dúvida é se eu colocar o DataControl como é que faço para conectar??

    Com o access eu usava da maneira abaixo:
    DataClientes.DatabaseName = (App.Path & [Ô]\BD\vendas.mdb[Ô])
    DataClientes.RecordSource = [Ô]Clientes[Ô]

    Já com o FireBird deu erro. Alguem poderia me ajudar?

    Obrigado
    TECLA 26/10/2009 21:12:18
    #326322
    Já que migrou para o FIREBIRD, terás que migrar de [Ô]conceito[Ô].
    Chegou a hora de [Ô]esquecer[Ô] o controle vinculado e usar o mecanismo ADO.
    Aprenda ADO e utilize um GRID como o MSFLEXGRID.
    DAVID.SP 26/10/2009 23:09:50
    #326324
    Meu caro TECLA,

    Estou utilizando o ADO. Já usei em outros aplicativos mas nunca precisei usar o grid e é justamente nisso que estou com dúvida.

    Alguem poderia me dar uma luz de como conectar o dbgrid ao banco via ADO?

    Obrigado
    DAVID.SP 27/10/2009 10:20:41
    #326341
    Alguem??
    DAVID.SP 27/10/2009 10:39:37
    #326347
    Alguem??
    EDERMIR 27/10/2009 11:10:28
    #326348
    DAVID_SP

    Não utilizo a conexão direta do BD com objetos do VB.

    Acredito ser desta forma:
    DataClientes.DatabaseName = (App.Path & [Ô]\BD\vendas.fdb[Ô])
    DataClientes.RecordSource = [Ô]Clientes[Ô]

    Existem recomendações no VB sobre a utilização do MSFLEXGRID em lugar do tradicional GRID.
    DAVID.SP 27/10/2009 12:36:56
    #326353
    Caros,

    Eu mudei a conexao para a seguinte forma:

    Modulo:
    Sub abre()
    Dim Con As New ADODB.Connection
    Dim RS As ADODB.Recordset

    Set RS = New ADODB.Recordset

    Con.Open [Ô]Provider=ZStyle IBOLE Provider;Data Source=E:\Meus Programas\Despertador\DESPERTA.gdb;UID=SYSDBA;password=masterkey[Ô]

    RS.Open [Ô]SELECT * FROM CADFUNCIONARIO;[Ô], Con

    Set CadFunc.DBGrid1.DataSource = RS

    RS.Close
    Con.Close
    End Sub

    e no form eu chamo esta rotina:
    call abre

    Mas ocorre o erro a seguir:

    Run timer error 430
    Class does not support automation or does not support expected interface.

    Alguem tem idéia do que pode ser??

    Obrigado.
    EDERMIR 27/10/2009 13:33:05
    #326361
    Em que linha?
    DAVID.SP 27/10/2009 13:50:02
    #326364
    Caro EDERMIR,

    Foi mal.
    Ocorre este erro na linha

    Set CadFunc.DBGrid1.DataSource = RS

    Obrigado
    Página 1 de 2 [15 registro(s)]
    Tópico encerrado , respostas não são mais permitidas
    Voltar