Tvorba pole typu Automatické číslo

Postup:
Při tvorbě tohoto pole se nejprve musí vytvořit pole typu Číslo, a potom mu jen změníme atributy:

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

Autor: The Bozena