Error 3251 Operation not supported by this type of object.

[Tomadams]

I'm lost to see what my problem is. can some fresh eyes take a look and see what I've done.
this won't open with the above error. I wrote this a couple of weeks ago. It was fine then.
I have to deliver it tomorrow and it goes bizarre.


Private Sub Splits_AfterUpdate()

Dim RecSet As New ADODB.Recordset
Dim sSQL As String
Dim SpNum As Integer

RecSet.Open "SplitWO", CurrentDb.Connection, adOpenKeyset, adLockOptimistic
For SpNum = 1 To Me.Splits
RecSet.AddNew
RecSet![ProcessNum] = Me.WorkOrder & "-" & SpNum
RecSet![SplitNum] = SpNum
RecSet![WorkOrder] = Me.WorkOrder
RecSet![WorkOrderID] = Me.txtwoID.Value
RecSet![DueDate] = Me.[Due DATE]
RecSet![ProjectName] = Me.[Project Name]
RecSet![Company] = Me.cboCompany.Value
RecSet![CSRName] = Me.txtLogOnName.Value
RecSet.Update
Next SpNum

RecSet.Close



Thanks

 

[SkipVought]

Hi,

On what statement do you get this error?

Skip,
[sub]
Just traded in my OLD subtlety...
for a NUance![/sub]

 

[Tomadams]

hey skip
recset.open is the highlighted code
tom

 

[SkipVought]

Put a BREAK on this statement.

Hen use this tool to discover what’s happening with CurrentDB.

Skip,
[sub]
Just traded in my OLD subtlety...
for a NUance![/sub]

 

[Tomadams]

I put a break on the statement but I don't understand what you mean by use the tool to see what's going on in the connection. Can you explain?

 

[Tomadams]

got it - Thanks for responding