[Resolvido]Busca por Combo

Boa tarde, apersar de saber fazer isso, com essa tabela especificamente estou tendo problemas com o codigo de ir para o controle ativo


' Encontrar o registro que coincide com o controle.
Dim rs As Object

Set rs = Me.Recordset.Clone
rs.FindFirst "[Placa] = " & Str(Nz(Me![cboViatura], 0))
If Not rs.EOF Then Me.Bookmark = rs.Bookmark
Me.cboViatura.Value = ""


A tabela nao tem um campo de numeracao automatica como ID

A chave primária é a placa do veículo
CampoPlaca: xxx-1234

Esta dando tipos incompatíveis...

Quando a ID é numerica (numeracao auomatica da certo)
agora que a chave primaria não é convencional, no caso a placa do veículo., esta dando erro

Erro 13

Sera que é porque o campo Placa é texto?

Se puderem ajudar fico grato..

Saudações

Amigão

Sabes, tens a obrigação de saber e de dar o exemplo. Mete uma chave primária nisso e se possível tenta formatar o campo texto para receber a placa de matrícula. Em PT é fácil, em BR não sei.

Para cá fiz esta máscara aa-aa-aa;;;;

Permite utilizar as matrículas 00-AA-00 ou AA-00-00 ou 00-00-AA

Esta com mascara e chave primaria amigao...
mas mesmo assim da tipo incompativeis...

a chave primaria nao poderia ser a matricula do veículo (placa)?

Ó amigão, se dá incompatível é porque essa ligação está mal feita e isso é sintoma de cansaço. Não tens parado de produzir. Porque não preenches os campos através do método .colunm()? Ou usas um Dlookup? Mas primeiro verifica o porquê das chaves primárias.

Não te aconselho. Utiliza o nº sequencial e podes esconde-lo do utilizador, pois ele só vai servir para chave primária

Apenas queria a placa como chave primaria, mas se não conseguir o jeito e usar autonumeracao mesmo

Grato amigão

Amanha verei isto e dou retorno, pois estou em outro pc..
Abraços

É melhor. Vais ver como resolves dessa forma e como disse esse campo pode estar escondido.

Claro..
tenha uma ótima noite amigão

Para ti também.

Bom dia Mestre...

Infelizemente ha coisas que não podemos realmente fazer como queremos, antes devemos seguir a tecnicidade que é inerente a um bom desenvolvimento.


Coloquei um Campo ID_placa(numeracao automatica) como chave primaria, relacionei com a tabela secundária por em um campo Numero Placa (como chave estrangeira)


Saudações

Mais um aprendizado. Valeu.