Ado连接模块

【文件属性】：

文件名称：Ado连接模块

文件大小：13KB

文件格式：RAR

更新时间：2022-02-09 17:03:57

ADO

超强ADO连接模块，Public Function QueryExt(ByVal TmpSQLstmt As String) As ADODB.Recordset Dim rst As New ADODB.Recordset '创建Recordset对象rst GetConnStr '连接到数据库 Set rst.ActiveConnection = Conn '设置rst的ActiveConnection属性，指定与其关联的数据库连接 rst.CursorType = adOpenKeyset '设置游标类型 rst.LockType = adLockOptimistic '设置锁定类型 rst.Open TmpSQLstmt '打开记录集 Set QueryExt = rst '返回记录集 End Function

【文件预览】：
ADO
----MSSCCPRJ.SCC(191B)
----wizard.res(115KB)
----tempbmp.bmp(534B)
----ADOWiz.vbw(48B)
----FormWiz.frm(39KB)
----ADOWiz.vbp(948B)