[Resolvido]Condição com valores incompatíveis

Ola, bom dia a todos

Estou de volta com meu projeto, porem me deparei com um problema,

Me.ASP.Value = IIf(DMax("[ASP]", "Histórico de Pagamento", "[Código do Contrato] = Código_do_Contrato") <> "", DMax("[ASP]", "Histórico de Pagamento", "[Código do Contrato] = Código_do_Contrato") + 1, 0)

Em resumo quero que o campo ASP me retorne o maior valor da série de itens com o mesmo código de contrato acrescido de mais um, caso esse contrato naõ tenha nenhuma entrada eu gostaria que ele me retornasse um 0 que posteriormente irei colocar uma MsgBox, mas por enquanto quero que retorne 0 para saber que deu certo.

o problema esta que ele sempre da o erro 13 Erro De Tipos Incompatíveis, acredito que seja por que o campo ASP não é somente numero ele possui códigos como 0, 0A, 0B e etc... se esse realmente for o problema, não estou conseguindo dizer ao access que se este campo não tiver nenhuma entrada ele me retorna 0 ou a MsgBox.


alguém pode me dar uma solução?

Boa tarde Marinho!

Mande uma cópia do banco apenas com os objetos envolvidos. Isso vai ajudar a trabalhar no problema dele com mais agilidade.

Adriano, obrigado pelo apoio mas ja consegui resolver,

Usei a seguinte expressão:

Me.ASP.Value = IIf(DMax("[ASP]", "Histórico de Pagamento", "[Código do Contrato] = Código_do_Contrato") <> 0, DMax("[ASP]", "Histórico de Pagamento", "[Código do Contrato] = Código_do_Contrato"), 0) + 1

e desta forma deu certo.

Vlw