小弟想问一个asp结合access的问题？请大家帮忙

[franky220]

dim conn
dim connstr
dim db
db="database/db.mdb"
Set conn = Server.CreateObject("ADODB.Connection")
connstr="Provider=Microsoft.Jet.OLEDB.4.0;Data Source=" & Server.MapPath(db)


sql="select * from member where user_name='"&user_name&"'"
rs.open sql,conn,1,3
rs.addnew
rs("user_name")=user_name
rs.update
rs.close

为何老是说错误类型：
Microsoft JET Database Engine (0x80040E09)
不能更新。数据库或对象为只读。
：（