Tvorba pole typu Automatické číslo
Public Sub MakeAutoIncrementField(tdf As TableDef) With tdf .Fields.Append .CreateField("ID", dbLong) .Fields("ID").Attributes = .Fields("ID").Attributes + dbAutoIncrementing End With End Sub
Zpět