INCREMENTAR CODIGO NO BD

CARLINHOS 01/03/2012 09:45:50
#396128
Pessoal estou querendo gerar um codigo automático, estou usando o seguinte:
DadosModalidades.Recordset.AddNew
If IsNull(DadosModalidades.Recordset) = False Then
VarCodigo = DadosModalidades.Recordset.Fields([Ô]Codigo[Ô]) + 1
Else
VarCodigo = 1
End If
DadosModalidades.Recordset.Fields([Ô]Codigo[Ô]) = VarCodigo
O banco de dados está VAZIO, mas na condição fala que não é Null mas dá erro quanto tento adicionar mais 1.
Alguem poderia me dar uma ideia ou me falar o que pode estar acontecendo?
Obrigado
KERPLUNK 01/03/2012 09:50:38
#396131
Você só pode executar operações matemáticas com números. NULL, não é um número e por isso não pode ser somado.
Tópico encerrado , respostas não são mais permitidas