Visual Basic數(shù)據(jù)庫編程講稿.ppt

1、Visual Basic 的 數(shù) 據(jù) 庫 編 程,Tiger.wang,三種可用的數(shù)據(jù)訪問接口,RDO (Remote Data Object) 遠(yuǎn)程數(shù)據(jù)對象 DAO (Data Access Object) ADO (Active Data Objects ),ADO三大對象的屬性、方法,Connection對象 1.屬性 ConnectionString PROVIDER=Microsoft.Jet.OLEDB.3.51;Data Source=“c:/db1.mdb; ;Jet OLEDB:Database Password=2298965; 2.方法 Open 、Close conne

2、ction.Open ConnectionString, UserID,Password, OpenOptions connection.Close Command對象 Recordset對象,Recordset的屬性,1.DataSource 指針類型，指向關(guān)聯(lián)的DataEnvironment.Connection對象 2.DataMember 指針類型，指向關(guān)聯(lián)的DataEnvironment.Command對象 3. EOF* 4.Sort 5. State,Recordset的方法,AddNew、 Delete* 向可更新的Recordset添加，刪除一條新記錄 2. Open、Clo

3、se recordset.Open Source, ActiveConnection, CursorType, LockType, Options 3.MoveFirst、MoveLast、MoveNext 等 4. Update 5. UpdateBatch,Recordset的事件,EndOfRecordset 記錄指針試圖移到最后一條記錄之外時 2. FieldchangeComplete 字段值的改變完成之后 WillChangField 對字段值改變之前 4.WillMove Move或Move.方法執(zhí)行之前,Recordset的常數(shù),（recordset.Open Source,

4、ActiveConnection, CursorType, LockType, Options） 1.CursorType adOpenForwardOnly、adOpenKeyset、adOpenDynamic、adOpenStatic 2. LockType adLockReadOnly、adLockPessimistic、adLockOptimistic、adLockBatchOptimistic 3.Options 長整型值，用于指示提供者如何計算 Source 參數(shù) adCmdText指示提供者應(yīng)該將 Source 作為命令的文本定義來計算。 adCmdUnknown指示 Sourc

5、e 參數(shù)中的命令類型為未知。 注：可以使用 Options 參數(shù)優(yōu)化 Source 參數(shù)的計算。如果沒有定義 Options 則性能將會降低，原因是 ADO 必須調(diào)用提供者以確定參數(shù)為 SQL 語句、存儲過程還是表名。如果確知所用的 Source 類型，則可以設(shè)置 Options 參數(shù)以指示 ADO 直接跳轉(zhuǎn)到相關(guān)的代碼 4. State(adStateOpen 、adStateClose),VB數(shù)據(jù)庫編程的一般步驟,一、建營扎寨 1.數(shù)據(jù)庫種類 JET數(shù)據(jù)庫，即Microsoft Access ISAM數(shù)據(jù)庫，如：dBase，F(xiàn)oxPro等 ODBC數(shù)據(jù)庫，凡是遵循ODBC標(biāo)準(zhǔn)的客戶/服務(wù)器

6、數(shù)據(jù)庫。如：Microsoft SQL Server、Oracle 2.創(chuàng)建方法 命令語言創(chuàng)建 應(yīng)用Microsoft Access創(chuàng)建,VB數(shù)據(jù)庫編程的一般步驟,二、千里相會( ConnectionString) Dim RsUser as adodb.recorderset Set RsUser =New Adodb.recorderset Rsuser.open Source, ActiveConnection, CursorType, LockType, Options RsUser.Open ConnectionString, UserID,Password, OpenOptions 三、尋尋覓覓 Select * from user where user_name=XXX order by . Rsuser!user_name=“wyw”