ERRO INTERNO DE AUTOMACAO OLE

SAMATE82 17/02/2011 10:40:40
#365727
AI GALERA EU FIZ UM PROGRAMINHA PARA EU CADASTRAR E ORGANIZAR MINHA CIFRAS, E FIZ UMA AREA DE CONSULTA E FICOU ASSIM:

Private Sub cmdOK_Click()
If cmdok.Caption = [Ô]OK[Ô] Then
Tb.Close
Tb.Open [Ô]select * from tbcifras[Ô], Db
limpafrmprincipal
Else
resposta = Combo1.Text
Tb.Close
Tb.Open [Ô]select * from tbcifras where musica like [ô]%[Ô] & resposta & [Ô]%[ô][Ô], Db
If Tb([Ô]musica[Ô]) = resposta Then
Do Until Tb.EOF
carrega
Tb.MoveNext
Loop
Else
If Tb.EOF Then
MsgBox [Ô]Não encontrei o o Título: [Ô] & resposta, vbCritical, [Ô]Erro de Pesquisa[Ô]
Tb.Close
Tb.Open [Ô]select * from tbcifras[Ô], Db
Else
cmdok.Caption = [Ô]OK[Ô]
End If
End If
End If
End Sub

NO PROJETO FUNCIONA NORMAL, MAS DEPOIS QUE EU GERO O INSTALADOR DA ESSE PAU AI

ERRO INTERNO DE AUTOMACAO OLE

NA HORA QUE EU CLICO NO BOTÃO OK
ASHKATCHUP 19/02/2011 18:16:59
#365987
Cara...só pelo o que vc postou não da pra identificar...

Posta print do erro.
Ou posta o instalador.
XXXANGELSXXX 20/02/2011 12:04:50
#366022 Resposta escolhida
Erro automação ole pode ser biblioteca faltando, realmente pelo que vc passou fica dificil demais identificar.. a consulta em sí aparenemente ta correta ( nao trabalho com DAO ) mas parece estar certa, voce gerou o setup de instalacao e instalou em outra maquina? por isso esta dando erro? ja instalou as bibliotecas do DAO 3.51 ou 3.6 ?
SAMATE82 21/02/2011 08:54:26
#366084
eu fiz a referencia, mas continua dando o erro
Tópico encerrado , respostas não são mais permitidas
Voltar