第11章SQL Server 2005應(yīng)用實(shí)例

1第11章SQLServer2005

應(yīng)用實(shí)例第11章SQLServer2005

應(yīng)用實(shí)例

11.1在Visual

Basic中訪問(wèn)

SQLServer2005

11.2Delphi+SQL

Server開(kāi)發(fā)

圖書(shū)管理系統(tǒng)2311.1

在Visual

Basic中訪問(wèn)

SQLServer200511.1.1使用ADO控件訪問(wèn)

SQLServer數(shù)據(jù)庫(kù)11.1.2使用ODBC連接SQLServer

數(shù)據(jù)庫(kù)411.1

在Visual

Basic中訪問(wèn)

SQLServer2005按照前幾章所講述的方法，在SQLServerManagementStudio(管理控制臺(tái))的“對(duì)象資源管理器”中創(chuàng)建數(shù)據(jù)庫(kù)TSGL；登錄數(shù)據(jù)庫(kù)用戶名和密碼，分別為sa和空密碼；創(chuàng)建“圖書(shū)管理系統(tǒng)”所需要的數(shù)據(jù)表：讀者表、圖書(shū)表和借閱表。表的具體結(jié)構(gòu)如表11-1～表11-3所示。5表11-1讀者表6表11-2圖書(shū)表7表11-3借閱表字

段數(shù)據(jù)類型長(zhǎng)

度是否允許空值備

注借書(shū)證號(hào)Int4否主鍵（外鍵）圖書(shū)編號(hào)Int4否主鍵（外鍵）借書(shū)時(shí)間smalldatetime4是還書(shū)時(shí)間smalldatetime4是8

使用ADO控件和ADO對(duì)象均可訪問(wèn)SQLServer數(shù)據(jù)庫(kù)，在此使用ADO控件，主要設(shè)置ConnectionString屬性，在連接資源中選擇“使用ODBC”數(shù)據(jù)源名稱，然后選擇相應(yīng)數(shù)據(jù)源名稱，即可訪問(wèn)SQLServer數(shù)據(jù)庫(kù)。11.1.1使用ADO控件訪問(wèn)

SQLServer數(shù)據(jù)庫(kù)9具體操作步驟如下：（1）啟動(dòng)VisualBasic6.0程序，新建一個(gè)標(biāo)準(zhǔn)工程，默認(rèn)名稱為“工程1”。在該工程中會(huì)自動(dòng)創(chuàng)建一個(gè)窗體，默認(rèn)名稱為Form1。（2）選擇“工程”菜單下的“部件”命令，在彈出的對(duì)話框中選擇MicrosoftADODataControl6.0（OLEDB）選項(xiàng)和MicrosoftDataGridControl6.0（OLEDB）選項(xiàng)，然后單擊“確定”按鈕，Adodc控件和DataGrid控件將被添加到工具箱中。（3）在Form1窗體上放置一個(gè)Adodc控件、一個(gè)DataGrid控件、一個(gè)CommandButton控件，設(shè)計(jì)的窗體如圖11-1所示。主要控件對(duì)象的屬性如表11-4所示。10圖11-1使用ADO控件設(shè)計(jì)界面11表11-4主要控件對(duì)象的屬性列表12

（4）設(shè)置Adodc1的ConnectionString屬性：?jiǎn)螕魧傩源翱谥蠧onnectionString屬性框右邊的省略號(hào)按鈕，將彈出如圖11-2所示的“屬性頁(yè)”對(duì)話框，選中“使用連接字符串”單選按鈕。單擊“生成”按鈕，彈出如圖11-3所示的“數(shù)據(jù)鏈接屬性”對(duì)話框。在此對(duì)話框中，在“提供程序”選項(xiàng)卡中（如圖11-3（a）所示）選擇MicrosoftOLEDBProviderforSQLServer選項(xiàng)；在“連接”選項(xiàng)卡中（如圖11-3（b）所示）的“選擇或輸入服務(wù)器名稱”下拉列表框中輸入“（local）”，在“用戶名稱”文本框中輸入sa，并選擇空白密碼；在“在服務(wù)器上選擇數(shù)據(jù)庫(kù)”下拉列表框中選擇TSGL數(shù)據(jù)庫(kù)。單擊“測(cè)試連接”按鈕，如果正確，則連接成功；如果不正確，系統(tǒng)會(huì)指出具體的錯(cuò)誤，應(yīng)該重新檢查配置的內(nèi)容是否正確。13圖11-2“屬性頁(yè)”對(duì)話框14圖11-3(a)數(shù)據(jù)鏈接屬性對(duì)話框15圖11-3(b)數(shù)據(jù)鏈接屬性對(duì)話框16

