Cancellazione tabella

[Carmen]

Ciao,

Con questo codice riportato sotto creo una nuova tabella con i relativi campi in un DB access.

Dim dbsNorthwind As Database
Dim tdfNuovo As TableDef

Set dbsNorthwind = OpenDatabase("c:\mioDB.mdb")
Set tdfNuovo = dbsNorthwind.CreateTableDef("Tabella1")

With tdfNuovo
.Fields.Append .CreateField("Campo1", dbText, 20)
.Fields.Append .CreateField("Campo2", dbInteger)
End With
dbsNorthwind.TableDefs.Append tdfNuovo
dbsNorthwind.Close


Dovrei però poter cancellare una tabella già presente nel DB. Purtroppo non riesco. Spero che qualcuno di voi possa darmi una dritta...

Ciao

[maxnaldo]

DropTableDef

[maxnaldo]

no, scherzavo...:D

usa il metodo Delete della tabledef collection

dbsNorthwind.TableDefs.Delete "nometabella"


:D

[Carmen]

OK! ti ringrazio. Sembra che funzioni perfettamente.


Ciao ;)