ACCESS数据库不能修改了

[hyblusea]

使用UPDATE更新某条数据库记录的时候出现错误：

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

请问是怎么回事，应该怎么做，谢谢大家！

[hyblusea]

补充一下，代码如下：

Dim conn,connstr
connstr="Provider=Microsoft.Jet.OLEDB.4.0;Data Source=" & Server.MapPath("db/db1.mdb")
Set conn=Server.CreateObject("Adodb.Connection")
conn.Open connstr
Set rsOfCount = Server.CreateObject("ADODB.RecordSet")
sqlStr1 = "SELECT * FROM total"

rsOfCount.Open sqlStr1,Conn,1,3

rsOfCount("total") = rsOfCount("total") + 1
rsOfCount.update

[youzi520]

文件权限是否设置?

[youzi520]

游标问题

[hyblusea]

文件属性没问题，有什么办法能解决吗？

[hyblusea]

不是游标的问题，无论是指向哪条记录都是这样，不知道是不是数据库格式的问题

[osiku]

会不会是字段名写错了~?

[hyblusea]

更不是，因为错误提示就是

Microsoft JET Database Engine (0x80040E09)
不能更新。数据库或对象为只读。

[hyblusea]

有人能解决吗，在线等

[zkxp]

右键点击数据库文件，选择属性－》安全，添加用户，把everyone添加进去。看看。

[dcwang]

该不会是数据库打开着，不让写入吧。

[linky520]

1、数据库打开方式rs1.open sql1,conn,3,2
2、插入数据最好使用insert into
3、如果是ntfs格式的硬盘需要设置权限，设置的时候找到该文件夹，右键看属性，里面有个权限，设置让everyone的写权限。

我以前也遇到过这种问题，参考的人家提出的意见，你看看