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
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
Saludos