Code won't work

[SF]

Hi,

I have a form with several fields for user to enter information and update
product info. In rerurn I receive a runtime error # 3622 "You must use the
dbSeeChanges option with Openrecordset when accessing a SQL Server table
that has an Identity column. I still got the same error when I replace
dbs.Execute Stg, dbFailOnError with dbs.Execute Stg, dbFailOnError,
dbSeeChanges

I use Access 2003 connect ot SQL Server thru ODBC.

Dim Stg As String
Dim dbs As DAO.Database

Set dbs = CurrentDb

Stg = "UPDATE tblProducts SET tblProducts.ProductName_e = '" &
Me.ProductName_e & "', "
Stg = Stg & "tblProducts.ProductName_k = '" & Me.ProductName_k & "', "
Stg = Stg & "tblProducts.CategoryID ='" & Me.CategoryID & "', "
Stg = Stg & "tblProducts.SubCategoryID ='" & Me.SubCategoryID & "'"
Stg = Stg & " WHERE (((tblProducts.ProductID)=" & Me.ProductID & "));"

dbs.Execute Stg, dbFailOnError


SF

 

[Baz]

dbs.Execute Stg, dbFailOnError + dbSeeChanges