Microsoft Visual Basic

Run- time error '3251':

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

Thank you for that error message. You posted it very well. Now, what do you want us to do about it? The error message tells you what the issue is. You haven't told us what you're trying to do or what you're trying to do it with so, while it's flattering that you think we know everything, we actually don't so you have to tell us about your project because you're the only one who's seen it.

Project: A school admission system software
Form: frmPay.frm
Theme: Visual Basic 6.0 and MS- Access 2007 adodb connection
Debug result and surrounding code:
Attachment 100253

I have a feeling this guy isnt saying anything o.O. You dont just post error messages, and where it happened. Say something! :lol:

I've never used VB6. I've never used ADO. I read your code and went straight to MSDN and searched for the value you're assigning to the CursorLocation property, i.e. adUseClient. That documentation says:

Quote:

---

If the CursorLocation property is set to adUseClient, the recordset will be accessible as read-only, and recordset updates to the host are not possible.

---

Fairly obvious why the error then.

Actually you can update a recordset with the setting of adUseClient. That would not be the issue. The type of recordset or the location of the file would be the likely problem.
For example if the recordset is opened using the ForwardOnly option or if the db itself is locked by another user or is on a shared drive where it is granting read only access this would be the message you would get.

try adding

Code:

---

rs.CursorType=adOpenDynamic

---

or

Code:

---

rs.CursorType=adOpenStatic

---

Just above the with statement

Check that the connection is not read-only.

So what should I specify instead of adUseClient?