用VB進(jìn)行CS結(jié)構(gòu)數(shù)據(jù)庫應(yīng)用程序開發(fā)專題培訓(xùn)課件

第14章用VB進(jìn)行C/S結(jié)構(gòu)數(shù)據(jù)庫開發(fā)

14.1C/S體系結(jié)構(gòu)介紹14.2VisualBasic訪問SQLServer數(shù)據(jù)庫概述14.3用VisualBasic開發(fā)C/S結(jié)構(gòu)的圖書管理系統(tǒng)

14.4本章小結(jié)14.1C/S體系結(jié)構(gòu)介紹

數(shù)據(jù)庫應(yīng)用結(jié)構(gòu)是指數(shù)據(jù)庫運(yùn)行的軟、硬件環(huán)境。通過這個環(huán)境，用戶可以訪問數(shù)據(jù)庫中的數(shù)據(jù)。四種最常見的應(yīng)用結(jié)構(gòu)：集中式結(jié)構(gòu)文件服務(wù)器結(jié)構(gòu)客戶/服務(wù)器結(jié)構(gòu)互聯(lián)網(wǎng)應(yīng)用結(jié)構(gòu)集中式應(yīng)用結(jié)構(gòu)優(yōu)點(diǎn)是可以實(shí)現(xiàn)集中管理，安全性好。缺點(diǎn)是費(fèi)用昂貴，不能真正劃分應(yīng)用程序的邏輯。應(yīng)用程序數(shù)據(jù)庫大型機(jī)按鍵信息終端字符終端1終端N終端2客戶端文件服務(wù)器結(jié)構(gòu)優(yōu)點(diǎn)在于實(shí)現(xiàn)的費(fèi)用比較低廉，而且配置非常靈活。缺點(diǎn)是，由于所有的應(yīng)用處理都要在客戶端完成，要經(jīng)常在網(wǎng)絡(luò)上傳送大量無用的數(shù)據(jù).因此客戶端的個人計(jì)算機(jī)必須要有足夠的能力。例如Foxpro.應(yīng)用程序數(shù)據(jù)庫網(wǎng)絡(luò)文件服務(wù)器文件文件請求工作站1工作站N工作站2客戶端應(yīng)用程序應(yīng)用程序客戶/服務(wù)器結(jié)構(gòu)優(yōu)點(diǎn)：應(yīng)用程序或應(yīng)用邏輯可以根據(jù)需要劃分在服務(wù)器和客戶工作站中，在完成一個特定任務(wù)時(shí),客戶端工作站上的程序和服務(wù)器上的程序可以協(xié)同工作,同時(shí)極大地減少了網(wǎng)絡(luò)流量。應(yīng)用程序數(shù)據(jù)庫服務(wù)器數(shù)據(jù)請求結(jié)果工作站1工作站N工作站2客戶端應(yīng)用程序應(yīng)用程序互聯(lián)網(wǎng)應(yīng)用結(jié)構(gòu)優(yōu)點(diǎn)：最終用戶應(yīng)用軟件的安裝和維護(hù)都非常簡單，客戶端不再需要安裝、配置應(yīng)用軟件的工作。這些工作只需在Web服務(wù)器上完成，從而減少客戶端與服務(wù)器端軟件配置的不一致以及不同版本應(yīng)用軟件所帶來的問題。客戶端應(yīng)用程序數(shù)據(jù)庫數(shù)據(jù)庫服務(wù)器頁面請求頁面?zhèn)€人機(jī)1個人機(jī)N個人機(jī)2數(shù)據(jù)請求結(jié)果Web服務(wù)器瀏覽器瀏覽器瀏覽器14.2VisualBasic訪問SQLServer數(shù)據(jù)庫概述14.2.1VisualBasic訪問SQLServer數(shù)據(jù)庫的方式14.2.2VisualBasic中的數(shù)據(jù)庫訪問控件14.2.3使用ADO訪問SQLServer數(shù)據(jù)庫的一般步驟14.2.1VisualBasic訪問SQLServer數(shù)據(jù)庫的方式（1）DAO/Jet方式

