using addnew in ado

[wala]

I'm using VB 6 and Access 2000

An error occur when i'm adding a record. same thing with movelast and moveprevious.

    Set rsCmdty = New ADODB.Recordset
    rsCmdty.Open "select * from Data", "Provider=Microsoft.Jet.OLEDB.4.0;Persist Security Info=False;Data Source= c:\bocsystem\BOCLoc.mdb"
    rscmdty.AddNew
    With MSFlexGrid1
        rscmdty("CmdtyCd") = .TextMatrix(0, 1)
        rscmdty("Desc") = .TextMatrix(1, 1)
        rscmdty("CntryOrign") = Mid(1, .TextMatrix(2, 1), 2)
    End with
    rscmdty.update

the error message that appears...
the operation requested by the application is not supported by the provider.

should i add a reference to be able to access these commands. If yes, can you kindly tell me what it is?

Thanks in advance.

 

[culshaja]

As standard ADO Recordsets return a Forward only cursor which does not allow Move commands.
Try using the following before opening the recordset:

rsCmdty.CursorType = adOpenDynamic

James
James Culshaw
jculshaw@active-data-solutions.co.uk

http://www.active-data-solutions.co.uk

 

[wala]

thanks for the immediate response. Moveprevious now works but not with addnew. Same error message occur even i use the code you had told me.

please help. thanks.

 

[baggyman]

The locktype must set to adLockOptimistic, default is "adLockReadOnly"

so try this before rsCmdty.open :

rsCmdty.LockType = adLockOptimistic

heinz