在VB6.0數(shù)據(jù)庫(kù)程序開(kāi)發(fā)中使用ADO 和SQL

摘要：本文用實(shí)例說(shuō)明了通過(guò)ADO處理數(shù)據(jù)庫(kù)表中數(shù)據(jù)的實(shí)現(xiàn)方法,并介紹了利用SQL語(yǔ)句實(shí)現(xiàn)對(duì)數(shù)據(jù)作數(shù)學(xué)統(tǒng)計(jì)的方法．

關(guān)鍵詞：ADO　SQL　數(shù)據(jù)庫(kù)

1．引言
在VB的應(yīng)用程序開(kāi)發(fā)中，訪問(wèn)數(shù)據(jù)庫(kù)的方法可歸納為兩種。一種是通過(guò)DAO 或ADO的數(shù)據(jù)源對(duì)表中的數(shù)據(jù)進(jìn)行直接操作，另一種是通過(guò)標(biāo)準(zhǔn)的SQL語(yǔ)句結(jié)合Connection 對(duì)象對(duì)數(shù)據(jù)庫(kù)中的數(shù)據(jù)進(jìn)行操作，對(duì)表中的數(shù)據(jù)進(jìn)行檢索和統(tǒng)計(jì)。DAO是Visual Basic 5.0使用的數(shù)據(jù)訪問(wèn)技術(shù),它在用于訪問(wèn)MDB文件格式的數(shù)據(jù)庫(kù)時(shí)有較高的效率，但訪問(wèn)如Oracle或 SQL Server這樣的非MDB文件格式的數(shù)據(jù)庫(kù)時(shí),因它基于Access/Jet數(shù)據(jù)庫(kù)引擎，訪問(wèn)速度會(huì)大大降低。所以Visual Basic 6.0推出了ADO 技術(shù)。ADO中文含意是ActiveX數(shù)據(jù)對(duì)象(ActiveX Data Object),它是一種面向?qū)ο蟮慕涌凇�ADO訪問(wèn)數(shù)據(jù)庫(kù)是通過(guò)訪問(wèn)OLE
DB使用程序和OLE　DB供給程序來(lái)進(jìn)行的，它在封裝OLE DB的程序中使用了大量的COM接口，是一種高層的訪問(wèn)技術(shù)。它在繼承OLE DB的同時(shí)，大大簡(jiǎn)化了OLE DB的操作。
此外，ADO技術(shù)可以以ActiveX控件的形式出現(xiàn)，被廣泛應(yīng)用于Microsoft ActiveX頁(yè)、Visual C 和Visual Basic的編程。SQL是管理關(guān)系數(shù)據(jù)庫(kù)系統(tǒng)的標(biāo)準(zhǔn)語(yǔ)言。每一種關(guān)系數(shù)據(jù)庫(kù)如Access、 SQL Server、 Oracle 等都有它自己特有的SQL語(yǔ)言，但它們都支持像select、insert、update、delete、create、drop等標(biāo)準(zhǔn)語(yǔ)句來(lái)完成幾乎所有的對(duì)數(shù)據(jù)庫(kù)的操作．本文就ADO 和SQL的用法做一些探討。

２．開(kāi)發(fā)原型
我們?yōu)橛?jì)算機(jī)產(chǎn)品經(jīng)銷(xiāo)商開(kāi)發(fā)一個(gè)進(jìn)銷(xiāo)存的程序。用MS Access 數(shù)據(jù)庫(kù)，創(chuàng)建的數(shù)據(jù)庫(kù)名叫 ware.mdb. 在這個(gè)數(shù)據(jù)庫(kù)中，建立表１，表２，表３，表４。

表1 商品明細(xì)表： wareDetail
商品編號(hào) 商品名稱(chēng) 單價(jià) 廠商 庫(kù)存
wareID(ch10) wareName(ch30) wPrice(Money) manifest(ch40) numInLib(int)

表2 流水賬 wAccount
商品編號(hào) 進(jìn)貨數(shù) 出貨數(shù) 日期
wareID(ch10) wQuantity(int) wSold(int) wDate(date)
表３　庫(kù)存表 wLib
總庫(kù)存數(shù) 總庫(kù)存金額
TotalNum(int) TotalMoney(Money)

表４　臨時(shí)表wInOut
進(jìn)貨數(shù) 出貨數(shù)
Quantity, Sold

３．ADO的使用方法．
ADO2.0存在于Visual Basic 6.0的兩個(gè)獨(dú)立的庫(kù)中 第一個(gè)稱(chēng)為 ADODB，在References對(duì)話框中的名字是Microsoft ActiveX Data Objects 2.0 Library在這個(gè)庫(kù)中包含了所有的ADO對(duì)象。對(duì)于那些并不需要太多加強(qiáng)的ADO資源工程,應(yīng)該使用ADOR庫(kù)。在References對(duì)話框中這個(gè)庫(kù)稱(chēng)為Microsoft ActiveX Data Objects Recordset 2.1 Library 這個(gè)庫(kù)只包含對(duì)Recordsets 的支持。Visual BASIC 6.0通過(guò)ADO控件和 Recordset對(duì)象兩種方法來(lái)使用ADO．下面介紹一下Recordset 對(duì)象的使用方法．在visual basic 中加入如下代碼：
dim myConnectstr as strng
dim myRecordset as New ADODB.recordset
myConnectstr="PROVIDER=Microsoft.Jet.OLEDB.4.0;DataSource="