create autoincrement field via jet 3.5

[c@lle]

how can i create an autoincrement field via a connection using the jet 3.5 database engine?

this is my connection string

objDB.ActiveConnection = "Provider=Microsoft.Jet.OLEDB.3.51;Data Source=" & strFileName

i've found information about jet 4.0 and then setting 'autoincrement' on the properties,

but how can i do this in jet 3.5??

[peet]

Dim SQL As String
 
SQL = "ALTER TABLE Table1 ADD COLUMN ID COUNTER"
objDB.Execute SQL

that any good ?