高分求解：怎么修改recordset对象的updatable属性！

[herobaby001]

请看代码：


dim wrksp As Workspace
dim dbs As Database
dim rec As dao.Recordset

Set wrksp = CreateWorkspace("odbcworkspace", "admin", "", 1)
Set dbs = wrksp.OpenDatabase("hero", dbDriverNoPrompt,False, "ODBC;DSN=hero;_
UID=sa;PWD=10241;DATABASE=hero") '数据库连接没问题ODBC
Set rec = dbs.OpenRecordset("select * from department", dbOpenSnapshot)

rec.AddNew '运行到这一句报错，说: can't update ,Databse or object is read-only
With rec
!depnaem = Text1
!descript = Text2
!charg = Text3
.Update
End With

can't update ,Databse or object is read-only倒底是为什么啊！
我查看了rec.updatable　确实为flase
但是又不能直接修改这个属性（这个属性是只读的！）

请问我可以怎么修改recordset对象的updatable属性啊！

[herobaby001]

你们说参数都不行！

[True1024]

//can't update ,Databse or object is read-only倒底是为什么啊！
不能更新，数据库或工程是只读。

我一般用ADO。不用DAO

[tztz520]

\\Set rec = dbs.OpenRecordset("select * from department", dbOpenSnapshot)\\

改为
Set rec = dbs.OpenRecordset("select * from department", 1)

[zgvslch]

dbOpenSnapshot换成dbOpenDynaset试试

[37350792]

我出遇到同样的问题，不过我用
dbs.execute( "insert department values" & text1 ...)

这样就没什么问题！

[viena]

加dbAppendOnly

[tztz520]

你就用默认的参数吧