HELP!!

ShadowDust · August 6th, 2005, 06:22 PM

after a hole lot of bug fixing i finally have come to an error that is rather, uh, difficult, heh...
ADODB.Recordset error '800a0cb3'
Current Recordset does not support updating. This may be a limitation of the provider, or of the selected locktype.
:( does this have something to do with brinkster?? can sum1 tell me what could possibly be wrong and/or how to fix it?? please..

!!Mike Ockizitchie!!

arimakidd · August 7th, 2005, 06:43 AM

It would be helpful if you could give me the code you are using? You could be using the wrong combination of Locktype and Cursortype. Key question do you test locally like myself? If so you could have forget to set the proper permissions for your IUSR_[computername] in your security tab.

arimakidd
always learning and sharing knowledge

ShadowDust · August 8th, 2005, 02:07 AM

no i test mine on the host provider thingy, lol..

here's the code(it's in multiple files):
connectdb.asp

Code:

<% 
'Dimension variables
Dim adoCon         'Holds the Database Connection Object
Dim rsDatabase   'Holds the recordset for the records in the database
Dim strSQL          'Holds the SQL query to query the database 

'Create an ADO connection object
Set adoCon = Server.CreateObject("ADODB.Connection") 

'Set an active connection to the Connection object using a DSN-less connection

adoCon.Open "PROVIDER=Microsoft.Jet.OLEDB.4.0;DATA SOURCE=" & Server.MapPath("../db/db.mdb")


'Create an ADO recordset object
Set rsDatabase = Server.CreateObject("ADODB.Recordset")

'Initialise the strSQL variable with an SQL statement to query the database
'strSQL = "SELECT MainTable.Name, MainTable.Password, MainTable.Email, MainTable.RefPoints, MainTable.Refered, MainTable.RefWanted FROM MainTable;" 
strSQL = "SELECT * FROM MainTable;" 
%>

Submit.asp

Code:

<%
'Open the recordset with the SQL query 
rsDatabase.Open strSQL, adoCon

'Tell the recordset we are adding a new record to it
rsDatabase.AddNew

'Add a new record to the recordset
rsDatabase.Fields("Name") = Request.Form("Name")
rsDatabase.Fields("Password") = Request.Form("Password")
rsDatabase.Fields("Email") = Request.Form("Email")

'Write the updated recordset to the database
rsDatabase.Update 

'Redirect to the guestbook.asp page
Response.Redirect "..\index.htm"
%>

disconnectdb.asp

Code:

<%
'Reset server objects
rsDatabase.Close
Set rsDatabase = Nothing
Set adoCon = Nothing
%>

the code is order of use, btw how do i set the lock-type?

!!Mike Ockizitchie!!