（2）ODBCAPI編程方式（3）使用VBSQL對DBLibAPI編程（4）使用RDO對象（5）使用ADO對象14.2.2VisualBasic中的數(shù)據(jù)庫訪問控件這些控件分為兩大類：一類是提供數(shù)據(jù)源的控件.例如Data控件、RemoteData控件(RDC)、ADOData控件等，它們用來快速建立到某個數(shù)據(jù)表或查詢的連接；另一類是用來顯示數(shù)據(jù)源內(nèi)容的控件,例如DataGrid、DataList、DBGrid以及文本框例、復(fù)選框、組合框、圖像、標(biāo)簽、列表框、圖片框等“數(shù)據(jù)綁定控件”,這類控件通過DataSource屬性連接到數(shù)據(jù)源，然后顯示該數(shù)據(jù)源的內(nèi)容，并允許用戶對內(nèi)容進(jìn)行添、刪、改、查等操作。

14.2.2VisualBasic中的數(shù)據(jù)庫訪問控件（1）ADOData控件ADO數(shù)據(jù)控件是目前流行的數(shù)據(jù)訪問控件，它支持OLEDB數(shù)據(jù)訪問模型。使用ADO數(shù)據(jù)訪問控件，除了可以訪問大型關(guān)系型數(shù)據(jù)庫管理系統(tǒng)和小型個人數(shù)據(jù)庫管理系統(tǒng)。ADO數(shù)據(jù)控件是ActiveX控件，需要手工將其添加到工具箱中。選擇“工程”菜單下的“部件”Adodc控件在窗體上的形式在ADOData控件的屬性窗口中，選擇（自定義）屬性后的‘…’按鈕,打開”屬性頁”對話框.在”通用”頁面中選擇”使用ODBC數(shù)據(jù)資源名稱”,并在下拉列表框中選擇Mysql.單擊”身份驗(yàn)證”選項(xiàng)卡,輸入SA及密碼.單擊”記錄源”選項(xiàng)卡,選擇命令類型為8-adCmdUnknown,在命令文本中輸入:SELECT*FROMXSORDERBYXH設(shè)置完成后單擊”確定”按鈕.ADO數(shù)據(jù)控件的主要屬性、方法和事件ConnectionString屬性

用于建立與數(shù)據(jù)源的連接CommandType屬性

指明命令的類型，共有四種RecordSource屬性

用于設(shè)置ADO結(jié)果集的內(nèi)容MaxRecords屬性

決定結(jié)果集中的記錄的最大數(shù)目Recordset屬性

