Busca Aproximada

[Technoghost 0]

Bem, tenho um recordset ja populado com todos os Funcionario cadastrados e preciso realizar uma busca aproximada.Tentei usar o método Find mas nao to conseguindo..Se alguem puder me ajudar eu agradeço. Vlw!

[cassitos 2]

o recordset tem a propriedade Filter, nele você pode utilizar uma consulta parecida com where, tipo:recordset.filter = "NOMEFUNCIONARIO LIKE '%abre%'o resultado, se houve, será todos os funcionarios que possuem abreu no nome.

[Technoghost 0]

Até funcionou.. porém...Os registros são exibidos em um grid... e usando o filter só fica aparecendo o mais próximo.. os outros deveriam aparecer e sendo q o cursor apontaria para o mais próximo.Vou ver se consigo resolver.Mas vlw mesmo assim.

[Technoghost 0]

Mionha solução: Dim tCd_Funcionario As Integer With rsFuncionario .Filter = "Nm_Funcionario LIKE %" & txtLocalizar.Text & "%" tCd_Funcionario = !Cd_Funcionario .Filter = "" .MoveFirst .Find "Cd_Funcionario = " & tCd_Funcionario, , adSearchForward End WithConsegui.Mto obrigado pela ajuda!