ADO介绍

2010-11-12  吴楠 

ADO
       ADO是Microsoft ActiveX Data Objects的缩写,使客户端应用程序能够通过OLE DB提供访问和操作在数据库服务器中的数据。
       ADO支持用于建立基于client/server和web的应用程序的主要功能。其主要优点是易于使用、高速度、内存支出和占用磁盘空间少。
 
ADO主要对象介绍
       Connection对象用于建立与数据库的连接。通过连接可以从应用程序访问数据源。
       Connection对象定义了将对数据源执行的指令命令。可以在数据中进行添加,删除,更新或在表中进行数据查询。返回的结果保存在recordset对象中。
        Recordset对象表示的是来自基本表或命令执行结果的记录集合。任何时候,recordset对象所指的当前记录均为集合内的单个记录。使用ADO时,通过recordset对象可以对几乎所有数据进行操作。在一个connection对象上,可以同时打开多个recordset。
 
基本ADO编程步骤
       连接到数据源
       指定访问数据源的命令
       执行命令
       对查询数据进行更新,增加,删除等操作以及执行对其他数据库操作
       将执行结果更新到数据库
       关闭连接
 
ADO应用示例
'******************************************************
' 作用:连接到 calc.mdb ,并查询里面的内容
'******************************************************
Dim cnn,rst,strCnn
'连接到数据源
strCnn = "Provider=Microsoft.Jet.OLEDB.4.0;Data Source=C:\calc.mdb;Persist Security Info=False"
Set cnn = CreateObject("ADODB.Connection")
cnn.Open  strCnn
Set rst = CreateObject("ADODB.recordset")
'查询calc的内容
rst.Open "select * from calc",cnn
rst.MoveFirst
'做循环,不到文件底部,不退出循环
Do While Not rst.EOF
        MsgBox Trim(rst.Fields("TestResult"))
        rst.MoveNext
Loop
'关闭连接
rst.Close
cnn.Close
' 置空对象
Set rst = Nothing
Set cnn = Nothing
 
 
359°/3583 人阅读/1 条评论 发表评论

夏浩淋  2010-11-14

嘿嘿,拿走啦!。


登录 后发表评论