I've been working on the form today. It worked earlier but now the recordset is not updateable.
I'm using AC2002 with ADO recordset.
Here's the code. If I use the table as a source it works, but I was using a recordset before and that was working too (not now).
Thanks for help!!
Dim cnn As ADODB.Connection
Set cnn = CurrentProject.AccessConnection
Dim rst As ADODB.Recordset
Set rst = New ADODB.Recordset
With rst
.CursorType = adOpenDynamic
.LockType = adLockBatchOptimistic
End With
rst.Open "TblInvHdr", cnn
Set Me.Recordset = rst
Set cnn = Nothing
Set rst = Nothing
I'm using AC2002 with ADO recordset.
Here's the code. If I use the table as a source it works, but I was using a recordset before and that was working too (not now).
Thanks for help!!
Dim cnn As ADODB.Connection
Set cnn = CurrentProject.AccessConnection
Dim rst As ADODB.Recordset
Set rst = New ADODB.Recordset
With rst
.CursorType = adOpenDynamic
.LockType = adLockBatchOptimistic
End With
rst.Open "TblInvHdr", cnn
Set Me.Recordset = rst
Set cnn = Nothing
Set rst = Nothing