【正文】 對象 第 10章 利用 ADO開發(fā)數(shù)據(jù)庫應(yīng)用程序 ? Command對象 ? Field對象和 Fields集合 ? Error對象和 Errors集合 ? ADO對象綜合應(yīng)用例 ? ADO數(shù)據(jù)訪問技術(shù)的基本概念 ? ADO模型的對象 ? 加載 ADO對象庫 ADO對象模型概述 ADO數(shù)據(jù)訪問技術(shù)的基本概念 ADO（ ActiveX Data Object）是微軟最新的數(shù)據(jù)訪問組件（微軟數(shù)據(jù)訪問組件簡稱 MDAC）的一部分， MDAC的常用版本有 MDAC MDAC ， ADO的最新的版本 MDAC 。 注意： 也可選擇“ Retrieve Fields‖菜單項，此時，將產(chǎn)生與字段數(shù)目一樣多的列，并且每列與對應(yīng)的字段綁定在一起。在該對話框中單擊“ Columns‖頁標(biāo)簽，然后對每一列的Caption屬性（顯示列標(biāo)題）和 DataField屬性（與對應(yīng)字段相綁定）進行設(shè)置。反復(fù)執(zhí)行，直到列數(shù)為 4列。此時在 DBGrid1控件上單擊右鍵，將會出現(xiàn)快捷菜單。在設(shè)計狀態(tài)下，為 DBGrid控件增加兩列，并把各列與 Class表中的對應(yīng)字段綁定在一起，以便顯示字段值。 圖 927 例 99程序設(shè)計界面 圖 928 例 99程序運行界面 實現(xiàn)思路： 在窗體上放置一個 Data控件，與數(shù)據(jù)庫 CollegeMIS中的 Class表聯(lián)系起來。 DataSource屬性用來設(shè)置與之綁定的 Data控件，把它的值設(shè)置為一個 Data控件的名稱即可把該 Data控件形成的記錄集中的數(shù)據(jù)顯示出來。加載方法是：執(zhí)行 【 工程 】 → 【 部件 】 命令 ,將會出現(xiàn)“部件”對話框”，在該對話框的“控件”頁的列表框中找到“ Microsoft Data Bound Grid Control ‖控件并選中它，然后單擊“確定”按鈕即可。 DBGrid控件的使用 1. 作用 以網(wǎng)格的形式顯示數(shù)據(jù)集的內(nèi)容，與 MSFlexGrid控件不同的是 DBGrid控件允許用戶對顯示的數(shù)據(jù)進行修改。 （ 11） Text屬性：存放在當(dāng)前單元格中的文本。 （ 9） GridLine屬性：決定網(wǎng)格是否要網(wǎng)格線。 （ 7） FixedCols屬性：表示網(wǎng)格中固定在左邊的列數(shù)。 （ 5） RowHeight屬性：表示網(wǎng)格每行的高度。 （ 3） Row屬性：表示當(dāng)前行。 MSFlexGrid控件的使用 （ 1） Col屬性：表示當(dāng)前列。注意：在保存時把窗體名改為 frmTeacher，窗體的文件名為 。 【 例 98】 對例 95進行修改，要求：系號的輸入使用 DBCombo控件來實現(xiàn)，通過選擇系名來輸入系號。 （ 5） BoundColumn屬性 BoundColumn屬性用來指定由 RowSource屬性指定的 Data控件形成的記錄集的哪個字段與 DataField字段相綁定。 （ 3） ListField屬性 ListField屬性用來指定列表中的數(shù)據(jù)來源于 RowSource屬性指定的 Data控件形成的記錄集的哪個字段，如圖 925中的 Department表形成的數(shù)據(jù)集中的DepartName字段。 2 ．示意圖 3．兩個控件的主要屬性 （ 1） RowSource屬性 RowSource屬性用來指定控件中列表信息的來源，通常為一個 Data控件名，該 Data控件形成的記錄集的一個字段信息作為控件列表的來源，如圖 925中的聯(lián)系 Department表的 Data控件。關(guān)鍵的區(qū)別在于 DBlist和 DBCombo控件從記錄集中獲取它們的信息，而不是通過在設(shè)計時輸入或運行時執(zhí)行 AddItem語句來獲得列表信息。 兩個結(jié)論： （ 1）通過在 Data控件的 Reposition事件中編寫代碼，可以實現(xiàn)多個表的聯(lián)動； （ 2）可以使用 Data控件執(zhí)行 SQLSELECT查詢語句，方法是先形成查詢語句的字符串，然后把該字符串賦值給 Data控件的 RecordSource屬性。因此可在與 Teacher表相聯(lián)系的Data控件的 Reposition事件中，設(shè)置與 MSFlexGrid控件相聯(lián)系的 Data控件的RecordSource屬性，可使用一條 SELECT語句實現(xiàn)，然后調(diào)用這個 Data控件的Refresh方法即可。程序運行界面如圖 924所示。 （ 2）事件語法格式 Private Sub data控件名 _Reposition([Index As Integer]) 【 例 97】 為 CollegeMIS數(shù)據(jù)庫統(tǒng)編寫一個程序，用來查看教師所教課程的情況。使用該事件可以在指針到達當(dāng)前記錄位置之前進行基于當(dāng)前記錄的數(shù)據(jù)操作，也可以改變其他對象的屬性或使用其他對象的方法來設(shè)置窗體和界面。 程序代碼見實例。某時刻的程序運行界面如圖 922所示。 Action參數(shù)的取值如下表所示。 （ 2）事件語法格式 當(dāng) Validate事件發(fā)生時， Data控件檢查所有與它綁定的控件中的數(shù)據(jù)是否發(fā)生了改變，然后設(shè)置兩個參數(shù)： Save參數(shù)和 Action參數(shù)。當(dāng)用戶按了 Data控件上的任一個瀏覽按鈕，或包含 Data控件的窗體被卸載時就會發(fā)生該事件。注意 Data控件只能識別 Microsoft Access 97以前版本的數(shù)據(jù)庫。 注意： 利用 Data控件使用 ODBC連接到 SQL Server數(shù)據(jù)庫，系統(tǒng)的某些功能不太穩(wěn)定，如更新數(shù)據(jù)庫，有時會報錯，但再次更新卻沒有問題。只有在單擊“添加”和“修改”按鈕時，才能通過界面上的文本框、復(fù)選框、組合框和圖像框輸入數(shù)據(jù)，其它情況下不能通過這些控件輸入數(shù)據(jù)。執(zhí)行了“添加”或“修改”操作后，“添加”、“修改”及移動按鈕均不能使用，而“確認(rèn)”和“取消”按鈕應(yīng)能夠使用。 圖 920 例 95的程序設(shè)計界面 圖 921 單擊了“修改”按鈕后的程序設(shè)計界面 實現(xiàn)思路： “添加”、“修改”、“確認(rèn)”等操作需執(zhí)行記錄集的 AddNew、 Edit、Update等方法，“取消”操作需調(diào)用 Data控件的 UpdateControls方法。 【 例 95】 為 CollegeMIS數(shù)據(jù)庫的 Teacher表編寫一個維護程序，程序的設(shè)計界面如圖 920所示，程序的運行界面如圖 921所示。通常在“確認(rèn)”按鈕中調(diào)用該方法 。 5． Delete方法 Delete方法用于從記錄集中刪除記錄。讀者可建立一個 Microsoft Access數(shù)據(jù)庫，嘗試 Seek方法的使用方法。 JSH為索引名稱 =, 39。若在同一個記錄集中多次使用參數(shù)相同的 Seek方法，那么找到的將是同一個記錄。 Microsoft Jet用這些值與記錄集對象的當(dāng)前記錄的各索引字段值進行比較。取值有：“ =‖、“ =‖、“ ‖、“ ‖、“ =‖。 Data控件的 Recordset對象的常用方法 3． Seek方法 使用 Seek方法可在 Table型記錄集中查找與指定索引規(guī)則相符的第一條記錄，并使之成為當(dāng)前記錄。‖作為定界符，日期值用“ ‖作為定界符。為使查找不到記錄時，記錄指針定位到查找之前的記錄，可先用一個變量記下當(dāng)前記錄指針的位置（ RecordSet的BookMark屬性），在查找不到指定的記錄時，再把該變量值賦值給RecordSet的 BookMark屬性。圖 919是某次按姓名進行模糊查找的運行結(jié)果。程序執(zhí)行時，在“出生日期”后面的文本框中輸入合法的日期值，單擊“按出生日期精確查找”框架控件中的相應(yīng)按鈕，將按出生日期進行精確查找，如果找到，則顯示找到的記錄并給出提示信息，如果找不到則顯示消息框通知沒有查找到，并把記錄指針置于查找前的位置。 【 例 94】 為 CollegeMIS數(shù)據(jù)庫中的 Teacher表編寫一個教師查找程序。 Find方法進行的查找在默認(rèn)的情況下是不區(qū)分大小寫的，若要使查找區(qū)分大小寫，可在窗體的聲明部分使用 Option Compare語句，該語句的格式如下： Option Compare Text|Binary 如果使用可選項 Text表示不區(qū)分大小寫，如果使用可選項 Binary則區(qū)分大小寫。 其中的“ *”為匹配符，表示可以是任意長度的任意字符。 ZC amp。 39。 條件的設(shè)置方法： 如果想要進行不精確查找，可使用 Like運算符。 ZC amp。 39。副教授 39。副教授 39。表達式中除可用普通的關(guān)系運算符外，還可以使用 Like運算符。要進行順序查找，需要使用 Data控件的 RecordSet對象的 Find類方法 。 圖 916 例 93的程序設(shè)計界面 圖 917 例 93的程序運行界面 注意： 代碼參見實例。 注意：移動記錄的時候需特別注意對文件頭和文件尾的測試 。 （ 4） MoveLast方法 該方法的作用是把記錄指針移到最后一條記錄。 （ 1） MoveNext方法 （ 2） MovePrevious方法 該方法的作用是把記錄指針移到當(dāng)前記錄的上一條記錄。 Database=CollegeMIS 其它參見例子程序。 UID=sa。Driver={SQL Server}。單擊 Data控件的移動按鈕時，圖像將自動保存到數(shù)據(jù)庫中。要把這些控件與 Teacher表的相應(yīng)字段綁定在一起，還需設(shè)置這些控件的 DataSource屬性和 DataField屬性：把 DataSource屬性值設(shè)置為 Data控件名稱， DataField屬性值設(shè)置為字段名稱。 圖 914 例 92的程序設(shè)計界面 圖 915 例 92的程序運行界面 實現(xiàn)思路： 要瀏覽 CollegeMIS數(shù)據(jù)庫中的 Teacher表，可在窗體上放置一個Data控件，通過設(shè)置它的 Connection屬性連接到 SQL Server的 CollegeMIS數(shù)據(jù)庫，通過設(shè)置 RecordSource屬性使 Data控件和 Teacher表聯(lián)系在一起。 。 注意： 運行程序時，使用 Data控件上的箭頭按鈕可在記錄間移動，使用數(shù)據(jù)綁定控件可以查看或修改顯示出來的字段內(nèi)容。 注意： 如果設(shè)計時數(shù)據(jù)庫可用，則有效字段的列表將顯示在“屬性”窗口里的“ DataField‖屬性后面的列表框中，用戶可以從中選擇一個。 3． DataChanged屬性 該屬性用來指出顯示在數(shù)據(jù)綁定控件里的數(shù)據(jù)是否已經(jīng)被改變，如果改變了，值為 True，沒有改變，值為 False。 數(shù)據(jù)綁定控件的常用屬性 1． DataSource屬性 2． DataField屬性 數(shù)據(jù)源屬性，指定數(shù)據(jù)綁定控件需要綁定到的 Data控件各稱。 3． UpdateControls方法 該方法的作用是用記錄集的當(dāng)前記錄中的數(shù)據(jù)更新綁定控件的值，即把數(shù)據(jù)綁定控件中的數(shù)據(jù)恢復(fù)為修改前的原始值，相當(dāng)于用戶在更改了數(shù)據(jù)之后決定取消更改。 該方法的作用是用數(shù)據(jù)綁定控件中的數(shù)據(jù)去更新數(shù)據(jù)庫中的數(shù)據(jù)。 Data控件的常用方法 1． Refresh方法 2． UpdateRecord方法 該方法的作用是重讀數(shù)據(jù)庫，刷新記錄集，從而根據(jù)記錄集內(nèi)容而構(gòu)建的用戶界面也跟著刷新。 Data控件的常用屬性 6． EofAction屬性和 BofAction屬性 7． ReadOnly屬性 該屬性用來控制能否對記錄集中的數(shù)據(jù)進行修改操作。 ④當(dāng)創(chuàng)建或打開至少含有一個記錄的記錄集時，第一個記錄將成為當(dāng)前記錄，而且 Bof屬性和 Eof屬性的值均為 False。 ②當(dāng) Bof屬性或 Eof屬性的值成為 True之后，只有將指針移動到實際存在的記錄上， Bof屬性或 Eof屬性的值才會變?yōu)?False。 如果記錄指針位于最后一條記錄之后，則 Eof屬性值為 True，否則 Eof的值為 False。由 RecordSource確定的具體可訪問的數(shù)據(jù)構(gòu)成的記錄集（ Recordset）也是一個對象，該對象也具有屬性、方法和事件 。 Data控件的常用屬性 3． RecordSetType屬性 RecordSetType屬性用來確定記錄集類型，取值有： Table（表）、Dynaset（動態(tài)集）和 Snapshot（快照）。如果連接到只由一張表構(gòu)成的數(shù)據(jù)庫 (如 dBase、 FoxPro或 Paradox數(shù)據(jù)庫 )，則應(yīng)把該屬性值設(shè)置為對應(yīng)的子目錄名，在該子目錄下存放了數(shù)據(jù)庫文件。 2． DatabaseName屬性 DatabaseName屬性用來指定具體使用的數(shù)據(jù)庫。PWD=tah980808。Server=TAHSJ。使要訪問 SQL Server數(shù)據(jù)庫 CollegeMIS，可使用如下的連接字符串： ODBC。 Data控件的常用屬性 1． Connect屬性 Connect屬性指定數(shù)據(jù)庫類型，在該屬性名的后面有一個列表框，用戶可以直接從該列表框中選擇屬性值。 （ 8） OLE容器控件：顯示或修改 OLE對象類型字段的值。 （ 6）列表框：顯示一個列表，用來顯示或設(shè)