INSERT primary key with autocounter

[sal21]

I just have a table with many fileds.
I nedd to add a filed named AKEY a primary key with autocounter into the top of fields list.
All with code vb and jet conn or adox code. Possible?

[HansV]

Create an SQL string like this:

Dim strSQL As String
strSQL = "ALTER TABLE MyTable ADD COLUMN AKEY COUNTER CONSTRAINT PrimaryKey PRIMARY KEY"

where MyTable is the name of the table.

You can use the Execute method of your ADODB Connection object to run the SQL.