I am using CreateField to add a Date field to an existing table in Access. When I execute the code, everything seems fine but in reality, the field is not created.

Why is that?

Note: The name of the table is valid and I have checked to see if access finds it.

here's my code:
Code:
Public Sub DoTableUpdate()
    Dim dbs As Database
    
    Set dbs = OpenDatabase("C:\Documents and Settings\dlaplante\Desktop\Syndata\Database\SynagisData.mdb")
    dbs.TableDefs("Shipment").CreateField "Shipment_NextDate", dbDate
    dbs.Close
    Set dbs = Nothing
End Sub