ADO常用方法

下面是我所掌握的使用ADO對數(shù)據(jù)庫操作的一些常用方法，主要是提供給初學(xué)者作為參考，有不對的地方請指正。如有補充不勝榮幸

準(zhǔn)備工作========DimconnAsNewADODB.Connection'創(chuàng)建一個?Connection?實例，在這里使用New等于將Dim和Set合并為一段代碼執(zhí)行DimrsAsADODB.Recordset'創(chuàng)建一個?Recordset?實例，不使用New?是因為，經(jīng)常需要重復(fù)使用Set，因此沒必要在這里使用DimCnStrAsString,?SqlAsString'創(chuàng)建兩個字符串變量分別存放兩個集合的SQL語句代碼段1、裝載數(shù)據(jù)庫(不屬于Recordset集合)=============DimFileNamw$,?DbIp$,?DbName$,?DbUser$,?DbPw$'以上5個字符串變量分別表示文件路徑和文件名、數(shù)據(jù)庫地址、數(shù)據(jù)庫名、數(shù)據(jù)操作員用戶名、操作員密碼FileName=App.Path&"\'數(shù)據(jù)庫名'"DbIp="數(shù)據(jù)庫地址"DbName="數(shù)據(jù)庫名"DbUser="數(shù)據(jù)操作員用戶名"DbPw="操作員密碼"'以上變量根據(jù)數(shù)據(jù)庫類型的不同而不同，有可能只需要1至兩個變量'1)連接Access數(shù)據(jù)庫:'-------------------CnStr="PROVIDER=microsoft.jet.oledb.3.51;persist?security?info?=false;data?source="&FileName&";Jet?OLEDB:Database?Password="&DbPw'2)連接Oracle數(shù)據(jù)庫:'-------------------CnStr="PROVIDER=MSDAORA.1;Password="&DbPw&";User?ID="&DbUser&";Data?Source="&FileName&";Persist?Security?Info=True"'其中:'PASSWORD:??????密碼'User?ID:???????用戶號'Data?Source:???數(shù)據(jù)庫名'Persist?Security?Info:'Provider:'3)連接VF的DBF庫:'----------------CnStr="PROVIDER=MSDASQL.1;Persist?Security?Info=False;Driver={Microsoft?Visual?FoxPro?Driver};UID="&DbUser&";SourceDB="&FileName&";SourceType=DBF;Exclusive=No;BackgroundFetch=Yes;Collate=Machine;"'4)連接SQL的數(shù)據(jù)庫'------------------CnStr="PROVIDER=MSDataShape;Data?PROVIDER=MSDASQL;uid="&DbUser&";pwd="&DbPw&";DRIVER=SQL?Server;DATABASE="&DbName&";WSID=GQSOFT;SERVER="&DbIP'也可以使用這段簡易代碼?CnStr?=?"Provider=SQLOLEDB;Data?Source="?&?DbIp?&?";DATABASE="?&?DbName?&?";UID="?&?DbUser?&?";pwd="?&?DbPwConn.Open?cnstr'使用?Connection?集合的?Open?方法?與數(shù)據(jù)庫建立連接2、Recordset集合的常用方法=========================='1)打開一個表'------------Sql="select?*?from?表名"'SQL查詢語句Setrs=NewADODB.Recordset'新建一個實例rs.Open?Sql,?conn'使用?Open?方法打開數(shù)據(jù)庫中的一個表'注意，這種打開方式只能使用?rs.MoveNext?(即，向后移動行坐標(biāo))而不能像其他方向，并且不能修改數(shù)據(jù)內(nèi)容'

'rs.Open?Sql,?conn，1?'雖然只加了個“1”，但這種方法可以向任何方向移動行坐標(biāo)。'

'以下參數(shù)代表了這個可選值的含義'0?=?adOpenForwardOnly?(默認(rèn)值)打開僅向前類型游標(biāo)。'1?=?adOpenKeyset???????打開鍵集類型游標(biāo)。'2?=?adOpenDynamic??????打開動態(tài)類型游標(biāo)。'3?=?adOpenStatic???????打開靜態(tài)類型游標(biāo)。'

