为什么运行时总是提示“Microsoft JET database Engine (0X80040E09)”不能更新，数据库或对象为只读?在线等...

我照着例子在做一个留言板。显示留言都很正常。可添加留言运行时，浏览器老是“无法显示该页”，提示：不能更新，数据库或对象为只读。麻烦大虾帮忙看看，我的部分代码如下：

这是conn.asp页面的所有代码：
<% set conn=Server.CreateObject("adodb.connection")
connstr="provider=microsoft.jet.oledb.4.0;data source="&Server.MapPath("data.mdb")
conn.open connstr
%>

这是save.asp的代码：
<!--#include file="conn.asp" -->
<%
'接收表单文本域提交的数据并赋值到指定的变量上
name=Trim(Request.Form("name"))
oicq=Trim(Request.Form("oicq"))
email=Trim(Request.Form("email"))
homepage=Trim(Request.Form("homepage"))
content=Replace(Request.Form("content"),vbCrLf,"<br/>")

'建立recordset对象,并打开纪录为空的字段位置
set rs=server.CreateObject("adodb.recordset")
sql="select * from txtbody"
rs.open sql,conn,1,3

'新建一个记录，把接收到的变量值一一添加到id为空的字段上
rs.addnew
rs("u_name")=name
rs("u_oicq")=oicq
rs("u_email")=email
rs("u_homepage")=homepage
rs("u_content")=content
rs.update

'操作完毕，关闭rs对象并设为空，释放资源
rs.close
set rs=nothing
conn.close
set conn=nothing
 

access数据库的权限没有放开，请给everyone加上所有权限