关于ADO的用RECORDSET添加删除数据问题

Question

如何用ADO的RECORDSET来添加数据，我用了ADDNEW然后再用UPDATE，但编译时出现数据集被锁定的问题。望高手指教

Answer 1

Public cn As New ADODB.Connection
    Public rs As New ADODB.Recordset
    rs.ActiveConnection = cn 
    rs.CursorType = adOpenDynamic
    rs.LockType = adLockOptimistic
    rs.open "select * form 表名"

Answer 2

改一下上面同志的代码：
Dim Cn As New adodb.connection
Dim Rs As New ADODB.Recordset
Rs.open"Table_name",Cn,adOpenDynamic,adLockOptimistic

Answer 3

对了忘了说了，然后你再Rs.AddNew

Answer 4

以上用的都是ADO对象的方法，其实用ADO控件一样可以实现的。只要设置一下CursorType，
 LockType属性就行的。