（5）設(shè)置RecordSource的屬性：?jiǎn)螕鬉dodc1屬性窗口中的RecordSource屬性框右邊的省略號(hào)按鈕，將出現(xiàn)如圖11-4（a）所示的“屬性頁(yè)”對(duì)話框。在“命令類型”下拉列表框中可以選擇“命令文本”方式、“表”方式或“存儲(chǔ)過(guò)程”方式；如果只是瀏覽數(shù)據(jù)表中的數(shù)據(jù)，可以設(shè)置RecordSource為讀者表（如圖11-4（a）所示）；如果程序中要對(duì)數(shù)據(jù)進(jìn)行動(dòng)態(tài)查詢，應(yīng)設(shè)置DataSource屬性為文本方式的SQL語(yǔ)句，如：select*from讀者，如圖11-4（b）所示。（6）運(yùn)行程序，結(jié)果如圖11-5所示。17圖11-4(a)設(shè)置RecordSource為讀者表18圖10-4(b)設(shè)置RecordSource為文本方式的SQL語(yǔ)句19圖11-5使用ADO控件訪問(wèn)SQLServer數(shù)據(jù)庫(kù)運(yùn)行結(jié)果20

ODBC即開(kāi)放式數(shù)據(jù)庫(kù)連接，是數(shù)據(jù)庫(kù)服務(wù)器的一個(gè)標(biāo)準(zhǔn)協(xié)議。利用它可以在應(yīng)用程序里連接多種類型的數(shù)據(jù)庫(kù)系統(tǒng)，對(duì)于不同的數(shù)據(jù)庫(kù)就要求使用不同的驅(qū)動(dòng)程序，所以在使用ODBC時(shí)，應(yīng)根據(jù)數(shù)據(jù)庫(kù)類型的不同選擇不同的DSN選項(xiàng)。11.1.2使用ODBC連接

SQLServer數(shù)據(jù)庫(kù)21具體操作步驟如下：（1）選擇“控制面板”中“管理工具”的“ODBC”數(shù)據(jù)源，打開(kāi)“ODBC數(shù)據(jù)源管理器”對(duì)話框，如圖11-6所示。單擊“添加”按鈕來(lái)添加一個(gè)數(shù)據(jù)源。（2）單擊“添加”按鈕后，系統(tǒng)將準(zhǔn)備添加一個(gè)用戶數(shù)據(jù)源。為了安裝數(shù)據(jù)源，會(huì)彈出“創(chuàng)建新數(shù)據(jù)源”對(duì)話框，如圖11-7所示。22圖11-6“ODBC數(shù)據(jù)源管理器”對(duì)話框23圖11-7“創(chuàng)建新數(shù)據(jù)源”對(duì)話框24（3）在“創(chuàng)建新數(shù)據(jù)源”對(duì)話框中，選擇SQLServer選項(xiàng)后，單擊“完成”按鈕，進(jìn)入“創(chuàng)建到SQLServer的新數(shù)據(jù)源”對(duì)話框，如圖11-8所示。在“名稱”文本框中輸入新的數(shù)據(jù)源名，這里輸入TSGL作為新的數(shù)據(jù)源名稱。在“描述”文本框中輸入對(duì)數(shù)據(jù)源的描述，可以為空。在“服務(wù)器”下拉列表框中輸入想要連接的SQLServer服務(wù)器。如果要連接的服務(wù)器是安裝在本機(jī)上的，那么可以選擇local選項(xiàng)。25圖11-8“創(chuàng)建到SQLServer的新數(shù)據(jù)源”對(duì)話框26（4）單擊“完成”按鈕，將完成新數(shù)據(jù)源的配置。單擊“下一步”按鈕將進(jìn)行下一步的配置工作，在“創(chuàng)建到SQLServer的新數(shù)據(jù)源”對(duì)話框中，輸入相應(yīng)登錄的用戶名（sa）和密碼，如圖11-9（a）所示。（5）單擊“下一步”按鈕，將會(huì)出現(xiàn)如圖11-9（b）所示的對(duì)話框，在“更改默認(rèn)的數(shù)據(jù)庫(kù)為”下拉列表框中，選擇所需要的SQLServer數(shù)據(jù)庫(kù)（如TSGL）。27圖11-9(a)“創(chuàng)建到SQLServer的新數(shù)據(jù)源”對(duì)話框28圖11-9(b)“創(chuàng)建到SQLServer的新數(shù)據(jù)源”對(duì)話框29（6）在圖11-9（b）所示對(duì)話框中，單擊“下一步”按鈕，將出現(xiàn)如圖11-10所示的對(duì)話框，在該對(duì)話框中，單擊“完成”按鈕，將出現(xiàn)“SQLServerODBC數(shù)據(jù)源測(cè)試”對(duì)話框，單擊“測(cè)試數(shù)據(jù)源”按鈕，如果測(cè)試正確，則連接成功，如圖11-11所示；如果測(cè)試不正確，系統(tǒng)會(huì)指出具體的錯(cuò)誤，用戶應(yīng)該重新檢查配置的內(nèi)容是否正確。30圖11-10“創(chuàng)建到SQLServer的新數(shù)據(jù)庫(kù)”對(duì)話框31圖11-11“SQLServerODBC數(shù)據(jù)源測(cè)試”對(duì)話框3211.2Delphi+SQL