用于存放從數(shù)據(jù)提供者那里獲得的查詢結(jié)果ConnectionString屬性單擊ADO數(shù)據(jù)控件屬性頁中的“ConnectionString”屬性，然后單擊按鈕CommandType屬性adCmdUnknown：默認(rèn)值。表示RecordSource中的命令類型未知。adCmdTable：RecordSource屬性的內(nèi)容是一個表名。adCmdText：RecordSource屬性的內(nèi)容是一個查詢語句文本串。adCmdStoredProc：RecordSource屬性的內(nèi)容是一個存儲過程名。RecordSource屬性用于設(shè)置ADO結(jié)果集的內(nèi)容.這個內(nèi)容可以來自于一張表，也可以來自一個查詢語句，也可以來自一個存儲過程的執(zhí)行結(jié)果。RecordSource屬性的值與CommandType屬性的值有關(guān)，兩者協(xié)同使用。設(shè)置RecordSource屬性在已經(jīng)設(shè)置好ConnectionString屬性的ADO數(shù)據(jù)控件上右擊鼠標(biāo)，在彈出的菜單中選擇“ADODC屬性”命令，在彈出此對話框上選擇“記錄源”標(biāo)簽頁。DataGrid控件（2）DataGrid控件ADOData控件本身都不能顯示數(shù)據(jù)庫記錄，它們必須與“數(shù)據(jù)綁定控件”配合使用，才能在窗體中顯示數(shù)據(jù)庫記錄的內(nèi)容。DataGrid控件就是一種簡單易用且功能強(qiáng)大的“數(shù)據(jù)綁定控件”。DataGrid控件具體方法是在VisualBasic主菜單中選擇“工程／部件”命令，在部件對話框中找到MicrosoftDataGridControl6.0(OLEDB)一項(xiàng)并選中它，單擊“確定”按鈕之后，DataGrid控件就添加到VisualBasic的工具箱中了。DataGrid控件DataGrid控件的主要屬性有：DataSource屬性：設(shè)置與DataGrid關(guān)聯(lián)的數(shù)據(jù)源。AllowAddNew屬性：是否允許增加新記錄。AllowDelete屬性：是否允許刪除記錄。AllowUpdate屬性：是否允許修改記錄。AllowArrows屬性：是否允許在運(yùn)行時(shí)利用光標(biāo)鍵來移動網(wǎng)格的輸入焦點(diǎn)。14.2.3使用ADO訪問SQLServer數(shù)據(jù)庫ADO是VisualBasic訪問數(shù)據(jù)庫的主流技術(shù)。使用ADO訪問SQLServer數(shù)據(jù)庫有兩種主要形式：ADOData控件（即ADODC）和ADO對象編程模型（即ADO代碼）。這兩種方式可以單獨(dú)使用，也可以同時(shí)使用。14.2.3使用ADO訪問SQLServer數(shù)據(jù)庫（1）使用ADOData控件訪問SQLServer數(shù)據(jù)庫該方法優(yōu)點(diǎn)是代碼少，一個簡單的數(shù)據(jù)庫應(yīng)用程序甚至可以不用編寫任何代碼。它的缺點(diǎn)是功能簡單，不夠靈活，不能滿足較復(fù)雜的數(shù)據(jù)庫應(yīng)用程序的需要。見演示示例14.2.3使用ADO訪問SQLServer數(shù)據(jù)庫ADO數(shù)據(jù)控件是ActiveX控件，需要手工將其添加到工具箱中。選擇“工程”菜單下的“部件”在ADOData控件的屬性窗口中，選擇（自定義）屬性后的‘…’按鈕,打開”屬性頁”對話框.在”通用”頁面中選擇”使用ODBC數(shù)據(jù)資源名稱”,并在下拉列表框中選擇Mysql.單擊”身份驗(yàn)證”選項(xiàng)卡,輸入SA及密碼.單擊”記錄源”選項(xiàng)卡,選擇命令類型為8-adCmdUnknown,在命令文本中輸入:SELECT*FROMXSORDERBYXH設(shè)置完成后單擊”確定”按鈕.14.2.3使用ADO訪問SQLServer數(shù)據(jù)庫（2）使用ADO對象模型訪問SQLServer數(shù)據(jù)庫該方法的優(yōu)點(diǎn)是具有高度的靈活性，可以編寫復(fù)雜的數(shù)據(jù)庫應(yīng)用程序。它的缺點(diǎn)是代碼編寫量較大，對初學(xué)者來說有一定困難。使用ADO對象模型訪問SQLServer數(shù)據(jù)庫ADO對象模型各對象作用Connection對象包含了與數(shù)據(jù)源連接的信息。Command對象包含了與一個命令相關(guān)的信息。Recordset對象包含了從數(shù)據(jù)源得到的記錄集。Field對象包含了記錄集中的某個記錄的字段信息。Property對象：ADO對象的屬性。Parameter對象：與命令對象相關(guān)的參數(shù)。Error對象：包含了由數(shù)據(jù)源產(chǎn)生的Errors集合中的擴(kuò)展的錯誤信息。見例題Connection對象表示一個OLEDB數(shù)據(jù)源的開放式連接。是ADO對象模型的基礎(chǔ)。在使用ADO對象模型編程之前，必須先引用ADO對象模型。方法為：在VB的“工程”菜單下選擇“引用”命令，然后在打開的窗口中選擇“MicrosoftActiveXDataObjects2.×Library”選項(xiàng)（其中“×”代表機(jī)器上所安裝的版本號）。Connection對象的主要屬性ConnectionString用于指定連接到的數(shù)據(jù)源名稱，使用方法及含義同ADO數(shù)據(jù)控件。Provider連接中使用的OLEDB提供者。ConnectionTimeout執(zhí)行Open方法之后等待建立連接的秒數(shù)，默認(rèn)為15秒。0表示無限期等待。State表示Connection對象是打開還是關(guān)閉的常量。Connection對象的主要方法Open：打開帶有數(shù)據(jù)源的連接，即真正的建立起到數(shù)據(jù)源的物理連接。Close：關(guān)閉一個打開的與數(shù)據(jù)源的連接，即終止與數(shù)據(jù)源的連接。Execute：在沒有創(chuàng)建Command對象的情況下執(zhí)行連接中的一個命令。BeginTrans：開始一個事務(wù)。CommitTrans：

