关于recordset对象的问题?

[jobs002]

我在过程ConnectToServer()中调用了
set g_rec=g_con.ExcuteSql(strsql)
但是得到的g_rec的cursorType和lockType好像不允许添加新的记录
我在后面添加语句:
g_rec.CursorType = adOpenDynamic
g_rec.LockType = adLockOptimistic
g_rec.addNew//错误,提示对象打开，不允许操作,请问有什么解决方法?

[上官云峰]

Dim Con As ADODB.Connection
Dim rs As ADODB.Recordset
Set Con = New ADODB.Connection
strCon = "Provider=Microsoft.Jet.OLEDB.4.0;Data Source=" & App.Path & "\计划管理系统.mdb;Persist Security Info=False"
Con.Open strCon
Set rs = New ADODB.Recordset
'添加记录
strsql="select * from table"
rs.Open strsql, Con, adOpenKeyset, adLockOptimistic
rs.addnew
rs!字段1=text1.text
rs!字段2=text2.text
........
rs.update
rs.close
set rs=nothing

[jobs002]

我如果使用:
g_con.Excute(strSQL)进行set,那么应该怎么样修改g_rec的cursorType和LockType?

[jobs002]

顶一顶，解决揭帖，很急，希望高手指点

[饮水需思源]

增加记录：g_con.execute "insert into tablename(...) values(...)"
修改记录：g_con.execute "update tablename set ... where ..."
删除记录：g_con.execute "delete from tablename where ..."

[jobs002]

难道只能g_con.Execute(),原因是什么，难道不能设置g_rec的CursorType和LockType??

[jobs002]

recordset对象在构造时默认的CursorType和LockType的值是多少?是客户游标和非乐观锁码？？

[jobs002]

顶一顶...............