使用ADO访问数据源

来源:互联网 发布:网络传销一般崩盘时间 编辑:程序博客网 时间:2021/05/15 19:41

ODBC全拼为Open Database Connectivity,开放数据库互连。分为如下三种:用户DSN,系统DSN,文件DSN。使用Connection 对象建立数据库连接是,默认使用MSDASQL 驱动程序,所以在连接字符串中只需指定数据源名称即可,例如:objCn.Open "DSN=实例2DSN"
但是发现按照本实例中路径,"开始/程序/管理工具/数据源(ODBC)"打开以后,列表中并没有Microsoft access driver (*.mdb),个人感觉这是因为计算机系统的原因。于是在计算机C:\Windows\SysWOW64 路径下找到odbcad32.exe ,创建所需数据源。
接着建立主窗体,建立ADO引用。
然后就是编写代码了。详细代码就不再赘述,只简单的写一下窗体加载时的代码:
Private Sub Form_Load()    Set objcn = New Connection    objcn.Open "DSN=实例2DSN"    Set objrs = New Recordset     With objrs        .CursorLocation = adUseClient        .CursorType = adOpenStatic       .LockType = adLockOptimistic       .Open "select*from 系统用户", objcn        End With    txtUsername = objrs.Fields("用户名").Value    txtPassword = objrs.Fields("口令").Value    txtMsg = objrs.AbsolutePosition & "/" & objrs.RecordCount  End Sub


附:ADO Recordset 对象的一些属性。
  • RecordsetLockType属性用于指定记录锁类型,有4种类型。
  • adLockReadOnly :默认值,只读,无法更改数据。
  • adLockPessimistic :保守式记录锁定,在编辑记录时立即锁定数据源的记录。
  • adLockOptimistic开放式记录锁定,在执行update方法时锁定记录。
  • adLockbatchoptimistic开放式批更新,表示recordsetupdatebatch方法更新多个记录,即在执行updatebatch方法时锁定记录。 
  • Recordset的临时表位置
RecordsetCursorlocation属性用于指定临时表位置,可设置为下列表。
  • Aduseclient客户端临时表,可以提供重新排序和使用索引查找记录等特有功能。
  • Aduseserver服务器端临时表,由服务器端的被检索的数据源维护。
Ado中的recordset默认为服务器端的单向只读临时表。

原创粉丝点击