'雖然使用以上方法可以可以實現(xiàn)行坐標(biāo)(游標(biāo))的任意移動，但是仍然無法寫入數(shù)據(jù)。因此需要進(jìn)一步的對Open?方法進(jìn)行完善'rs.Open?Sql,?conn,?1,?3??'后面的3是確定讀寫權(quán)限的'以下參數(shù)代表了這個可選值的含義'1?=?adLockReadOnly????????(默認(rèn)值)只讀?—?不能改變數(shù)據(jù)。'2?=?adLockPessimistic?????保守式鎖定(逐個)?—?在編輯時立即鎖定數(shù)據(jù)源的記錄。'3?=?adLockOptimistic??????開放式鎖定(逐個)?—?只在調(diào)用?Update?方法時才鎖定記錄。'4?=?adLockBatchOptimistic?開放式批更新?—?用于批更新模式(與立即更新模式相對)。'

'2)讀寫數(shù)據(jù)'----------'增加一行記錄并對新記錄的內(nèi)容進(jìn)行修改并保存可以如下寫法rs.AddNew'增加一行記錄rs("...")="..."'數(shù)據(jù)讀寫操作...

rs.UpDate'保存寫入資料，如果使用只讀權(quán)限，則不能使用這個方法rs.Close'這個方法用來關(guān)閉你所代開的表，如果不使用這個方法也可以，但是數(shù)據(jù)庫仍然認(rèn)為你在對標(biāo)進(jìn)行鎖定，可造成數(shù)據(jù)庫負(fù)擔(dān)過重2、對數(shù)據(jù)進(jìn)行篩選和排序=======================Sql="select?*?from?表名"'SQL查詢語句'以上為打開一個表的所有內(nèi)容Sql="select?top?50?*?from?表名"'SQL查詢語句'以上為只打開前50行的記錄Sql="select?top?50?列名1,列名2,列名5?from?表名"'SQL查詢語句'以上為只打開前50行的記錄，并且只打開第1、2、5列數(shù)據(jù)Sql="select?*?from?表名?where?列名1='"&字段&"'"'SQL查詢語句'以上為一個簡單的篩選，表示打開的內(nèi)容必須符合[列名1='"?&?字段?&?"'"]的內(nèi)容'需要注意的是，數(shù)據(jù)庫列的類型必須匹配，比如字符串類型需要以單引號括起'而數(shù)字類型則不能用單引號括起'另外SQL語句還支持通配符，例如?列名1?like?'%"?&?字段?&?"%'"?表示包含[字段]'在表達(dá)式中的匹配'??_(下劃線)?任何單一字符'*?or?%????????零個或多個字符'#?????????????任何單一數(shù)字(0?—?9)'[charlist]????任何在字符表中的單一字符'[!charlist]???任何不在字符表中的單一字符'注：根據(jù)數(shù)據(jù)庫的不同?、_和*、%的應(yīng)用有所差別，比如SQL只使用%?和?_?分別代表多個字符和單一字符Sql="select?*?from?表名?where?列名1='"&字段&"'?ORDER?BY?字段1?ASC"'對查詢結(jié)果進(jìn)行升序排列Sql="select?*?from?表名?where?列名1='"&字段&"'?ORDER?BY?字段1?DESC"'對查詢結(jié)果進(jìn)行降序排列Sql="select?*?from?表名?where?列名1='"&字段&"'?ORDER?BY?字段1?DESC,?ORDER?BY?字段2?DESC"'對查詢結(jié)果進(jìn)行多維降序排列(速度奇慢，不推薦使用)3、Recordset集合的常用屬性方法==============================rs.BOF'是否游標(biāo)在最上邊rs.EOF'是否游標(biāo)在最下邊rs.RecordCount'記錄集的行數(shù)(如果使用像前類型的游標(biāo)，可能返回不準(zhǔn)確)rs.AddNew'新建一行記錄rs.Update'保存當(dāng)前行被修改的記錄rs.Delete'刪除當(dāng)前行rs.Close'關(guān)閉記錄集4、Fields集合的一些屬性的解釋============================='以下為簡寫，正常情況需要rs.Fileds.。。。但是Fields屬于Recordset的一個默認(rèn)集合，因此可以省略rs()'括號內(nèi)可以是列名也可以是列的序號例如：rs("姓名")、rs(3)?都是是可以的rs(3).Name'返回列名rs(3).Type'返回列的類型rs(3).Value'返回當(dāng)前行的值rs.Fields.Count'返回列數(shù)

總結(jié)

以上是生活随笔為你收集整理的vb用adodb链接mysql找不到_VB使用ADODB操作数据库的常用方法的全部內(nèi)容，希望文章能夠幫你解決所遇到的問題。

如果覺得生活随笔網(wǎng)站內(nèi)容還不錯，歡迎將生活随笔推薦給好友。