Server開(kāi)發(fā)

圖書(shū)管理系統(tǒng)11.2.1數(shù)據(jù)庫(kù)設(shè)計(jì)11.2.2前臺(tái)界面應(yīng)用程序設(shè)計(jì)3311.2.1數(shù)據(jù)庫(kù)設(shè)計(jì)按照前幾章所講述的方法，建立數(shù)據(jù)庫(kù)TSGL。登錄數(shù)據(jù)庫(kù)用戶名和密碼（分別為sa和空密碼）。在數(shù)據(jù)庫(kù)TSGL中創(chuàng)建、生成系統(tǒng)所需要的數(shù)據(jù)表：“讀者”表、“圖書(shū)”表、“借閱”表，各個(gè)表的具體結(jié)構(gòu)如表11-1～表11-3所示。3411.2.2前臺(tái)界面應(yīng)用程序設(shè)計(jì)1．設(shè)計(jì)主窗體主窗體是各功能模塊的入口，主窗體名為frm_main，設(shè)計(jì)界面如圖11-12所示。在該圖中，放置了兩個(gè)panel和5個(gè)SpeedButton，分別設(shè)置Caption屬性，分別為5個(gè)按鈕添加單擊事件。各按鈕的功能和代碼如下：①“新書(shū)入庫(kù)”按鈕用于打開(kāi)新書(shū)入庫(kù)管理窗口。為它添加OnClick事件，并添加如下代碼：Frm_xsrk.ShowModal;35圖11-12設(shè)計(jì)圖書(shū)管理系統(tǒng)界面36②“辦理借書(shū)證”按鈕用于打開(kāi)辦理借書(shū)證管理窗口。為它添加OnClick事件，并添加如下代碼：Frm_jsz.ShowModal;③“圖書(shū)借還”按鈕用于打開(kāi)借閱管理窗口。為它添加OnClick事件，并添加如下代碼：Frm_tsjh.ShowModal;④“查詢管理”按鈕用于打開(kāi)借書(shū)證信息、借閱查詢窗口。為它添加OnClick事件，并添加如下代碼：Frm?_cx.ShowModal;⑤“退出”按鈕用于關(guān)閉主窗口。為它添加OnClick事件，并添加如下代碼：close;372．創(chuàng)建數(shù)據(jù)模塊窗口在應(yīng)用程序中，對(duì)于一些經(jīng)常使用的表、SQL語(yǔ)句，可以放在數(shù)據(jù)模塊中，易于不同的模塊引用。創(chuàng)建數(shù)據(jù)模塊的操作步驟如下：（1）選擇File菜單中New下的DataModule命令，新建一個(gè)數(shù)據(jù)模塊窗體，窗體名為DataModule1。（2）為窗體添加一個(gè)ADOConnection控件，如圖11-13所示。38圖11-13添加ADOConnestion控件39（3）設(shè)置ADOConnection1的ConnectionString屬性：Delphi與SQLServer2000的連接方式有多種方式，在此僅介紹使用ADO訪問(wèn)數(shù)據(jù)庫(kù)的方法，即使用ADOConnection組件，最主要的參數(shù)是ConnectionString，這個(gè)屬性是多個(gè)字符串的集合。設(shè)置ConnectionString屬性可以使用“連接字符串編輯器”來(lái)實(shí)現(xiàn)。40具體操作步驟如下：①單擊“對(duì)象觀察器”中ConnectionString屬性框右邊的“省略號(hào)”按鈕，將彈出如圖11-14所示的窗口，選擇UseConnectionString單選按鈕。②單擊Build按鈕，打開(kāi)“數(shù)據(jù)鏈接屬性”對(duì)話框，如圖11-15（a）所示。在該對(duì)話框中，由于要連接SQLServer數(shù)據(jù)庫(kù)，所以選擇MicrosoftOLEDBProviderforSQLServer選項(xiàng)。41圖11-14設(shè)置連接字符串窗口42圖11-15(a)“數(shù)據(jù)鏈接屬性”對(duì)話框43③單擊“下一步”按鈕，將出現(xiàn)如圖11-15（b）所示的“數(shù)據(jù)鏈接屬性”對(duì)話框，在此對(duì)話框可以確定數(shù)據(jù)源。如果是本地?cái)?shù)據(jù)庫(kù)，就選擇local選項(xiàng)，然后再輸入用戶名（sa）和密碼（空），數(shù)據(jù)庫(kù)名為TSGL。④然后單擊“測(cè)試連接”按鈕，如果連接成功，可以看到“測(cè)試成功提示”對(duì)話框，依次單擊“確定”按鈕，即可完成ConnectionString參數(shù)設(shè)置。44圖11-15(b)“數(shù)據(jù)鏈接屬性”對(duì)話框453．創(chuàng)建“新書(shū)入庫(kù)”管理窗口“新書(shū)入庫(kù)”管理窗口對(duì)應(yīng)的單元文件為Uxsxx，窗體名為Frm_xsxx，設(shè)計(jì)窗體如圖11-16所示。整個(gè)界面分為3個(gè)部分，第1部分用來(lái)錄入入庫(kù)圖書(shū)信息；第2部分用來(lái)瀏覽庫(kù)內(nèi)圖書(shū)的相關(guān)信息；第3部分按鈕主要用來(lái)實(shí)現(xiàn)清空、入庫(kù)、刪除、修改記錄等操作。主要控件及屬性設(shè)置如表11-5所示。46圖11-16“新書(shū)入庫(kù)”管理界面設(shè)計(jì)47表11-5主要控件及屬性設(shè)置48

