[RESOLVED] Problem in ado code

[thamizhinpan]

I have creating a data management program with ado code.
But when I use Addnew or delete command I can see this error

3251 - Current Recordset does not support updating. This may be a limitation of the provider, or of the selected locktype.

What is the meaning of this error statement.
How can I solve it?

[westconn1]

how are you opening your recordset?

[thamizhinpan]

Dim mobjADOConn As ADODB.Connection
Dim mobjADORst  As ADODB.Recordset
Dim mstrSQL     As String

'local variable(s) to hold property value(s)
Private sWorkTable As String  'local copy



private sub connect()
Dim sConnectionString As String
sConnectionString = "Provider=Microsoft.Jet.OLEDB.4.0;Data Source=" & App.Path & "\Source-Z.mdb;Persist Security Info=False"
   
    ' Connect to the Property database:
    Set mobjADOConn = New ADODB.Connection
    mobjADOConn.ConnectionString = sConnectionString
    mobjADOConn.Open
    
    Dim lngX As Long
    
    
    'select or reload the data to be displayed:
    mstrSQL = "select * from " & sWorkTable
    
    Call OpenNewRecordset
End sub



'-----------------------------------------------------------------------------
Private Sub OpenNewRecordset()
'-----------------------------------------------------------------------------
    Set mobjADORst = New ADODB.Recordset
    mobjADORst.CursorLocation = adUseClient
    mobjADORst.Open mstrSQL, mobjADOConn, adOpenStatic, , adCmdText

End Sub

[westconn1]

Constant Description
adOpenForwardOnly Forward-only cursor. Default. Identical to a static cursor except that you can only scroll forward through records. This improves performance in situations when you need to make only a single pass through a recordset.
adOpenKeyset Keyset cursor. Like a dynamic cursor, except that you can't see records that other users add, although records that other users delete are inaccessible from your recordset. Data changes by other users are still visible.
adOpenDynamic Dynamic cursor. Additions, changes, and deletions by other users are visible, and all types of movement through the recordset are allowed, except for bookmarks if the provider doesn't support them.
adOpenStatic Static cursor. A static copy of a set of records that you can use to find data or generate reports. Additions, changes, or deletions by other users are not visible.

static is read only, use dynamic

[Campion]

Also, you are not specifying a locktype. It defaults to adLockReadOnly.

See this on lock types:
http://msdn2.microsoft.com/en-us/library/ms680855.aspx

[randem]

Try:

mstrSQL = "select * from " & sWorkTable
Debug.Print mstrSQL

Occam's Razor...

[RobDog888]

When you open a recordset without specifying any of the arguments it create a forward-only read-only recordset.