本人在一个程序中遇到了如下的错误：
  错误类型：
ADODB.Recordset (0x800A0CB3)
当前记录集不支持更新。这可能是提供程序的限制，也可能是选定锁定类型的限制。

程序在其他机子上可以进行数据库插入操作，就是不能在自己机子上运行，所以程序应该么问题,
              本人机子上的Microsoft Jet 4.0 数据库引擎Jet 4.0 Service Pack 版本级别是安全公告 MS04-014，操作系统是winXp sp2，是不是Microsoft Jet 4.0 数据库引擎有问题呢？
    希望各位大哥能帮小弟解决一下这个问题！

不能更新纪录集的错误可能性很多，不知道源代码我也无法确定错误类型。

原代码是： <!-- #include file="ADOFunctions.inc" --> <% '读取签写留言界面输入的表单数据 UserName = Request("UserName") Email = Request("Email") Title = Request("Title") Content = Request("Content") CurrentTime = Now() sql = "select * from liuyan" set objRS = server.createobject("adodb.recordset") objRS.open sql,objConn,1,2 if objRS.Supports(adAddNew) then objRS.addnew array("作者","Email","标题","内容","时间"),array(UserName,Email,Title,Content,CurrentTime) objRS.Update end if Response.Redirect("GuestBook.asp") objRS.Close Set objRS = Nothing objConn.Close Set objConn = Nothing %>

objRS.open sql,objConn,1,2

错误出在这句话，应该改为

objRS.open sql,objConn,1,3

这样应该可以更新了后面的2是记录集的类型，楼主设定的类型应该是不支持objRS.Update方法的记录集类型。3是可以支持更新的，如果再不能更新。那就请检查数据库的问题。

试过了 还是不行啊

数据库哪里会出现问题呢

数据库如果表之间使用了表间关系，或设定了主外键关系。可能会不允许更新。

不知楼主的所更新数据库表的结构是什么？

数据库里没有设定表间关系啊 就是单个的表啊

那楼主可以使用另外一种更新方法试试。 objRS.addnew array("作者","Email","标题","内容","时间"),array(UserName,Email,Title,Content,CurrentTime) 假设楼主的表的字段名称如下按照楼主的代码可以改为 UserName,Email,Title,Content,CurrentTime objRS.addnew objRS.Fields("UserName").Value=UserName objRS.Fields("Email").Value=Email objRS.Fields("Title").Value=Title objRS.Fields("Content").Value=Content objRS.Fields("CurrentTime").Value=CurrentTime objRS.Update 如果再不管用，那没办法了。

都试过了 就是不行，我看是不是Microsoft Jet 4.0 数据库引擎有问题啊