DELETE DA TABELA
Como deletar uma tabela inteira?
O Comando abaixo deleta na tabela CAD_BANCO_TEMP com uma condição
path = App.path & [Ô]\BD.MDB[Ô]
db.Open [Ô]provider=microsoft.jet.oledb.4.0;data source=[Ô] & path
rs.Open [Ô]select * from CAD_BANCO_TEMP where cod = [Ô] & codigo, db, 3, 3
rs.Delete
Mas como deletar todos os dados da tabela?
Tentei fazer da forma abaixo, mas não deu certo.
rs.Open [Ô]select * from CAD_BANCO_TEMP , db, 3, 3
rs.Delete
Obrigado
O Comando abaixo deleta na tabela CAD_BANCO_TEMP com uma condição
path = App.path & [Ô]\BD.MDB[Ô]
db.Open [Ô]provider=microsoft.jet.oledb.4.0;data source=[Ô] & path
rs.Open [Ô]select * from CAD_BANCO_TEMP where cod = [Ô] & codigo, db, 3, 3
rs.Delete
Mas como deletar todos os dados da tabela?
Tentei fazer da forma abaixo, mas não deu certo.
rs.Open [Ô]select * from CAD_BANCO_TEMP , db, 3, 3
rs.Delete
Obrigado
rs.Open [Ô]truncate table CAD_BANCO_TEMP [Ô], db, 3, 3
ou
rs.Open [Ô]delete * from CAD_BANCO_TEMP [Ô], db, 3, 3
ou
rs.Open [Ô]delete * from CAD_BANCO_TEMP [Ô], db, 3, 3
LUIZCOMINO
O comando que você falou não deu certo
rs.Open [Ô]truncate table CAD_BANCO_TEMP [Ô], db, 3, 3
rs.Delete
Fiz o seguinte código abaixo e funcionou
rs.Open [Ô]select * from CAD_BANCO_TEMP [Ô], db, 3, 3
Do Until rs.EOF
rs.Delete
rs.MoveNext
Loop
Porque será que o seu código não funcionou?
faça assim
apague as linhas :
rs.Open [Ô]truncate table CAD_BANCO_TEMP [Ô], db, 3, 3
rs.Delete
e digite essa:
db.Execute [Ô]truncate table CAD_BANCO_TEMP [Ô]
ou tente
db.Execute [Ô]delete * from CAD_BANCO_TEMP [Ô]
apague as linhas :
rs.Open [Ô]truncate table CAD_BANCO_TEMP [Ô], db, 3, 3
rs.Delete
e digite essa:
db.Execute [Ô]truncate table CAD_BANCO_TEMP [Ô]
ou tente
db.Execute [Ô]delete * from CAD_BANCO_TEMP [Ô]
LUIZCOMINO
db.Execute [Ô]delete * from CAD_BANCO_TEMP [Ô]
Funcionou,
Obrigado pela dica
db.Execute [Ô]delete * from CAD_BANCO_TEMP [Ô]
Funcionou,
Obrigado pela dica
Tópico encerrado , respostas não são mais permitidas