ACESSO VB-6 AO FIREBIRD COM ADODB
Pessoal, tem como acessar a uma base de dados do Firebird usando ADODB (como no Access, SQL...), ou só vai com o driver ODBC ZStyle ? 
Estou aprendendo como usá-lo
Estou aprendendo como usá-lo
Cara eu uso o ibprovider, e vai sem problemas, so que no site deles foi tirado a versão free, ou pelo menos eu não achei
http://www.ibprovider.com/eng/index.html
mais se vc quiser me envia um email que eu te passo o instalador. Não envio por aqui pois o limite é 1,05 mb e ele da quase 6mb,
String de conecção que eu uso:
StrConn = [Ô]Provider=LCPI.IBProvider.3.Free;Persist Security Info=False;Data Source=SuaDescrição;Location=LocalDoBancoDeDados;ctype=WIN1252;auto_commit=True;[Ô]
Adoconn.Open StrConn, [Ô]SYSDBA[Ô], [Ô]masterkey[Ô]
abraços
http://www.ibprovider.com/eng/index.html
mais se vc quiser me envia um email que eu te passo o instalador. Não envio por aqui pois o limite é 1,05 mb e ele da quase 6mb,
String de conecção que eu uso:
StrConn = [Ô]Provider=LCPI.IBProvider.3.Free;Persist Security Info=False;Data Source=SuaDescrição;Location=LocalDoBancoDeDados;ctype=WIN1252;auto_commit=True;[Ô]
Adoconn.Open StrConn, [Ô]SYSDBA[Ô], [Ô]masterkey[Ô]
abraços
usa o ODBC que tem no proprio site do firebird
ai você liga ao banco como no exemplo abaixo.
ai você liga ao banco como no exemplo abaixo.
Citação:
Public Sub Atualiza_Grid()
Dim Cont As Integer
Dim Cn As New ADODB.Connection
Dim Rs As New ADODB.Recordset
Dim Sql
Cn.ConnectionString = [Ô]DRIVER=Firebird/InterBase(r)
driver;UID=SYSDBA;PWD=masterkey;DBNAME=D:\Projetos\Database\Teste\TESTE.fdb[Ô]
Cn.Open
Sql = [Ô]Select * From TESTE[Ô]
Set Rs = Cn.Execute(Sql)
Tópico encerrado , respostas não são mais permitidas