Crear tabla

Max Pufior
12 de Enero del 2005
Buenas. Estoy tratando de crear una tabla en uan BBDD ya existente y tengo este código, pero no me cre la tabla en la BBDD. Por más que compilo no logro saber que pasa. ¿Se osm ocurre algo? Gracias.

Private Sub cmdAddTable_Click(Index As Integer)
Dim Base As Database
Dim Tabla As TableDef

'Crear la tabla en la BBDD
Set Base = OpenDatabase("Test.mdb")
Set Tabla = Base.CreateTableDef("Tabla_Prueba")

Base.Close
MsgBox "Tabla creada con éxito"

End Sub

mvallejos
12 de Enero del 2005
Estás creando una tabla sin campos, creo que es eso, te falta crear los campos

Saludos