提交一個事務(wù)。RollbackTrans：回滾一個事務(wù)Connection對象的主要事件ExecuteComplete：連接中的命令被執(zhí)行后發(fā)生的動作。BeginTransComplete：在BeginTrans方法完成后發(fā)生的動作。RollbackTransComplete：當(dāng)RollbackTrans操作完成時(shí)發(fā)生的動作。WillConnect：在試圖連接到數(shù)據(jù)源之前發(fā)生的動作。WillExecute：試圖在連接中執(zhí)行一條命令前發(fā)生的動作。Connection對象的主要集合ErrorsError對象的集合。Properties描述連接的Property對象集合。使用Connection對象（1）設(shè)置ConnectionString連接屬性DimadoCnAsADODB.ConnectionSetadoCn=NewADODB.Connection'使用ODBC數(shù)據(jù)源連接數(shù)據(jù)庫adoCn.ConnectionString="DNS=ODBC_DSN;UID=LoginID;PWD=password"'使用OLEDB提供者連接數(shù)據(jù)庫adoCn.ConnectionString="Provider=SQLOLEDB.1;UserID=LoginID;InitialCatalog=Pubs;DataSource=DB_Server_Name"使用Connection對象（2）使用Open方法建立連接Open方法用于打開連接：adoCn.Open（3）使用Close方法斷開連接

用于關(guān)閉一個打開的Connection對象，即斷開與數(shù)據(jù)源的連接。adoCn.CloseCommand對象Command對象代表對數(shù)據(jù)源執(zhí)行的命令。使用Command命令可以查詢數(shù)據(jù)，并將查詢結(jié)果返回給RecordSet對象。Command對象的主要屬性ActiveConnection：指定當(dāng)前使用的連接。CommandText：命令的文本表達(dá)（SQL語句、存儲過程名和表名）。CommandType：指定要執(zhí)行的命令的類型，與CommandText屬性的內(nèi)容對應(yīng)。取值如下：CmdText：指定CommandText的內(nèi)容是一個SQL語句。adCmdTable：指定CommandText的內(nèi)容是一個表名。adCmdStoredProc：指定CommandText的內(nèi)容是一個存儲過程名。adCmdUnknown：默認(rèn)值，表示命令類型未知。Command對象的主要屬性CommandTimeout數(shù)據(jù)源作出響應(yīng)的最長等待秒數(shù)。Name

表示Command對象的字符串。State

表示對象是打開、關(guān)閉、正在執(zhí)行某一命令和獲取記錄時(shí)的狀態(tài)常量，其取值同Connection對象的State屬性。Command對象的主要方法

Excute

