RecordSet.Open

recordset.Open[ Source,ActiveConnection,CursorType,LockType,Options]

Source：设置一个数据源（Command对象、SQL命令、表名称、存储过程等等）；

ActiveConnection：一个Connection对象变量，或者是包含ConnectionString信息的字符串；

CursorType：打开Recordset时的指针类型
adOpenForwardOnly(0)：Forward-Only指针；
adOpenKeyset(1)：Keyset指针；
adOpenDynamic(2)：Dynamic指针；
adOpenStatic(3)：Static指针

LockType：打开Recordset时的锁定类型
adLockReadOnly(1)：只读，无法改变数据----默认值；
adLockPessimistic(2)：排他性锁定---编辑时立即锁定数据来源的该条记录；
adLockOptimistic(3)：非排他性锁定----直到调用Update方法时，才锁定该条记录；
adLockBatchOptimistic(4)：非排他性批量更新---需先设置为批量更新方式

Option：指定Source参数为哪种内容类型
adCmdtext(1)
adCmdTable(2)
adCmdtableDirect(3)
adCmdStoredProc(4)
adCmdFile(256)等等

舉例：

public function getrs(sql as string,optional tdb as trueoledbgrid70.dbgrid) as adodb.recordset

on error goto rserror

set getrs =new adodb.recordset

getrs.cursorlocation=aduseclient

getrs.open sql ,cnn,adopendynamic,adlockbatchoptimistic

if not tdb is nothing then set tdb.datasource=getrs

exit function

rserror:

msgbox error.description

end function

---

 

adLockReadOnly 常数值为1 vb缺省值：Recordset对象以只读方式启动，无法运行AddNew、Update及Delete等方法

adLockPrssimistic 常数值为2 ：当数据源正在更新时，系统会暂时锁住其他用户的动作，以保持数据一致性。

adLockOptimistic 常数值为3 ：当数据源正在更新时，系统并不会锁住其他用户的动作，其他用户可以对数据进行增、删、改的操作。

adLockBatchOptimistic 常数值为4 ：当数据源正在更新时，其他用户必须将CursorLocation属性改为adUdeClientBatch才能对数据进行增、 删、改的操作。

---

Sqlstr(查询字符串,可以是SQL语句\表名\视图名\存储过程等),
adcmdtext就是指上面的这个字符串是什么类型,adcmdtext是SQL语句,AdCmdTable是指表...等等了