⑴在窗體的FormShow事件添加代碼：（2）在“入庫(kù)”按鈕的單擊事件中加入代碼，以實(shí)現(xiàn)新圖書(shū)入庫(kù)的功能。

⑶在“修改”按鈕的單擊事件中加入代碼，以實(shí)現(xiàn)對(duì)錄入圖書(shū)信息的修改功能。（4）在“刪除”按鈕的單擊事件中加入代碼，以實(shí)現(xiàn)刪除圖書(shū)的功能。（5）為了實(shí)現(xiàn)當(dāng)前記錄發(fā)生變化時(shí)，用于顯示和編輯的控件內(nèi)容能動(dòng)態(tài)發(fā)生變化，在DataSource1的DataSource1DataChange中添加代碼。（6）為了防止在錄入圖書(shū)單價(jià)時(shí)誤輸入非數(shù)值型數(shù)據(jù)，可在Edt_price的KeyPress中添加代碼。（7）在“關(guān)閉”按鈕的單擊事件中加入代碼。具體代碼見(jiàn)教材P197－201494．創(chuàng)建“辦理借書(shū)證”管理窗口“辦理借書(shū)證”窗口同“新書(shū)入庫(kù)”窗口類似，對(duì)應(yīng)于單元U_jsz，設(shè)計(jì)的窗體如圖11-17所示。（1）窗體名為Frm_jsz，主要控件及其屬性如表11-6所示。50圖11-17“辦理借書(shū)證”窗體設(shè)計(jì)界面51表11-6主要控件及屬性設(shè)置52（2）在“辦理”按鈕的單擊事件中添加如下代碼，以實(shí)現(xiàn)插入記錄的功能。（3）為了防止在錄入借書(shū)證號(hào)時(shí)誤輸入非數(shù)值型數(shù)據(jù)，可在Edt_card的KeyPress中添加如下代碼。具體代碼見(jiàn)教材P201－203535．創(chuàng)建“借還書(shū)管理窗口”這個(gè)