adodbrecordset（AdoDbRecordset简介）

AdoDb.Recordset简介

AdoDb.Recordset，即ActiveX数据对象数据库记录集，是基于COM（组件对象模型）技术的一类数据对象，专门用于访问数据库，提供了高效、可靠的数据库访问及处理功能。AdoDb.Recordset常被用于访问数据存储在关系型数据库（如Access、Oracle、SQL Server等）中的表格数据。

AdoDb.Recordset是ADO（ActiveX数据对象）中的一部分，它提供了访问数据源的方式，同时进行读取、更新、添加、删除等操作。AdoDb.Recordset具有高性能、稳定性及可靠性优势，被广泛应用于Windows平台下的应用系统，如客户端应用程序和网页。

AdoDb.Recordset的类型

AdoDb.Recordset有多种类型，包括：

• 前向只读类型：可读取数据但不能修改数据，适合只读应用程序。
• 动态类型：可用于读取、插入、更新和删除数据，适合需要更新数据的应用程序。
• 快速前向类型：可向前读取数据但不能向后或修改数据。
• 快速前向-后向类型：可向前或向后读取数据，但不能修改数据。

AdoDb.Recordset类型的选择需根据实际的开发需求和应用场景做决策。

AdoDb.Recordset的使用

我们通过AdoDb.Recordset对象的属性和方法来操作数据库，从而实现数据的访问、添加、删除和更新等操作。

创建AdoDb.Recordset对象：

```VBS 'VBScript例子 Dim objConn, objRs Set objConn = CreateObject(\"ADODB.Connection\") objConn.ConnectionString = \"Provider=SQLOLEDB.1;Data Source=myServerAddress;\"&_ \"Initial Catalog=myDataBase;User ID=myUsername;Password=myPassword;\" objConn.Open Set objRs = CreateObject(\"ADODB.Recordset\") '创建AdoDb.Recordset对象 objRs.ActiveConnection = objConn '设置AdoDb.Recordset对象连接DB ```

读取数据：

```VBS 'VBScript例子 Dim objConn, objRs Set objConn = CreateObject(\"ADODB.Connection\") objConn.ConnectionString = \"Provider=SQLOLEDB.1;Data Source=myServerAddress;\"&_ \"Initial Catalog=myDataBase;User ID=myUsername;Password=myPassword;\" objConn.Open Set objRs = CreateObject(\"ADODB.Recordset\") '创建AdoDb.Recordset对象 objRs.ActiveConnection = objConn '设置AdoDb.Recordset对象连接DB objRs.Open \"SELECT * FROM Table1\", objConn '执行查询 Do While Not objRs.EOF '循环读取记录 Wscript.Echo objRs.Fields(\"Field1\").Value & \", \" & objRs.Fields(\"Field2\").Value & \"
\" objRs.MoveNext Loop objRs.Close '关闭AdoDb.Recordset对象 Set objRs = Nothing '释放AdoDb.Recordset对象 objConn.Close '关闭数据库连接 Set objConn = Nothing '释放数据库连接对象 ```

插入数据：

```VBS 'VBScript例子 Dim objConn, objRs Set objConn = CreateObject(\"ADODB.Connection\") objConn.ConnectionString = \"Provider=SQLOLEDB.1;Data Source=myServerAddress;\"&_ \"Initial Catalog=myDataBase;User ID=myUsername;Password=myPassword;\" objConn.Open Set objRs = CreateObject(\"ADODB.Recordset\") '创建AdoDb.Recordset对象 objRs.ActiveConnection = objConn '设置AdoDb.Recordset对象连接DB objRs.Open \"Table1\", objConn, adOpenKeyset, adLockOptimistic '打开一个基于表的AdoDb.Recordset对象 objRs.AddNew '添加一条新记录 objRs.Fields(\"Field1\").Value = \"Value1\" '设置字段值 objRs.Fields(\"Field2\").Value = \"Value2\" objRs.Update '保存修改 objRs.Close '关闭AdoDb.Recordset对象 Set objRs = Nothing '释放AdoDb.Recordset对象 objConn.Close '关闭数据库连接 Set objConn = Nothing '释放数据库连接对象 ```

更新数据：

```VBS 'VBScript例子 Dim objConn, objRs Set objConn = CreateObject(\"ADODB.Connection\") objConn.ConnectionString = \"Provider=SQLOLEDB.1;Data Source=myServerAddress;\"&_ \"Initial Catalog=myDataBase;User ID=myUsername;Password=myPassword;\" objConn.Open Set objRs = CreateObject(\"ADODB.Recordset\") '创建AdoDb.Recordset对象 objRs.ActiveConnection = objConn '设置AdoDb.Recordset对象连接DB objRs.Open \"SELECT * FROM Table1\", objConn '执行查询 objRs.MoveFirst '把记录指针移到第一条记录 objRs.Fields(\"Field1\").Value = \"New Value1\" '修改Field1的值 objRs.Fields(\"Field2\").Value = \"New Value2\" '修改Field2的值 objRs.Update '保存修改 objRs.Close '关闭AdoDb.Recordset对象 Set objRs = Nothing '释放AdoDb.Recordset对象 objConn.Close '关闭数据库连接 Set objConn = Nothing '释放数据库连接对象 ```

删除数据：

```VBS 'VBScript例子 Dim objConn, objRs Set objConn = CreateObject(\"ADODB.Connection\") objConn.ConnectionString = \"Provider=SQLOLEDB.1;Data Source=myServerAddress;\"&_ \"Initial Catalog=myDataBase;User ID=myUsername;Password=myPassword;\" objConn.Open Set objRs = CreateObject(\"ADODB.Recordset\") '创建AdoDb.Recordset对象 objRs.ActiveConnection = objConn '设置AdoDb.Recordset对象连接DB objRs.Open \"SELECT * FROM Table1\", objConn '执行查询 objRs.MoveFirst '把记录指针移到第一条记录 objRs.Delete '删除当前记录 objRs.Close '关闭AdoDb.Recordset对象 Set objRs = Nothing '释放AdoDb.Recordset对象 objConn.Close '关闭数据库连接 Set objConn = Nothing '释放数据库连接对象 ``` 总结

AdoDb.Recordset是ADO技术中的重要组成部分，它提供了高效、可靠的数据库访问处理功能。我们可以通过AdoDb.Recordset的属性和方法来操作数据库，实现数据的访问、添加、更新和删除等操作。

AdoDb.Recordset的应用场景非常多，比如数据库开发、Web开发、Windows客户端应用程序开发等领域。无论是哪个领域，掌握AdoDb.Recordset的使用，都能帮助我们提高开发效率和代码质量，是程序员必备的技能之一。