摘要：在VB的訪問數據庫方法中，對ADO技術做出了簡要概述。介紹了ADO訪問普通數據庫時，采用非編程手段時所需要的具體步驟，和采用編程手段時所需要的關鍵代碼。同時以訪問西門子軟件Wincc的數據庫為例，指出ADO訪問特殊數據庫時需要注意的地方。

0.引言

      數據庫作為數據管理的最新技術，是現代計算機信息系統和計算機應用的基礎和核心。對于數據庫的訪問方法中，VB作為一種面向對象的可視化編程工具，Microsoft為其提供了與SQL Server通信的API函數集及工具集，因此借助于VB可以輕松地開發出功能強、速度快、應用廣，并占用資源少的數據庫應用程序，可以進行完整的數據庫維護、操作及其事務處理。以下著重探討在VB6.0提供的訪問數據庫手段中，ADO(ActiveX Data Object)訪問SQL Server數據庫方法，

1. VB/ADO訪問技術概述

      VB訪問數據庫的方法有：數據訪問對象(DAO)、遠程數據對象(RDO)和ActiveX數據對象(ADO)。ADO是繼DAO／RDO的之后產物，它是 VB 6.0開始最新支持的數據訪問對象技術，基于OLE DB之上，通過內部的屬性和方法提供統一的數據庫訪問接口。ADO的連接方式主要可分為OLE DB Provider方式與OLE DB Provider for ODBC方式。OLE DB Provider for ODBC是ADO的默認提供者，ODBC Provider允許ADO連接到任何ODBC數據源。

      ADO 最普遍的用法就是在關系數據庫中查詢一個表或多個表,然后在應用程序中檢索并顯示查詢結果，并允許用戶更改并保存數據。ADO訪問數據庫的方法有編程和非編程方式兩種。

2. 非編程訪問數據庫

     假設已存在數據庫Li.mdb，在VB6環境中：

(1)在工具箱中添加ADO Data控件。操作為：“工程”---“部件”---“Microsoft AD0 Data Control”。

(2)在窗體上放置一個ADO Data控件，名稱默認為Adodc1。

(3)設置Adodcl，connectionstring屬性值為“Li”。其中“Li”為指向Li.mdb ，數據庫的數據源名稱，可通過控制面版預先設定。

(4) 設置Adodc1．RecordSource項， 選擇命令類型為“2一adCmdTable”．并在表名項中選擇“表1”。

(5)將ADO Data控件與Text文本框綁定。放置文本框控件于窗體．將其DataSource屬性值設置Adodc1．DataField屬性值設為表中一字段，如果運行程序，可用ADO Data控件的方向箭頭來瀏覽。

    除了應用上述引入一組數據綁定控件顯示數據內容之外，還可以使用數據網格控件DmaGrid來顯示多個字段內容。步驟為:

（1）先通過“工程”-〉“部件”-〉“Microsoft DataGrid Control”引入數據網格控件并在窗體中繪制一個DataGrid控件。

（2）把DmaGrid綁定到ADO數據控件上。設置DataSource屬性值為：Adodc1。

（3）把數據庫字段加入到DamGrid控件上。鼠標右擊DataGrid控件，選擇檢索字段，則當前數據表的字段全部導入到數據網格控件上。

      這種方法簡單實用，但不能靈活地按照要求快速查詢數庫內容，編程訪問數據庫則能夠解決這個問題。

3.　編程訪問數據庫

   首先介紹打開到數據源所需要的特定代碼：

"Provider=SQLOLEDB;DataSource=serverName;InitialCatalog=

databaseName;User;Password=userPassword; Persist Security Info=True"

1)Provider指定OLE DB數據或服務提供者的名稱，可以缺省。

2) Data Source 或 Server 指定服務器的名稱

3) Initial Catalog 指定服務器上的數據庫名稱。

4)User ID為ODBC數據源指定用戶標識(用戶賬號名)。用于 SQL Server Authentication

5)Password為ODBC數據源指定用戶口令。

6)Persist Security Info布爾類型，為True時表明采用集成安全機制；若為False表明不采用集成安全機制。

ADO訪問數據庫的具體方法為：

(1)引用ADO對象庫。操作：“工程”一“引用”一“Microsoft　ActiveX Data Objects 2．1 Library”。

(2)用代碼打開數據源。

m_sConnStr = "Provider='SQLOLEDB';Data Source='MySqlServer';

" & _  "Initial Catalog='Li';Integrated Security='SSPI';"

(3)將 SQL 字符串取出賦給變量 (sSQL)

 sSQL = "Select ProductID, ProductName, CategoryID, UnitPrice FROM 

Products"  

 (4)最后通過指令 “Set grdDisplay1.DataSource＝” 把數據通過DataBound

 Grid 

控件顯示在窗體上     

4.ADO訪問其它特殊數據庫

      ADO同樣可應用于訪問工控軟件數據庫，如WinCC6.0是西門子公司開發的人機交互數據采集監控系統，它將生產過程中的大量數據壓縮保存在Microsoft SQL Server 2000數據庫中。它的數據歸檔是以一定時間做為基準,形成數據片段，分為快速歸檔和慢速歸檔, 從SQL Server管理器看這些表格中的數據意義不大，因為快速歸檔數據都是經過壓縮的，以二進制方式存儲的，慢速歸擋的所有數據都在一個表里，而且其表名為動態的，因此它們和常規的SQL訪問的方法是有一些出入的。

      因為OLE DB界面和相應的提供者可由不同的廠商提供。我們可通過西門子公司提供的“WinCC OLE DB Provider”，透明地直接訪問數據庫。

連接字符串的結構是：

"Provider = Name of the OLE DB Provider; Catalog = Database Name;Data Source = Server Name"

Catalog數據庫名稱為訪問WinCC運行數據庫，他的名稱一般是"CC_工程名_年_月_日_時_分_秒R"；Data Source為訪問本地計算機為“.\Wincc”，訪問遠程計算機為“Computer Name \Wincc”。

而存放了快速壓縮歸檔數據的表，用西門子公司提供選件的TAG:R....語句查詢

語法為：TAG：R，< Value Name>，，

其中，TAG：R表示查詢WinCC變量運行庫;

Value Name的格式是：‘歸檔名稱＼變量名稱’。

、分別表示所要查詢變量歸檔的開始時間和結束時間。這兩個參數格式為‘YYYY-MM-DD hh：mm：ss．msc’

使用Visual Basic建立連接對象及查詢語句的代碼為：“provider=WINCC OLE DB rovider.1;Catalog=CC_OpenArch_07_05_27_14_11_46R;Data Soruce=.\Wincc”

     sSql="TAG:R,1,'2007-09-12 01:10:00.000','2007-09-12 01:20:00.000'"

5.結束語

       ADO可以使用任何一種ODBC數據源．即不止適合于SQLServer、Oracle、Access等數據庫應用程序，也適合于Excel表格、文本文件、圖形文件和無格式的數據文件。它替代了原來的DAO和RDO兩種數據訪問接口，另外還增加了一些用戶以前沒有接觸到的特征。隨著信息網絡化的發展，利用ADO訪問數據庫，可以獲得更好的性能，更大的靈活性。