AJUDA PARA CONECTAR .GBD AO VB6
Boa tarde pessoal,
Sou iniciante em VB6, e não estou conseguindo conectar o banco de dados. Quando tento abrir o sistema pelo VB6, aparece a seguinte mensagem de erro:
Rum-Time error [ô]3706[ô]
Provedor não encontrado. é possÃvel que ele não esteja instalado corretamente.
O erro aparece nesta parte:
Public Function CONECTA(ByVal Valor As Boolean)
If Valor = True Then
Set CNN = New ADODB.Connection
BANCODEDADOS = ReadINIString([Ô]BANCODEDADOS[Ô], [Ô]CAMINHO[Ô], App.Path & [Ô]\Config.ini[Ô])
IDENTIDADE = ReadINIString([Ô]BANCODEDADOS[Ô], [Ô]IDENTIDADE[Ô], App.Path & [Ô]\Config.ini[Ô])
CONEXAO = [Ô]Provider=SIBPROvider.2; SIB:Character Set =WIN1252; Data Source=[Ô] & BANCODEDADOS & [Ô];User ID=[Ô] & [Ô]SYSDBA[Ô] & [Ô];Password=[Ô] & IDENTIDADE & [Ô][Ô]
[txt-color=#e80000] CNN.Open CONEXAO[/txt-color]
CNN.CursorLocation = adUseClient
Else
CNN.Close
Set CNN = Nothing
End If
End Function
Alguém pode me ajudar?
Desde já agradeço.
Sou iniciante em VB6, e não estou conseguindo conectar o banco de dados. Quando tento abrir o sistema pelo VB6, aparece a seguinte mensagem de erro:
Rum-Time error [ô]3706[ô]
Provedor não encontrado. é possÃvel que ele não esteja instalado corretamente.
O erro aparece nesta parte:
Public Function CONECTA(ByVal Valor As Boolean)
If Valor = True Then
Set CNN = New ADODB.Connection
BANCODEDADOS = ReadINIString([Ô]BANCODEDADOS[Ô], [Ô]CAMINHO[Ô], App.Path & [Ô]\Config.ini[Ô])
IDENTIDADE = ReadINIString([Ô]BANCODEDADOS[Ô], [Ô]IDENTIDADE[Ô], App.Path & [Ô]\Config.ini[Ô])
CONEXAO = [Ô]Provider=SIBPROvider.2; SIB:Character Set =WIN1252; Data Source=[Ô] & BANCODEDADOS & [Ô];User ID=[Ô] & [Ô]SYSDBA[Ô] & [Ô];Password=[Ô] & IDENTIDADE & [Ô][Ô]
[txt-color=#e80000] CNN.Open CONEXAO[/txt-color]
CNN.CursorLocation = adUseClient
Else
CNN.Close
Set CNN = Nothing
End If
End Function
Alguém pode me ajudar?
Desde já agradeço.
A mensagem é clara no sentido de que não existe o provedor/conector que promove a conexão com o seu banco de dados, você só precisa instala-lo, atente-se para a correta versão.
Abraços
Abraços
Percebi que o provedor é o SIBPROvider.2. Mas não sei onde baixar e instalá-lo. Ele é executável ou .dll?
Abraços!
Abraços!
Citação::
Percebi que o provedor é o SIBPROvider.2. Mas não sei onde baixar e instalá-lo. Ele é executável ou .dll?
Abraços!
Esse provedor me parece algo do Interbase ou Firebase, se você esta iniciando agora, use algo mais facil, como por exemplo SQL Server ou MySql, a documentação é enorme e será muito mais facil obter ajuda.
Também se você é iniciante em VB6, use algo mais novo, C# por exemplo é uma ótima linguagem, mas se você já conhece o VB6 então de uma olhada no VB.Net, embora eu recomende fortemente o C#.
Abraços
Registre e use.
Bom dia OMAR2011,
Uso o Windows 7 64bits. Em qual pasta coloco esta .dll? Como é feito o registro desta?
Abraços!
Uso o Windows 7 64bits. Em qual pasta coloco esta .dll? Como é feito o registro desta?
Abraços!
Meu windows no desktop é 32
uso no System32
O seu é 64,então coloque no
SysWOW64
uso no System32
O seu é 64,então coloque no
SysWOW64
E como faço para chamar o banco de dados? preciso mudar alguma linha do código postado acima?
Veja.
[Ô]Provider=Ibole.provider.v4;Data Source=[Ô] & App.Path & [Ô]\SeuBanco.fdb ou gdb[Ô], [Ô]sysdba[Ô], [Ô]masterkey[Ô]
[Ô]Provider=Ibole.provider.v4;Data Source=[Ô] & App.Path & [Ô]\SeuBanco.fdb ou gdb[Ô], [Ô]sysdba[Ô], [Ô]masterkey[Ô]
Faça seu login para responder