Olá! a todos, tou com um probleminha que com certeza para muitos aqui é algo simples. Tenho um formulário que exibe dados de uma tabela. E nela eu coloquei um botão de comando, gostaria que quando eu clicasse nesse botão eu excluísse todos os dados da tabela. Sei que dá para fazer isso através de uma consulta exclusão, mas só que eu quero via VB, algum código que exclua e se possível colocasse uma mensagem final informando que os dados foram excluídos com sucesso. Alguém pode me ajudar ?
4 participantes
[Resolvido]Botão para excluir dados de uma tabela
emacsabino- Intermediário
- Respeito às regras :
Sexo :
Localização :
Mensagens : 190
Registrado : 29/08/2011
- Mensagem nº1
Botão para excluir dados de uma tabela
Convidad- Convidado
Olá
No evento AoClicar do botão:
CurrentDb.Execute "DELETE * FROM NomeDaTabela"
Pode incluir:
MsgBox "Dados da tabela excluídos com sucesso"
emacsabino- Intermediário
- Respeito às regras :
Sexo :
Localização :
Mensagens : 190
Registrado : 29/08/2011
Perfeito. Muito obrigado, me responda mais uma coisa, para ser bom em Visual Basic, eu tenho que começar por lógica de programação ou eu começaria por algum material já falando de Visual Basic?
Avelino Sampaio- Developer
- Respeito às regras :
Sexo :
Localização :
Mensagens : 3900
Registrado : 04/04/2010
Olá
Antes do teste faça um backup do seu projeto e das suas tabelas. Fiquei na dúvida se vc na verdade quer excluir somente o registro que esta sendo exibido no formulário.
Ponha no evento "Ao clicar" do botão:
if msgbox("Deseja excluir TODOS os registros da tabela ?",vbQuestion +vbYesNo ,"Confirmação")=vbNo then exit sub
Currentdb.execute "DELETE FROM NomeDaTabela;"
MsgBox "Todos os registros foram excluidos...", vbInformation, "Aviso"
Sucesso!
Antes do teste faça um backup do seu projeto e das suas tabelas. Fiquei na dúvida se vc na verdade quer excluir somente o registro que esta sendo exibido no formulário.
Ponha no evento "Ao clicar" do botão:
if msgbox("Deseja excluir TODOS os registros da tabela ?",vbQuestion +vbYesNo ,"Confirmação")=vbNo then exit sub
Currentdb.execute "DELETE FROM NomeDaTabela;"
MsgBox "Todos os registros foram excluidos...", vbInformation, "Aviso"
Sucesso!
.................................................................................
Vídeos, livros, kit MontaRibbons e acesso vitalício ao site UsandoAcces
Clique AQUI e analise o custo beneficio do material oferecido.
Avelino Sampaio- Developer
- Respeito às regras :
Sexo :
Localização :
Mensagens : 3900
Registrado : 04/04/2010
Desculpa. Não tinha visto que tinha a resposta
.................................................................................
Vídeos, livros, kit MontaRibbons e acesso vitalício ao site UsandoAcces
Clique AQUI e analise o custo beneficio do material oferecido.
Convidad- Convidado
Oportuna intervenção, Avelino.
Apesar do colega ter mencionado "todos os dados da tabela", eu deveria ter confirmado.
Mac:
Só um detalhe: não confunda VB com VBA.
Anexo um tutorial.
emacsabino- Intermediário
- Respeito às regras :
Sexo :
Localização :
Mensagens : 190
Registrado : 29/08/2011
Novamente obrigado, por tudo, principalmente pela apostila. "Se enxerguei distante é porque eu estava em ombros de gigantes" E você com certeza e como outros também, é um gigante. Valeu fera
Convidad- Convidado
Disponha!
Agradecemos o retorno.
pwilm- Novato
- Respeito às regras :
Sexo :
Localização :
Mensagens : 2
Registrado : 11/02/2012
Nobre
como faço pra colocar uma senha de protecao para garantir o comando
como faço pra colocar uma senha de protecao para garantir o comando
fazerbem- Avançado
- Respeito às regras :
Sexo :
Localização :
Mensagens : 439
Registrado : 05/03/2017
- Mensagem nº10
Re: [Resolvido]Botão para excluir dados de uma tabela
Oi, isso vai me servir tb e me abriu uma ideia pra outra coisa.
» [Resolvido]Botao excluir registro no form e consulta para exlcuir dados em outra tabela....
» [Resolvido]Como Excluir dados usando uma tabela normal mais uma tabela detalhe
» [Resolvido]Excluir registros de uma tabela, mas que fosse transferida para outra tabela no mesmo BD
» Excluir ou Ocultar dados de tabela
» Filtrar excluir dados de Tabela
» [Resolvido]Como Excluir dados usando uma tabela normal mais uma tabela detalhe
» [Resolvido]Excluir registros de uma tabela, mas que fosse transferida para outra tabela no mesmo BD
» Excluir ou Ocultar dados de tabela
» Filtrar excluir dados de Tabela