Problema Com Consulta Em Dao

[Bruno Krebs]

Olá, eu tenho um banco de dados do access, e abro ele apartir do vb6 com DAO. Em uma das tabelas abertas existe um campo chamado "codigonome", ele é um número do tipo inteiro. O meu problema é que essa linha de código da erro:

tabelaenderecos.FindFirst ("[codigonome] = '" & codigonome & "'")

a mensagem que aparece é:

Run-time error '3464':

Tipo de dados incompatível na expressão de critério.

sendo que a variavel que eu criei "codigonome" também é do tipo inteiro. Qual será o problema??

Desde já, obrigado.

[Decio]

Se a variavel é do tipo interiro então tem que ser assim:

tabelaenderecos.FindFirst ("[codigonome] = " & codigonome & " ") , sem o ( ' )

[Bruno Krebs]

Puxa e eu que perdi um tempão por causa desses dois '. Valeu pela mão aí cara. Mas agora eu tenho outra duvida de DAO, teria como eu procurar por partes de textos nos campos do meu banco??

Por exemplo: Eu tenho um campo chamado "nome", onde obviamente guarda o nome da criatura. E eu gostaria d fazer uma pesquisa entre os cadastrados para ver os que tem sobrenome Silva. E então aparecer o primeiro cadastro que tiver Silva em alguma parte do campo "nome". Teria como??

Desde já, obrigado!

[Decio]

Cara, com DAO faz um bom tempo que eu não mexo, ve se funciona algo parecido com isto:

Rs.Open "select * from [Tabela] WHERE Campo LIKE '%" & Busca & "%' ORDER BY xx ", cnn1, adOpenStatic, adLockOptimistic

Se não funcionar, ve qual é a sintax correta para usar o Like.Eu lembro que tinha uma pequena diferença ...