Numero de contrato automático

Ola amigos,

Tenho tabela de cadastro de contratos aonde tenho o campo ID , NUMERO DE CONTRATO, bom o campo ID está Automatico e gostaria que no campo NUMERO DE CONTRATO ele gerasse automaticamente um numero sequencial para que a cada registro novo eu tenha não tenha qie preencher um numero de Contrato, alguem pode me dar um help

Att

Amigos ,

Consegui usando o codigo abaixo:

Código:


Private Sub Form_Current()
  If Me.NewRecord Then
        On Error Resume Next 'Apenas por segurança...
        Me![NCONTRATO].DefaultValue = Nz(DMax("[NCONTRATO]", "CONTRATOS"), 0) + 1
    End If



End Sub



aTT

Se está resolvido, então é necessário marcar o tópico como resolvido. Aguardamos sua ação.