Databasen er skrivebeskyttet?

Hurtigt, ingen jeg tuder :o

<%
response.buffer = true
IF Session("user") = "" THEN
Response.Redirect("index.asp")
END IF
%>

<!--#INCLUDE FILE=ADOVBS.INC-->


<%
headline = Request.Form("headline")

from = session("user")
text = Request.Form("text")
tom = Request.Form("to")

IF Request("mode") = "new" THEN

Set Conn = Server.CreateObject("ADODB.Connection")

Conn.Open "PROVIDER=MSDASQL;DRIVER={Microsoft Access Driver (*.mdb)};DBQ=" & Server.MapPath("site.mdb") & ";UID=sa;PWD=;"

    Set rs = Server.CreateObject("ADODB.RecordSet")
    strSQL = "Select * From message"
    rs.Open strSQL, Conn, adOpenKeyset, adLockOptimistic


    rs.AddNew
      rs("text") = text
      rs("headline") = headline
      rs("date") = now()
      rs("from") = from
      rs("to") = tom
            rs("read") = "n"
        rs.Update

  rs.Close
  Set rs = Nothing

Conn.Close
set Conn = Nothing
Response.Redirect("index.asp")

END IF
%>


Får denne fejl:

Fejltype:
Microsoft OLE DB Provider for ODBC Drivers (0x80004005)
[Microsoft][ODBC Microsoft Access-driver] Databasen eller objektet er skrivebeskyttet og kan ikke opdateres.
/sendmail.asp, line 36


Dataene vil simpelthen ikke lægges i databasen :o