資源描述:
《在vb6.0數(shù)據(jù)庫(kù)程序開(kāi)發(fā)中使用ado 和sql的方法介紹》由會(huì)員上傳分享,免費(fèi)在線閱讀,更多相關(guān)內(nèi)容在工程資料-天天文庫(kù)。
1、在VB6.0數(shù)據(jù)庫(kù)程序開(kāi)發(fā)中使用ADO和SQL的方法介紹 (1.呼和浩特職業(yè)學(xué)院計(jì)算機(jī)信息學(xué)院;2.內(nèi)蒙古審計(jì)廳計(jì)算中心,內(nèi)蒙古呼和浩特010000)
摘要:以實(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ù)
中圖分類號(hào):TP311.13文獻(xiàn)標(biāo)識(shí)碼:A文章編號(hào):1007—6921(XX)20—0079—02
在VB的應(yīng)用程序開(kāi)發(fā)中,訪問(wèn)數(shù)據(jù)庫(kù)的方法可歸納為兩種。一種是通過(guò)DAO或ADO
2、的數(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是VisualBasic5.0使用的數(shù)據(jù)訪問(wèn)技術(shù),它在用于訪問(wèn)MDB文件格式的數(shù)據(jù)庫(kù)時(shí)有較高的效率,但訪問(wèn)如Oracle或SQLServer這樣的非MDB文件格式的數(shù)據(jù)庫(kù)時(shí),因它基于Access/Jet數(shù)據(jù)庫(kù)引擎,訪問(wèn)速度會(huì)大大降低。所以VisualBasic6.0推出了ADO技術(shù)。ADO中文含意是ActiveX數(shù)據(jù)對(duì)象(ActiveXDataObjec
3、t),它是一種面向?qū)ο蟮慕涌?。ADO訪問(wèn)數(shù)據(jù)庫(kù)是通過(guò)訪問(wèn)OLEDB使用程序和OLEDB供給程序來(lái)進(jìn)行的,它在封裝OLEDB的程序中使用了大量的COM接口,是一種高層的訪問(wèn)技術(shù)。它在繼承OLEDB的同時(shí),大大簡(jiǎn)化了OLEDB的操作。
此外,ADO技術(shù)可以以ActiveX控件的形式出現(xiàn),被廣泛應(yīng)用于MicrosoftActiveX頁(yè)、VisualC++和VisualBasic的編程。SQL是管理關(guān)系數(shù)據(jù)庫(kù)系統(tǒng)的標(biāo)準(zhǔn)語(yǔ)言。每一種關(guān)系數(shù)據(jù)庫(kù)如Access、SQLServer、Oracle等都有它自己特
4、有的SQL語(yǔ)言,但它們都支持像select、insert、update、delete、create、drop等標(biāo)準(zhǔn)語(yǔ)句來(lái)完成幾乎所有的對(duì)數(shù)據(jù)庫(kù)的操作。本文就ADO和SQL的用法做一些探討。
1開(kāi)發(fā)原型
為計(jì)算機(jī)產(chǎn)品經(jīng)銷商開(kāi)發(fā)一個(gè)進(jìn)銷存的程序。用MSAccess數(shù)據(jù)庫(kù),創(chuàng)建的數(shù)據(jù)庫(kù)名叫ware.mdb。在這個(gè)數(shù)據(jù)庫(kù)中,建立表1、表2、表3、表4。
740)this.width=740"border=undefined>
740)this.width=740"border=undefin
5、ed>
2ADO的使用方法
ADO2.0存在于VisualBasic6.0的兩個(gè)獨(dú)立的庫(kù)中,第一個(gè)稱為ADODB,在References對(duì)話框中的名字是MicrosoftActiveXDataObjects2.0Library。在這個(gè)庫(kù)中包含了所有的ADO對(duì)象。對(duì)于那些并不需要太多加強(qiáng)的ADO資源工程,應(yīng)該使用ADO庫(kù)。在References對(duì)話框中這個(gè)庫(kù)稱為MicrosoftActiveXDataObjectsRecordset2.1Library。這個(gè)庫(kù)只包含對(duì)Recordsets的支持
6、。VisualBASIC6.0通過(guò)ADO控件和Recordset對(duì)象兩種方法來(lái)使用ADO。下面介紹一下Recordset對(duì)象的使用方法。在visualbasic中加入如下代碼:
dimmyConnectstrasstrng
dimmyRecordsetasNewADODB.recordset
myConnectstr=“PROVIDER=Microsoft.Jet.OLEDB.4.0;DataSource=”App.Path“ware.mdb;PersistSecurityInfo=
7、False”
myRecordset.CoursorLocation=AduseClient
myRecordset.Open“select*fromwDetail”,myConnectstr,adOpenKeyset,adLockPessimistic
這樣就可以對(duì)商品明細(xì)表追加紀(jì)錄:
myRecordset.AddNew'添加一條新記錄
myRecordset.Fields(“wareID”)=“000001”'對(duì)各字段分別賦值
myRecordset.Fields
8、(“wareName”)=“Switch3500”
myRecordset.Fields(“wPrice”)=4350
myRecordset.Fields(“wManufect”)=“Cisco”
myRecordset.Update'對(duì)當(dāng)前記錄進(jìn)行更新
獲取表中的紀(jì)錄數(shù):
recordcnt=myRecordset.Recordcount
移動(dòng)紀(jì)錄指針:
myRecordset.MoveFirst'移動(dòng)到表的第一條紀(jì)