What is wrong with this?

[Josh Grameson]

Using Access 2K which as tables in ms sql 2K that it links to.

in the code I have this:

Set rstDeliveryHeader = New ADODB.recordSet
rstDeliveryHeader.Open "[tblDeliveryHeader]", CurrentProject.Connection,
adOpenKeyset, adLockOptimistic
rstDeliveryHeader.AddNew

and I'm getting an erron on the last line (AddNew).

What am I doing wrong?

 

[Brendan Reynolds]

There doesn't seem to be anything wrong with your code, Josh. I tested it,
changing only the name of the table, as follows, and it ran without error.
Therefore I suspect that the problem is either that there is no unique index
or constraint on your table (in which case the linked table will be
read-only), or you may not be logged on as a user who has permission to add
new records.

Public Sub TestAddNew()

Dim rstDeliveryHeader As ADODB.Recordset
Set rstDeliveryHeader = New ADODB.Recordset
rstDeliveryHeader.Open "[dbo_authors]", CurrentProject.Connection,
adOpenKeyset, adLockOptimistic
rstDeliveryHeader.AddNew
rstDeliveryHeader.CancelUpdate
rstDeliveryHeader.Close

End Sub

--
Brendan Reynolds (MVP)
http://brenreyn.blogspot.com

The spammers and script-kiddies have succeeded in making it impossible for
me to use a real e-mail address in public newsgroups. E-mail replies to
this post will be deleted without being read. Any e-mail claiming to be
from brenreyn at indigo dot ie that is not digitally signed by me with a
GlobalSign digital certificate is a forgery and should be deleted without
being read. Follow-up questions should in general be posted to the
newsgroup, but if you have a good reason to send me e-mail, you'll find
a useable e-mail address at the URL above.