執(zhí)行CommandText屬性中指定的命令并返回由此生成的記錄集。CreateParameter創(chuàng)建一個與命令相關(guān)的新的參數(shù)對象。Command對象的主要集合Parameters與Command對象相關(guān)的Parameter對象的集合。Properties描述Command對象相關(guān)的Property對象的集合。使用Command對象'聲明對象DimadoCnAsADODB.ConnectionDimadoCmAsADODB.Command'建立連接SetadoCn=NewADODB.ConnectionadoCn.ConnectionString="Provider=SQLOLEDB.1;UserID=LoginID;"_&"InitialCatalog=pubs;DataSource=DB_Server_Name"adoCn.Open使用Command對象'執(zhí)行命令SetadoCm=NewADODB.CommandSetadoCm.ActiveConnection=adoCnadoCm.CommandText="select*fromauthors"adoCm.Execute'使用Command對象名執(zhí)行命令adoCm.Name="SelAuthors"SetadoCm.ActiveConnection=adoCnadoCm.CommandText="select*fromauthors"adoCn.SelAuthors'用名字執(zhí)行命令Recordset對象代表從數(shù)據(jù)提供者那里獲取的數(shù)據(jù)記錄集。Recordset對象的主要功能包括：建立記錄集；確定要操作的記錄集中的記錄；通過移動指針瀏覽記錄；對記錄集中的數(shù)據(jù)執(zhí)行更改操作；對記錄集中的數(shù)據(jù)進(jìn)行過濾。Recordset對象的主要屬性AbsolutePosition：記錄集中當(dāng)前記錄的順序位置。ActiveCommand：記錄集中創(chuàng)建的命令。ActiveConnection：記錄集中創(chuàng)建的連接。BOF：如果當(dāng)前行移動到記錄集的第一條記錄的前邊，則為真。EOF：如果當(dāng)前行移動到記錄集的最后一行記錄的后邊，則為真。Bookmark：記錄集中當(dāng)前記錄的唯一標(biāo)識。DataSource：指定要綁定的數(shù)據(jù)源。Recordset對象的主要屬性EditMode：表示當(dāng)前記錄是否正在被編輯，這個值可以是adEditNone、adEditInProgress、adEditAdd和adEditDelete。Filter：允許用戶選擇記錄集中的部分?jǐn)?shù)據(jù)進(jìn)行操作。其使用方法為：Recordset對象名.Filter=選擇表達(dá)式其中“選擇表達(dá)式”的寫法同SELECT語句中的WHERE子句。釋放過濾的語句為：Recordset對象名.Filter=adFilterNoneRecordset對象的主要屬性MaxRecords：記錄集中能返回的最多記錄數(shù)。RecordCount：記錄集中記錄的個數(shù)。如果ADO不能判斷記錄集有多少條記錄，可以返回adUnknown(-1)。Sort：將記錄集按指定字段排序。Source：記錄集來源的命令和SQL查詢。CursorLocation：描述記錄集中使用的游標(biāo)的位置的常量。CursorType：描述記錄集中使用的游標(biāo)類型的常量。LockType：控制編輯過程中設(shè)置的加鎖類型。Recordset對象的主要方法AddNew：向記錄集中添加一條新記錄。CancelUpdat：取消對數(shù)據(jù)的修改。Close：關(guān)閉記錄集。Delete：刪除當(dāng)前記錄。Find：查找符合某些規(guī)則的記錄。 Move：將當(dāng)前記錄的位置移動一定的間隔。Recordset對象的主要方法

MoveFirst：移動到第一條記錄。MoveLast：移動到最后一條記錄MoveNext：移動到下一條記錄。MovePrevious：移動到上一條記錄Open：打開一個記錄集。Update：當(dāng)Edit和AddNew方法完成后要執(zhí)行的方法。UpdateBatch：在一個游標(biāo)中當(dāng)批量處理完成后要執(zhí)行的方法。Recordset對象的主要事件

EndOfRecordset當(dāng)記錄集中因沒有更多的記錄，而引起MoveNext方法執(zhí)行失敗時(shí)產(chǎn)生的事件。FieldChangeComplete

當(dāng)字段中的值被改變后產(chǎn)生的事件。RecordsetChangeComplete當(dāng)對記錄集所做的修改被執(zhí)行時(shí)產(chǎn)生的事件。Recordset對象的主要事件WillChangeField

一個Field對象的值被改變前產(chǎn)生的事件。WillChangeRecord

一個列被改變之前產(chǎn)生的事件。WillChangeRecordset

記錄集中的修改都完成前產(chǎn)生的事件。WillMove

