creating an access table in a db

[trasher]

hi,

I just want to create a table in an existing access db in vb.
Someone could help me ? I just can't figure out how.

here's some code

Private Sub cmdSaveBD_Click()
    
    Dim accessApp As Object

    
    dlg.Filter = "Microsoft Access database (*.mdb)|*.mdb"
    dlg.Flags = cdlOFNOverwritePrompt
    dlg.CancelError = True
    dlg.ShowSave
    
    If Err.Number = cdlCancel Then
        'User selected cancel
            Exit Sub
    End If
    
    bdPath = dlg.FileName
    
    Set accessApp = CreateObject("Access.Application")
    
    accessApp.NewCurrentDatabase bdPath
    'Here I want to create my table
    '....
    accessApp.Quit acQuitSaveAll
End Sub

[alex_read]

accessApp.CreateTableDef "NewTable1"

[trasher]

Ok I found how.....
I just forgot to append my tabledef to the tableDefs collection....

bd.TableDefs.Append myTable

.... I should read more the help files content.... heh

thanks