(Resolvido) Excluir tabela em tempo de execução (v.2007)

[R.Rubin]

Pessoal, me ajudem, por favor?

Fiz um Controle Financeiro inteiro na versão access 2003, mas o cliente só tem versão 2007.

Neste Controle já um botão, onde, via macro, eu mando importar dados externos, executo uma consulta pra incluir os dados desta tabela externa para uma tabela existente no BD e depois excluir esta tabela "temporária" do meu BD. Só que o problema é que nesta versão nova, não existe a função excluir tabela via macro! Pelo menos não encontrei.

A solução seria só via código mesmo? E qual seria o código? Ou só mudou o nome da função "excluir tabela"?

Só falta isso pra eu lacrar o programa e entregar pro cliente... Me ajudem, please!?

VlW!

Rob.

[Andy SC]

R.Rubin pode ser que isso te ajude, se não for add no MSN afpvmcity@hotmail.com

O código abaixo gera os registros em uma tabela chamada "Consulta 01" e considera que você tem um campo chamado "Doc" nessa tabela e em "Tabela 01":

Dim db As Database

Dim tb As Recordset

Dim rs As Recordset

Dim i

DoCmd.SetWarnings False

DoCmd.OpenQuery "Consulta Exclusão dos Registros em Consulta 01"

DoCmd.SetWarnings True

Set db = CurrentDb

Set tb = db.OpenRecordset("Tabela 01")

Set rs = db.OpenRecordset("Consulta 01")

i = CInt(tb!Doc)

Do While Not tb.EOF

If CInt(tb!Doc) <> i Then

rs.AddNew

rs!Doc = Format$(i, "000000")

rs.Update

Else

tb.MoveNext

End If

i = i + 1

Loop

tb.Close

rs.Close

db.Close

caso contrario se for excluir uma tabela no access 2007 sem que éssa tenha um formulario você pode simplesmente apertar o delete em sima dela tambem,

Editado Setembro 2, 2011 por Andy SC

[Iceguy]

Usa essa consulta: DROP TABLE suaTabela;

[R.Rubin]

Pow...Valeu pela resposta, Andy! Mas tenho mesmo que criar database, recordset e variáveis só pra excluir uma tabela??

Se a intenção da Microsoft era evoluir em praticidade, pecou feio, hein..rs.. Será que não tem uma linha de código do tipo nomedatabela.delete??

A idéia geral é importar uma tabela externa, transferir os dados desta tabela (que tem a mesma estrutura) pra uma tabela que já existe e excluir essa tabela que importei, que é temporária...

A parte da importação e transferência dos dados já estão ok.. Só falta mesmo excluir a "bendita"! Não tem um código mais simples mesmo?!?

Obrigada de novo! ;)

Rob.

[MrMALJ]

Para excluir tabelas utilize a dica do Icegui.

[R.Rubin]

Para excluir tabelas utilize a dica do Icegui.

Obrigada...

Só queria entender porque as frases.. Foram pra mim?

"Muitas dúvidas já estão respondidas no forum, utilize a busca antes de criar um novo tópico!" >> Só pra esclarecer, essa minha dúvida eu realmente não encontrei pela busca, por isso postei...

"Não existe saber mais ou saber menos, existem saberes diferentes!" >> >> Desculpe, mas eu não citei que ninguém sabia mais que ninguém mesmo... ;)

Até mais...

[Iceguy]

Ele é moderador, isso é frase que ele colocou padrão na assinatura porque muita gente vem com dúvida que já foi respondida e gera novo tópico, deixando o forum mais "entupido" de coisas

[R.Rubin]

Oi, pessoas!

Consegui excluir a bendita tabela, mas com apenas um comando, sem ser o "drop table":

Dentro do mesmo botão, o comando DoCmd.DeleteObject acTable, "Cad_Cliente_Portable". Simples assim! ;)

Agradeço a atenção de qualquer forma!

Até mais!

"E tudo quanto pedirdes em meu nome eu o farei, para que o Pai seja glorificado no Filho. João 14:13."

^_^