Erro De Inclusão De Registros!
Boa noite!Criei um formulario de cadastro, com um botão de comando incluir e outro salvar.Quando clico no botão incluir, digito as coisas sem problema.Porém quando eu clico no botão salvar ocorre a seguinte mns de erro: "Você tentou inserir um código já existente. Digite um novo código."Acontece que mesmo dando esse erro ele grava os registro normalmente, mas todo cadastro ele acontece essa mensagem de erro.Desde já agradeço!Abaixo está o código!Private Sub cmdIncluir_Click()cmdIncluir.Enabled = FalsecmdExcluir.Enabled = FalsecmdAlterar.Enabled = FalsecmdConsultar.Enabled = FalseDadosIndicadoresC.Recordset.AddNewEnd SubPrivate Sub cmdSalvar_Click()On Error GoTo mensagemcmdIncluir.Enabled = TruecmdExcluir.Enabled = TruecmdAlterar.Enabled = TruecmdConsultar.Enabled = TrueDadosIndicadoresP.Recordset.UpdateExit Submensagem:MsgBox "Você tentou Inserir um código já existente. Digite um novo código."End Sub
Discussão (3)
Carregando comentários...