ERRO AO PEGAR REGISTRO DA TABELA

LEANDRO 27/11/2009 16:27:57
#328691
Boa Tarde a Todos.

Estou desenvolvendo um sistema para acesso em um BD Mysql online. porem estou com problemas.

Minha Conexao
Dim Server As String
Server = [Ô]XXX.XXX.XXX.XXX[Ô]
Conexao = [Ô]DRIVER={MySQL ODBC 3.51 Driver}; SERVER= [Ô] & Server & [Ô]; DATABASE=rumoinfo;PWD=XXXXX; UID=rumoinfo;OPTION=3[Ô]
Set db = New rdoConnection
db.Connect = Conexao
db.CursorDriver = rdUseServer
db.EstablishConnection



Conecta normal consigo fazer selects normal.


Minha variaveis

Option Explicit

Public WithEvents db As rdoConnection

Public Conexao As String
Public Consulta As New rdoQuery
Public Resultado As rdoResultset



Porem quando vou resgatar um campo de uma tabela

  Set Consulta.ActiveConnection = db
Consulta.Execute [Ô]SELECT * FROM cademp where codigo = [ô][Ô] & CodigoEmp & [Ô][ô][Ô]
Set Resultado = Consulta.OpenResultset
xCodEmp = CodigoEmp
xEnder = Resultado!Endereco


o sistema me aponta esse erro:

Citação:

Object Collection: Couldn[ô]t find item indicated by text



Preciso disso urgente pronto
Agradeço a Todos
MARCOSLING 27/11/2009 18:08:05
#328703
Pq vc está usando RDO?
LEANDRO 27/11/2009 18:20:50
#328707
Conexao com Banco em um Provedor online.

ja vi qual o problema,
o SQL nao estava sendo Atualizado e dava o problema

Muito OBrigado
Tópico encerrado , respostas não são mais permitidas