Adding Fields to a Microsoft Access Database using visual basic code

[Guest_imported]

I am presently writing a program that is an upgade. I have added several new field and table to the database structure that I am using. I would like to know how I can add the new fields to existing tables without having to go into physically go into Access or into the Visdata data program.

Thanks,

Cooleen

 

[animal]

In VB, go to the Help and search for the CreateTableDef Method. It has a great example of how to programatically add a table and fields.

 

[dellyjm]

Hey this was a program I did once...it's in DAO though.

Private Sub cmdInitialize_Click()
Dim Message, DBPath, DirPath, EmailList As String
Dim rs As Recordset

On Error GoTo ErrorHandler

Set wrkSpace = DBEngine.Workspaces(0)

Set dbSystem = wrkSpace.CreateDatabase("SystemDB.mdb", dbLangGeneral, dbEncrypt)

Set tdfSystem = dbSystem.CreateTableDef("SystemInfo&quot
With tdfSystem
.Fields.Append .CreateField("DBPath", dbMemo)
.Fields.Append .CreateField("DirPath", dbMemo)
.Fields.Append .CreateField("EmailList", dbMemo)
dbSystem.TableDefs.Append tdfSystem
End With


Delton Phillips
delton.phillips@jamaicanhomes.com

 

[mohmehran]

Also you can use ALTER TABLE SQL statement. For more info refer to SQL documentation included in Access.

 

[Guest_imported]

Thanks alot.

 

[Alt255]

VB/MSAccess... hang around. There's more to come....