記錄指針重新定位前產(chǎn)生的事件。Recordset對象的集合Recordset對象包含的集合是Fields，它是記錄集中的字段集合。使用Recordset對象的步驟（1）打開記錄集使用Command對象的Execute方法創(chuàng)建Recordset對象：SetadoRecordset=adoCommand.Execute使用Connection對象的Execute方法創(chuàng)建Recordset對象：SetadoRecordset=adoConnection.Execute("select*fromauthors")直接使用Recordset對象的Open方法創(chuàng)建Recordset對象：adoRecordset.OpenRecordset對象的Open方法語法格式為：Recordset.OpenSource,ActiveConnection,CursorType,LockType,Options所有這些選項(xiàng)都是可選的，可以在調(diào)用Open方法之前，通過設(shè)置這些選項(xiàng)對應(yīng)的屬性來設(shè)置其值。Source選項(xiàng)指定了要從哪里獲取數(shù)據(jù)，其有：一個返回記錄的Command對象。SQL語句。表名。存儲過程名。Open方法的一些選項(xiàng)ActiveConnection選項(xiàng)指定了要使用的ADO連接，這個選項(xiàng)可以是一個已打開的Connection對象，也可以是一個連接字符串。Options選項(xiàng)為提供者提供了附加信息。這些選項(xiàng)包括：adCmdUnknown：默認(rèn)值。不向提供者提供附加信息。adCmdText：告訴提供者CommandText屬性是文本命令。adCmdTable：是表的名字。adCmdStoredProc：是存儲過程名。adCmdFile：是一個文件名。Field對象Field對象表示記錄集中數(shù)據(jù)的某個單獨(dú)的列。一旦獲得了記錄集，通常接下來就是使用Fields集合來讀取記錄集中的數(shù)據(jù)。由于Fields集合是Recordset對象的默認(rèn)屬性，因此，在使用時(shí)可以省略此名稱。例如：Recordset.Fields(0).ValueRecordset(0)Field對象的主要屬性ActualSize

字段中實(shí)際存儲的數(shù)據(jù)尺寸。DefinedSize

字段能存儲的最大數(shù)據(jù)量。Name

字段的名稱。NumericScale

十進(jìn)制小數(shù)點(diǎn)右邊的位數(shù)。Field對象的主要屬性O(shè)riginalValue

在其他用戶改變字段之前字段的值。Precision

十進(jìn)制小數(shù)的精度。Type

描述字段的數(shù)據(jù)類型的常量。Value

字段中存儲的數(shù)據(jù)。14.3用VisualBasic開發(fā)C/S結(jié)構(gòu)的圖書管理系統(tǒng)14.3.1需求分析14.3.2功能流程設(shè)計(jì)14.3.3數(shù)據(jù)庫設(shè)計(jì)

14.3.4創(chuàng)建數(shù)據(jù)庫14.3.5VisualBasic代碼編寫與調(diào)試14.3.6打包發(fā)行14.3.1需求分析運(yùn)用VisualBasic語言和SQLServer2005數(shù)據(jù)庫開發(fā)一個基于C/S結(jié)構(gòu)的圖書管理系統(tǒng)。使用該系統(tǒng)，圖書管理員可以方便地對圖書信息和讀者信息進(jìn)行管理；讀者可以方便地查找自己想要的書籍。14.3.2功能流程設(shè)計(jì)（1）功能設(shè)計(jì)：本系統(tǒng)將根據(jù)角色分配權(quán)限，將整個系統(tǒng)分為兩個子系統(tǒng)：管理員子系統(tǒng)和讀者子系統(tǒng)（2）流程設(shè)計(jì)：系統(tǒng)使用同一的登錄界面，根據(jù)用戶輸入的用戶名和密碼自動識別其身份是管理員還是讀者，然后進(jìn)入相應(yīng)的子系統(tǒng)，并提供相應(yīng)的功能服務(wù)。14.3.3數(shù)據(jù)庫設(shè)計(jì)（1）E-R圖和數(shù)據(jù)字典14.3.3數(shù)據(jù)庫設(shè)計(jì)（2）數(shù)據(jù)表結(jié)構(gòu)設(shè)計(jì)讀者信息表的結(jié)構(gòu)列名數(shù)據(jù)類型長度是否允許為空約束條件證號int20否主鍵