A&D Object（ADO）是一个在计算机编程中常用的连接不同类型数据库的组件，其中之一就是Oracle数据库。ADO连接Oracle数据库的流程如下：
第一步：定义Connection对象
Connection对象是用来创建连接的，ADO的连接字符串包括三个重要的参数，分别是数据源（"Provider=OraOLEDB.Oracle;"）、用户ID（"User ID=username;"）和密码（"Password=password;"）。举例说明，我们要连接本地Oracle数据库的scott用户，代码如下：
Dim Conn As New ADODB.Connection
Conn.ConnectionString = "Provider=OraOLEDB.Oracle;" & _
"Data Source=(LOCAL);" & _
"User ID=scott;" & _
"Password=tiger;"
Conn.Open
第二步：定义Recordset对象
Recordset对象是用来执行查询的，ADO的查询语句包括SELECT，INSERT，UPDATE和DELETE四种类型。其中SELECT语句是最常用的，因为它可以查询数据库中的数据。举例说明，我们要查询本地Oracle数据库的emp表中的所有数据，代码如下：
Dim Rs As New ADODB.Recordset
Rs.Open "SELECT * FROM emp", Conn
第三步：对Recordset对象进行操作
Recordset对象返回的结果集可以通过MoveFirst、MoveLast、MoveNext、MovePrevious和EOF等方法进行导航。另外，ADO还提供了Filter和Sort等方法进行数据筛选和排序。举例说明，我们要将emp表中的数据按照sal字段从高到低排序，代码如下：
Rs.Sort = "sal DESC"
Rs.MoveFirst
Do Until Rs.EOF
Debug.Print Rs("empno"), Rs("ename"), Rs("sal")
Rs.MoveNext
Loop
第四步：关闭Connection对象和Recordset对象
使用完Connection对象和Recordset对象后一定要记得关闭它们，以释放资源。代码如下：
Rs.Close
Set Rs = Nothing
Conn.Close
Set Conn = Nothing
以上就是ADO连接Oracle数据库的全部流程。需要注意的是，为了保证代码的可读性和可维护性，建议将Connection对象和Recordset对象的定义和操作分别写在不同的函数或模块中。
