Mensaje enviado por "Fernando J. Vicioso" <fjvicioso@neuron.es>

Hola a todos,

Miguel, te adjunto un ejemplo de cómo crear una tabla con ado desde VB.

Para que funcione tienes que tener en las referencias del programa Microsoft ADO Ext. 2.5 for DDL and Security (o la 2.1). Ojo, los códios de tipo de campo que te adjunto son para Access 2000 y no para 97, no se si serán los mismos o no.


Un saludo a todos,



Public Sub CreaTablaPresupuesto(vsNombreTabla As String, vsDataSource As String)
    Dim Catalogo As New ADOx.Catalog
    Dim Tabla As New Table
    Catalogo.ActiveConnection = csProjet & "Data Source=" & vsDataSource
    With Tabla
        .Name = vsNombreTabla
        .Columns.Append "Cod", 202, 12
        .Columns.Append "Proye", 202, 9
    End With
    Catalogo.Tables.Append Tabla
    Set Catalogo = Nothing
End Sub


Fernando J. Vicioso
mailto: fjvicioso@neuron.es


-----Mensaje original-----
Quisiera crear una mdb desde codigo utilizando ADO.Pero tiene que ser leida por Access 97.¿Teneis algun ejemplo de como se crea la estructura con sus tablas,etc, o conoceis algun sitio donde pueda ver esto?