Field AutoIncrement Question?

[Manny Somarriba]

How can I set up attributes for an autonumber field

I did like this but no work


with rstNew

.Fields .CreateField("Field1", dbLong)
Field1.Attributes = dbAutoIncrfield

End With

Thsi field suppose to be indexed

[mxnmx]

set NewTable = DB.OpenRecordset("test")
 
With NewTable
.Fields.Append .CreateField("Field1", dbLong)
.Fields("Field1").Attributes = 17
end with

[mxnmx]

Using Sql:

Dim sCmd as String
 
sCmd = "ALTER TABLE [" & TABLENAME & "] ADD COLUMN DBCreatorID INT IDENTITY CONSTRAINT IdxDBCreatorID PRIMARY KEY"
 
DBcn.Execute sCmd

[AttackCat]

thanks MXnMX,

This came in really handy as I was searching for this subject and came across this post - worked perfectly !!

-AC