Creating an autonumber field

[siftach]

I want to create a table through VB code in access by creating a new TableDef and the a new Field:

Dim dbs As DAO.Database, tdf As TableDef, fld As Field
Set dbs = DBEngine.Workspaces(0).OpenDatabase("C:\db1.mdb")
Set tdf = dbs.CreateTableDef("tblTask2Stud")
Set fld = tdf.CreateField("Task2StudID", dbInteger)

Now how do I make this field an autonumber?

 

[Craig0201]

http://support.microsoft.com/?kbid=304418

Craig