estou fzendo um programa, e keria fzer um botao pra q quando eu clica-se ele grava-se o valor das variaveis no BD do Access q eu já criei..
a linha de codigo q eu to usando é essa
Private Sub cmdGravar_Click()
cmdIncluir = True
cmdAlterar = True
cmdExcluir = True
cmdGravar = False
cmdSair = True
txtProcesso.Enabled = True
AtualizaCampos
TBProcessos.Update
End Sub
Private Function AtualizaCampos()
TBProcessos("Numero do Processo") = txtProcesso
TBProcessos("CNPJ") = txtCNPJ
TBProcessos("Auditor") = txtNome
TBProcessos("Cidade") = cmbCidade
TBProcessos("DataEntrada") = txtDataEntrada
TBProcessos("DataSaida") = txtDataSaida
End Function
Private Sub Form_Load()
Set BancoDeDados = OpenDatabase(App.Path & "\Projeto.MDB")
Set TBProcessos = BancoDeDados.OpenRecordset("Processos", dbOpenTable)
TBProcessos.Index = "IndProcesso"
cmdGravar.Enabled = False
If TBProcessos.EOF = False Then
AtualizaFormulario
End If
End Sub
é quando e executo o programa e clico para gravar aparesce a seguinte mensagem de erro:
Pergunta
Kawan
ola pessoal..
estou fzendo um programa, e keria fzer um botao pra q quando eu clica-se ele grava-se o valor das variaveis no BD do Access q eu já criei..
a linha de codigo q eu to usando é essa
é quando e executo o programa e clico para gravar aparesce a seguinte mensagem de erro:
Sub or Function Not Defined
nesta linha aki
Private Function AtualizaCampos()
vocês sbe alguma solução??
Editado por kuroiAdicionar tag CODE
Link para o comentário
Compartilhar em outros sites
4 respostass a esta questão
Posts Recomendados
Participe da discussão
Você pode postar agora e se registrar depois. Se você já tem uma conta, acesse agora para postar com sua conta.