资料库程式设计及指南.pptVIP

資料庫程式設計 VB資料庫設計簡介 週次：5 建國科技大學 資管系 饒瑞佶 資料控制項與資料存取物件 資料控制項與資料存取物件 範例5-4 範例5-4 資料控制項與資料存取物件 範例5-6 範例5-6 資料控制項與資料存取物件 範例5-7 ADO物件對資料庫的操作 資料的移動 資料的移動 克服超過BOF或EOF的錯誤 克服超過BOF或EOF的錯誤 範例6-2 範例6-2 範例6-2 資料的移動 編輯紀錄 範例6-5 資料更新 範例6-6 新增資料 範例6-7 範例6-8 刪除資料 範例6-9 搜尋作業 搜尋作業 比較運算子 搜尋作業 搜尋後取代 篩選作業 篩選作業 排序作業 搜尋相似的而不是完全正確的 使用Like運算子，配合？，*等萬用字元 rs.Find “書名 Like ‘?Basic*’” 範例6-11 找到符合條件的第一筆記錄後如何找尋其他也符合的 資料？ 方法： 設定Skiprows＝1 省略start 範例6-12 將搜尋（Find方法）與更新（Update方法）結合 範例6-14 * * 資料庫控制項 ( Adodc或DATA ) 提供的功能有限 方便,使用者不需要額外撰寫程式 資料存取物件 (ADO) 功能較完整 需要撰寫程式碼 二者可以交互使用 半自動 完全手動 資料庫控制項 ( Adodc) 直接設定ConnectionString與RecordSource屬性 設定ADO物件後將Recordset物件指定給資料庫控制項（Adodc） Command1_click 設定DataSource與 DataField屬性 Private Sub Command1_Click() 連結資料庫 Set cn = New ADODB.Connection cn.ConnectionString = Provider=Microsoft.Jet.OLEDB.3.51; _ Data Source=C:\VB6\DB\Book.mdb cn.Open 取得資料集 Set rs = New ADODB.Recordset rs.Open 書籍, cn, adOpenStatic 設定ADO物件取得資料集 Set adoBook.Recordset = rs End Sub ADO物件 顯示元件 如TEXT 設定產生Connection與 Recordset物件 範例5-4 範例5-6 Command1_click 設定Datasource與 DataField屬性 Private Sub Command1_Click() 連結資料庫 Set cn = New ADODB.Connection cn.ConnectionString = Provider=Microsoft.Jet.OLEDB.3.51; _ Data Source=C:\VB6\DB\Book.mdb cn.Open 取得資料集 Set rs = New ADODB.Recordset rs.Open 書籍, cn, adOpenStatic 設定連結控制項的屬性 Set Text1.DataSource = rs Text1.DataField = 書名 Set Text2.DataSource = rs Text2.DataField = 作者 Set Text3.DataSource = rs Text3.DataField = 分類 Set Text4.DataSource = rs Text4.DataField = 出版社“ End Sub ADO物件 顯示元件 如TEXT 設定產生Connection與 Recordset物件 範例5-4 範例5-6 ADO物件 顯示元件 如TEXT 設定產生ConnectionString與 RecordSource屬性 範例5-7 Private rs As ADODB.Recordset Private Sub Command1_Click() 取得 RecordSet 物件 Set rs = adoBook.Recordset 顯示RecordSet 物件的內容 For i = 0 To 4 Picture1.Print rs!書名 rs.Mov