COMO EXCLUIR UMA TABELA DE UM BD?

MARCELO.VB.PIRA 10/06/2005 13:26:29
#88240
OI PESSOAL!!!

como faço para deletar, excluir, mandar pras cucuias uma tabela em um MDB? não importando se ela estiver com ou sem dados...

obrigado
JEAN.JEDSON 10/06/2005 13:57:55
#88255
conexao.execute "DROP DataBaseName"
MARCELO.VB.PIRA 10/06/2005 15:12:55
#88273
Muito obrigado colega... mas...

e para usar com DAO e data object???

tem jeito???
USUARIO.EXCLUIDOS 10/06/2005 16:14:18
#88287 Resposta escolhida
No access não no vb, se precisar, use
"DROP TABLE NOMEDATABELA"
Somente DROP NOMEDATABELA não funciona...

Veja como via DAO é do mesmo jeito
'APAGAR TABELA

Private Sub cmdDropTable_Click()
Dim db As Database
Dim dbname As String
Dim dbopen As Boolean

    On Error GoTo DropError
    dbname = App.Path
    If Right$(dbname, 1) <> "\" Then dbname = dbname & "\"
    dbname = dbname & "droptabl.mdb"
    Set db = OpenDatabase(dbname)
    dbopen = True

    db.Execute "DROP TABLE TargetTable"

    db.Close

    MsgBox "Table dropped"
    Exit Sub

DropError:
    MsgBox "Error " & Format$(Err.Number) & _
        " dropping table." & vbCrLf & _
        Err.Description
    If dbopen Then db.Close
End Sub
Tópico encerrado , respostas não são mais permitidas
Voltar