Good day to all :-)

I am creating my first ASP database application the connection to the database is successfull but when i try to add new records the following errors occured:

"Microsoft JET Database Engine (0x80040E09)
Cannot update. Database or object is read-only."

This is the code:

<%
dim strSQL
dim adocn
dim adors
set adocn = server.createobject("adodb.connection")
set adors = server.createobject("adodb.recordset")

adocn.connectionstring = "provider=microsoft.jet.oledb.4.0; Data source=" & Server.MapPath("guestbook.mdb")
adocn.open

strSQL = "SELECT tbguest.gid, tbguest.gcomments FROM tbguest;"

adors.CursorType = adLockOptimistic
adors.LockType = 3

adors.Open strSQL,adocn

adors.Addnew
adors.Fields("gid") = "1"
adors.Fields("gcomments") = "ton"
adors.update

adors.Close
Set adors = Nothing
Set adocn = Nothing

%>

By the way im using IIS web server and MS access database.
Please anybody can help. thank you in advance.

In your code:

adors.CursorType = adLockOptimistic
adors.LockType = 3

You have set the cursor type to a lock constant. Your code really reads:


adors.CursorType = adOpenStatic ' adOpenStatic=3
adors.LockType = adLockOptimistic ' adLockOptimistic=3

You could try setting the cursor type to adOpenKeyset