EXECLUIR ITENS DE UM ATABELA
Tenha uma tabela (Access) de cadastro de
[Caixas contendo os itens abaixo
Controle, Nome, Venda A Prazo, Venda a Vista
Estou usando assim pra apagar tudo no caso
.CommandText = [Ô]Delete From CadCaixas Where CaixaID =[Ô] & CaixaID
.Execute
‘ Ok Apaga todo o item da tabela.
Mais pra apagar somente os itens: Venda A Prazo, Venda a Vista
E mantendo Controle, Nome.
Grato
Nilton
[txt-color=#0000f0] [/txt-color]
[Caixas contendo os itens abaixo
Controle, Nome, Venda A Prazo, Venda a Vista
Estou usando assim pra apagar tudo no caso
.CommandText = [Ô]Delete From CadCaixas Where CaixaID =[Ô] & CaixaID
.Execute
‘ Ok Apaga todo o item da tabela.
Mais pra apagar somente os itens: Venda A Prazo, Venda a Vista
E mantendo Controle, Nome.
Grato
Nilton
[txt-color=#0000f0] [/txt-color]
Nilton tenta asim
CommandText = [Ô]Delete Venda A Prazo,Venda a Vista From CadCaixas Where CaixaID =[Ô] & CaixaID
.Execute
CommandText = [Ô]Delete Venda A Prazo,Venda a Vista From CadCaixas Where CaixaID =[Ô] & CaixaID
.Execute
amigo sua pergunta está meio confusa
Mais pra apagar somente os itens: Venda A Prazo, Venda a Vista
E mantendo Controle, Nome.
acho que naverdade você não que excluir um registro e sim altera-lo não?
caso for isso basta fazer
.CommandText = [Ô]update CadCaixas set Venda A Prazo=null, Venda a Vista=null Where CaixaID =[Ô] & CaixaID
.Execute
Mais pra apagar somente os itens: Venda A Prazo, Venda a Vista
E mantendo Controle, Nome.
acho que naverdade você não que excluir um registro e sim altera-lo não?
caso for isso basta fazer
.CommandText = [Ô]update CadCaixas set Venda A Prazo=null, Venda a Vista=null Where CaixaID =[Ô] & CaixaID
.Execute
Nilton bom dia.
não sei bem se eu entendi. entao vamos la. por que voce nao cria outro botao comando para esta funcao e ao inves de excluir voce colocaria um update apagando os campos que voce quer apagar.
[txt-color=#e80000]Private Sub CMDdelcadastro_Click()
[ô]limpa os campos para gravar
TXTSEQ = [Ô][Ô]
txtplacet = [Ô][Ô]
txtirmao = [Ô][Ô]
TXTNASCIR = [Ô][Ô]
[ô]atualiza o cadastro
atualizacampos
tbcadastro.Update
End Sub[/txt-color]
mais ou menos assim pois eu faço mais ou menos isso aqui.
espero ter ajudado e poste de novo caso nao seja o que necessite
não sei bem se eu entendi. entao vamos la. por que voce nao cria outro botao comando para esta funcao e ao inves de excluir voce colocaria um update apagando os campos que voce quer apagar.
[txt-color=#e80000]Private Sub CMDdelcadastro_Click()
[ô]limpa os campos para gravar
TXTSEQ = [Ô][Ô]
txtplacet = [Ô][Ô]
txtirmao = [Ô][Ô]
TXTNASCIR = [Ô][Ô]
[ô]atualiza o cadastro
atualizacampos
tbcadastro.Update
End Sub[/txt-color]
mais ou menos assim pois eu faço mais ou menos isso aqui.
espero ter ajudado e poste de novo caso nao seja o que necessite
È seguinte tenho uma tabela no access chanmada CadCaixas
Contendo os Itns, *CaixaID(Chave Primária)
Vendedor
VendaAprazo
VendaAvista
SomaTotal
para não ter que ficar gravando semple o mesmo nome apagar os item : VendaAprazo, VendaAvista, SomaTotal
Grato a Todos
Nilton
Contendo os Itns, *CaixaID(Chave Primária)
Vendedor
VendaAprazo
VendaAvista
SomaTotal
para não ter que ficar gravando semple o mesmo nome apagar os item : VendaAprazo, VendaAvista, SomaTotal
Grato a Todos
Nilton
Apagar = zerar?
Update CadCaixas
Set VendaAPrazo = 0,VendaAVista = 0, SomaTotal = 0
era isso mesmo, JANDER
.CommandText = [Ô]update CadCaixas set Venda A Prazo=null, Venda a Vista=null Where CaixaID =[Ô] & CaixaID
.Execute
Estava tentando esqueci-me do NULL
Valeu Amigos pela ajuda,
Tópico encerrado , respostas não são mais permitidas