Hi:
I have the following piece of code which works well under SQL Server 6.5. But it gives a "Cursor is Read Only" error at the Update statement under SQL Server 7.0.

Set rsheader = New ADODB.Recordset
rsheader.Open strSQL, cnnODBC, adOpenDynamic, adLockOptimistic
Do While Not rsheader.EOF
rsheader.Update "Status", "P"

' more code here

rsheader.movenext
loop

Could somebody let me know what is wrong in the above code?
Thanks.