[Resolvido]Excluir alguns campo da tabela!

Bom dia programadores e apaixonados por este forum!

Necessito de ajuda quem puder o irmão Lupércio agradece!

Tenho 2 tabelas!

1 - TabCadastro
2 - TabDefinitiva

Na tabela (TabCadastro)
Tenho os campos: Campo1, campo2, campo3, campo4.

Na tabela (TabDefinitiva)
Tenho os campos: Campo1, campo2, campo3, campo4.



Necessito através do click no botão transferir
os dados da tabela (TabCadastro)para a tabela (TabDefinitiva).

Em questão da transferencia ta funcionando normal:

uso o código:


Private Sub Comando46_Click()
Dim strSQL As String, strSQLBackupDados As String

strSQLBackupDados = "INSERT INTO TabDefinitiva Select * FROM TabCadastro"
DoCmd.RunSQL (strSQLBackupDados)

strSQL = "DELETE * FROM TabCadastro"
DoCmd.RunSQL (strSQL)

End Sub


Deixei especificado para os senhores entenderem:


Objetivo:

Transferir os dados da tabela (TabCadastro) para a tabela (TabDefinitiva)

E excluir os campos: campo3 e campo4, da tabela (TabCadastro)
o código que estou usando funciona mas exclui a tabela inteira
e não é isso que pretendo!

Conto com a ajuda dos senhores, abraço á todos!

Talvez assim:

CurrentDb.Execute "ALTER TABLE NomeDaTabela DROP COLUMN Campo1, Campo2"

Criquio boa tarde amigo, o obrigado pela atenção...

Está dando esse erro!

ERRO EM TEMPO DE EXECUÇÃO 3211

O mecanismo do banco de dados não pode bloquear a tabela TbCadastro pois ela está sendo usada por outra pessoa ou processo!

boa tarde a todos.


Tente assim...

strSQL = "DELETE campo3;campo4 FROM TabCadastro"

Olá grande Silvio como vai irmão? Desejo saúde e muita paz a vc e familia!

A instrução que me passou não está excluindo, e a do criquio, exclui o campo da tabela
e eu quero que exclua apenas os dados do campo, e não o campo entendeu?

Um abraço!

Tenho na tabela campo1, campo2, campo3, campo4

Pretendo excluir o registro do campo3, campo4! Da referida tabela

quando eu abrir o form novamente, os campos: campo1, campo2, campo3, campo4 tem que estar, no form!

Pensei que quisesse excluir os campos. Foi o que entendi no início. Se é apenas os dados, utilize o UPDATE:

CurrentDb.Execute "UPDATE NomeDaTabela SET Campo=Null, Campo2=Null"

100% funcionando obrigado criquio, valeu

Valeu companheiro.