導讀：Oracle數據庫是一種大型數據庫系統，一般應用于商業，政府部門，它的功能很強大，能夠處理大批量的數據，在網絡方面也用的非常多。下文中將為大家講解如何使用ADO訪問Oracle數據庫存儲過程。

一、關于ADO

在基于Client/Server結構的數據庫環境中，通過OLE DB接口可以存取數據，但它定義的是低層COM接口，不僅不易使用，而且不能被VB，VBA，VBScript等高級編程工具訪問。

而使用ADO則可以很容易地使VB等編程語言直接訪問數據（通過OLE DB接口）。ADO是基于面向對象方法的，其對象模型如下圖所示(略)

由上圖可見，ADO對象模型總共才包括六個對象，相對于數據訪問對象（DAO）來說簡單得多。因此實際中常常使用它來訪問數據庫。

二、ADO訪問數據庫實例

下面，我們以Oracle為例，使用VB6.0來訪問其數據庫中的存儲過程。在此例中，我們首先在Oracle數據庫上創建有兩個存儲過程，一個不帶參數，另一個帶有參數。然后，使用ADO來訪問這兩個存儲過程。步驟如下：

1. 在Oracle服務器上運行以下DDL腳本:

DROP TABLE person;

CREATE TABLE person

(ssn NUMBER(9) PRIMARY KEY,

fname VARCHAR2(15),

lname VARCHAR2(20));

INSERT INTO person VALUES(555662222,'Sam','Goodwin');

INSERT INTO person VALUES(555882222,'Kent','Clark');

INSERT INTO person VALUES(666223333,'Jane','Doe');

COMMIT;

/

2. 在Oracle服務器上創建包（package）:

CREATE OR REPLACE PACKAGE packperson

AS

TYPE tssn is TABLE of NUMBER(10)

INDEX BY BINARY_INTEGER;

TYPE tfname is TABLE of VARCHAR2(15)

INDEX BY BINARY_INTEGER;

TYPE tlname is TABLE of VARCHAR2(20)

INDEX BY BINARY_INTEGER;

PROCEDURE allperson

(ssn OUT tssn,

fname OUT tfname,

lname OUT tlname);

PROCEDURE oneperson

(onessn IN NUMBER,

ssn OUT tssn,

fname OUT tfname,

lname OUT tlname);

 關于如何使用ADO訪問Oracle數據庫存儲過程的講解就為大家介紹到這里，Oracle數據庫是很多人都工作中經常要用到的數據庫管理系統，應用也比較普遍，希望上文中涉及到的內容對大家能夠有所幫助。