Quero digitar (incluir ou substituir) os dados o frm Cliente.
E salvar nas tabelas: tblCliente3 e Cliente
No frm Cliente>>>>>>>>> os campos são > cliente e nascimento
Na tbl Cliente 3 >>>>>>> os campos são > cliente e nascimento
Na tabela Cliente >>>>>> os campos são > cliente e nascimento
Criar o botão INSERIR DADOS no frm Cliente
Na tblCliente 3 há vários campos
Na Cliente apenas > cliente e nascimento
Como fazer?
CONTINUANDO
Digito os dados o frm Cliente, e é salvo na tbl Cliente3;
Mas quero que também seja salvo na tabela Cliente..
No frm Cliente>>>>>>>>> os campos são > cliente e nascimento
Na tbl Cliente 3 >>>>>>> os campos são > cliente e nascimento
Na tabela Cliente >>>>>> os campos são > cliente e nascimento
Criei o botão INSERIR DADOS no frm Cliente, aceita, não dá erro, mas não salva.
Private Sub Inserir_Dados_Click()
CurrentDb.Execute " INSERT INTO Cliente(Cliente,Nascimento)VALUES('" & Cliente.Value & "' ," & Nascimento & ")"
MsgBox "Dados Inseridos com sucesso.", vbInformation, "Dados"
End Sub
Não atualiza tabela CLIENTE .
Outro detalhe que não consegui acertar.
No frm CLIENTE, o campo aniversário , fica como 07/03/2024 e não 07/03.
Os campos estão como DATA/HORA.
E salvar nas tabelas: tblCliente3 e Cliente
No frm Cliente>>>>>>>>> os campos são > cliente e nascimento
Na tbl Cliente 3 >>>>>>> os campos são > cliente e nascimento
Na tabela Cliente >>>>>> os campos são > cliente e nascimento
Criar o botão INSERIR DADOS no frm Cliente
Na tblCliente 3 há vários campos
Na Cliente apenas > cliente e nascimento
Como fazer?
CONTINUANDO
Digito os dados o frm Cliente, e é salvo na tbl Cliente3;
Mas quero que também seja salvo na tabela Cliente..
No frm Cliente>>>>>>>>> os campos são > cliente e nascimento
Na tbl Cliente 3 >>>>>>> os campos são > cliente e nascimento
Na tabela Cliente >>>>>> os campos são > cliente e nascimento
Criei o botão INSERIR DADOS no frm Cliente, aceita, não dá erro, mas não salva.
Private Sub Inserir_Dados_Click()
CurrentDb.Execute " INSERT INTO Cliente(Cliente,Nascimento)VALUES('" & Cliente.Value & "' ," & Nascimento & ")"
MsgBox "Dados Inseridos com sucesso.", vbInformation, "Dados"
End Sub
Não atualiza tabela CLIENTE .
Outro detalhe que não consegui acertar.
No frm CLIENTE, o campo aniversário , fica como 07/03/2024 e não 07/03.
Os campos estão como DATA/HORA.
Última edição por Greb em 16/2/2024, 22:15, editado 1 vez(es) (Motivo da edição : Maiores informaçãoes para receber ajuda)