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

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

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

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

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

表1 商品明細(xì)表： wareDetail
商品編號(hào) 商品名稱 單價(jià) 廠商 庫存
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)
表３　庫存表 wLib
總庫存數(shù) 總庫存金額
TotalNum(int) TotalMoney(Money)

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

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