【導(dǎo)讀】應(yīng)用程序設(shè)計(jì)的工作。數(shù)據(jù)庫(kù)的關(guān)系，闡明了局域網(wǎng)的概念。并對(duì)數(shù)據(jù)庫(kù)的體系結(jié)構(gòu)、DBMS進(jìn)行了介紹。語(yǔ)言作了一個(gè)介紹說(shuō)明；最后通過(guò)兩個(gè)例子介紹了用PowerScript語(yǔ)言調(diào)用SQL的方式。塊劃分，并通過(guò)ER圖對(duì)數(shù)據(jù)庫(kù)進(jìn)行概念設(shè)計(jì)、用MicrosoftAccess對(duì)數(shù)據(jù)庫(kù)進(jìn)行邏輯設(shè)計(jì)。第五章是對(duì)局域網(wǎng)圖書(shū)資料查詢(xún)系統(tǒng)的具體設(shè)計(jì)。描述了整個(gè)系統(tǒng)詳細(xì)的功能模塊劃分，描述了?，F(xiàn)過(guò)程，并對(duì)設(shè)計(jì)源代碼進(jìn)行了注釋分析。SQL語(yǔ)言的操作特性，靈活運(yùn)用數(shù)據(jù)窗口技術(shù)、以及PB的控件技術(shù)等，提高了程序設(shè)計(jì)質(zhì)量。已形成相當(dāng)規(guī)模的理論體系和實(shí)用技術(shù)。優(yōu)秀的數(shù)據(jù)庫(kù)設(shè)計(jì)是應(yīng)用成功的基石。級(jí)結(jié)構(gòu)有時(shí)也稱(chēng)為“三級(jí)模式結(jié)構(gòu)”。全局視圖的描述稱(chēng)為“概念模式”。DBMS的主要目標(biāo)，是使數(shù)據(jù)作為一種可管理的資源處理。式、內(nèi)模式及基相互之間的映象，定義數(shù)據(jù)的完整性、安全控制等約束。因此，在DBMS中應(yīng)包。DBMS對(duì)數(shù)據(jù)庫(kù)的保護(hù)主要通過(guò)四個(gè)方面實(shí)現(xiàn)：

　　

【正文】 資料下載中心 (收集 \整理 . 大量免費(fèi)資源共享 ) 第 20 頁(yè) 共 32 頁(yè) 3)消除沖突 沖突分為三類(lèi)：屬性沖突、結(jié)構(gòu)沖突、命名沖突。 設(shè)計(jì)全局 ER 模式的目的不在于把若干局部 ER模式形式上合并為一個(gè) ER模式，而在于消除沖突，使 之成為能夠被所有用戶(hù)共同理解和接受的同一的概念模型。 3)全局 ER 模式的優(yōu)化 在得到全局 ER 模式后，為了提高數(shù)據(jù) 庫(kù)系統(tǒng)的效率，還應(yīng)進(jìn)一步依據(jù)處理需求對(duì) ER 模式進(jìn)行優(yōu)化 。一個(gè)好的全局 ER 模式，除能準(zhǔn)確、全面地反映用戶(hù)功能需求外，還應(yīng)滿足下列條件：實(shí)體類(lèi)型 的個(gè)數(shù)要盡可能的少；實(shí)體類(lèi)型所含屬性個(gè)數(shù)盡可能少；實(shí)體類(lèi)型間聯(lián)系無(wú)冗余。 邏輯設(shè)計(jì) 由于概念設(shè)計(jì)的結(jié)果是 ER 圖， DBMS 一般采用關(guān)系型，因此數(shù)據(jù)庫(kù)的邏輯設(shè)計(jì)過(guò)程就是把 ER圖轉(zhuǎn)化 為關(guān)系模式的過(guò)程。由于關(guān)系模型古有的優(yōu)點(diǎn)，邏輯設(shè)計(jì)可以充分運(yùn)用關(guān)系數(shù)據(jù)庫(kù)規(guī)范化理論， 使設(shè)計(jì)過(guò)程形式化地進(jìn)行。設(shè)計(jì)結(jié)果是一組關(guān)系模式的定義。 1）導(dǎo)出初始關(guān)系模式 圖 4５ 關(guān)系模式集 2）關(guān)系子模式 子模式是用戶(hù)所用到的那部分?jǐn)?shù)據(jù)的描述。除了指出用戶(hù)用到的數(shù)據(jù)外，還應(yīng)指出數(shù)據(jù)與概念模 式中相應(yīng)數(shù)據(jù)的聯(lián)系，即指出概念模式與子模式之間的對(duì)應(yīng)性。 圖書(shū)信息子模式（（編號(hào)＃，資料名稱(chēng)，作者，出版社，出版日期， ISBN，資料類(lèi)別，購(gòu)買(mǎi)日期 ，保管人，備注）用戶(hù)信息子模式（編號(hào)，用戶(hù)代碼，用戶(hù)姓名，登錄口令，使用權(quán)限，查詢(xún)顯 示項(xiàng)，用戶(hù)顯示頭像） 圖 4６ 部分子模式 數(shù)據(jù)庫(kù)的實(shí)現(xiàn) 我們選用 Microsoft Office 中的 Access 數(shù)據(jù)庫(kù)來(lái)進(jìn) 行數(shù)據(jù)庫(kù)的邏輯設(shè)計(jì)。首先創(chuàng)建四個(gè)基本數(shù)據(jù) 庫(kù)表如如 41－ 45 所示，然后建立各個(gè)表之間的聯(lián)系，如圖 48 所示。 中國(guó)最大的管 理 資料下載中心 (收集 \整理 . 大量免費(fèi)資源共享 ) 第 21 頁(yè) 共 32 頁(yè) 第五章 局域圖書(shū)資料查詢(xún)系統(tǒng)應(yīng)用程序設(shè)計(jì) 167。 系統(tǒng)模塊組成 167。 登錄模塊實(shí)現(xiàn) 圖 5－ 2 登錄模塊圖 該窗口所含的控件信息如下： 風(fēng) 格 控件名 說(shuō) 明 用戶(hù)名 Single line edit Sle_1 口令 Single line edit Sle_1 Propeties:passwd 登錄日期 Edit Mask Em_1 mask type:datamm/dd/yyyy 表 5－ 1 登錄模塊控件信息表 控件： Sle_1 事件（ event）： Modified Script of modified: string input_code,namesetfocus() input_code=string() select name into :name from keeperwhere id=:input_code or pym=:input_code。//從用戶(hù)表里查找滿足輸入條件 的記錄 if =0 then =name setfocus(sle_2) 標(biāo)跳轉(zhuǎn)到“口令”控件 else if =100 then messagebox(提示 !,amp。 對(duì)不起， 用戶(hù)不存在 !,amp。 StopSign!) return 1 else messagebox(錯(cuò)誤 !,amp。 error:+string()amp。 +information:+sqlca. 中國(guó)最大的管 理 資料下載中心 (收集 \整理 . 大量免費(fèi)資源共享 ) 第 22 頁(yè) 共 32 頁(yè) sqlerrtext) 出錯(cuò)提示 end ifend if 控件： Sle_2 事件（ event）： Modified Script of modified: string input_passwd,passwd,droitinput_passwd=RightTrim()//去掉輸入值右邊的空 格 select passwd into :passwdfrom keeperwhere name=:。passwd=RightTrim( passwd)。//從用戶(hù)表中校驗(yàn)口令的正確性 if =0 then if input_passwd passwd then messagebox(39?？诹铄e(cuò)誤 39。,39。對(duì)不起，請(qǐng)重新輸入 39。,stopsign!)。 sle_2. SelectText(1, Len()) ()//口令錯(cuò)誤則清除輸入內(nèi)容 setfocus (sle_2) elseif input_passwd=passwd then user=righttrim() select droit into :droit from keeper where name=:user。//口令正確將用戶(hù)操作權(quán)限賦值給變量 open(main)//打開(kāi)程序主窗 口 close(w_login)//關(guān)閉登錄窗口 end ifelseif =100 then messagebox(39。提示 !39。,39。無(wú)數(shù)據(jù) 39。,Stopsign!) return 1else messagebox(錯(cuò)誤 !,amp。 error:+string()amp。 +information:+sqlca. sqlerrtext) 出錯(cuò)提示 end if 在登錄模塊中，用戶(hù)可輸入自己的編號(hào)或編碼來(lái)登錄系統(tǒng)。系 統(tǒng)會(huì)根據(jù)用戶(hù)輸入的編號(hào)或編碼值 來(lái)自動(dòng)給出確實(shí)已存在庫(kù)中的用戶(hù)中文名，若查找不到庫(kù)中相匹配的記錄則提示出錯(cuò)或重輸。若 用戶(hù)存在，則提示輸入口令，口令正確則會(huì)順利進(jìn)入該系統(tǒng)主界面。 167。 查詢(xún)模塊的實(shí)現(xiàn) 圖 5－ 3 查詢(xún)窗口 該窗口（ w_main）控件列表如下： 風(fēng) 格 控件名 說(shuō) 明 顯示項(xiàng) Group Box gb_1 資料名稱(chēng) Check Box cbx_1 Checked:true 作者 Check Box cbx_2 Checked:true 出版社 Check Box cbx_3 Checked:true 出版日期 Check Box cbx_4 Checked:false 類(lèi)別 Check Box cbx_5 Checked:true 購(gòu)買(mǎi)日期 Check Box cbx_6 Checked:false ISBN Check Box cbx_7 Checked:false 保管人 Check Box cbx_8 Checked:true 中國(guó)最大的管 理 資料下載中心 (收集 \整理 . 大量免費(fèi)資源共享 ) 第 23 頁(yè) 共 32 頁(yè) 備注 Check Box cbx_9 Checked:false 全選 Check Box cbx_10 選擇全部顯 示項(xiàng) 檢索 Picture Box pb_1 模糊查詢(xún)檢索 插入 Picture Box pb_2 插入一條記錄 刪除 Picture Box pb_3 刪除一條記錄 檢索 Picture Box pb_4 組合查詢(xún)檢索 全部記錄 Picture Box pb_5 檢索全部記錄 退出 Picture Box pb_6 退出查詢(xún)界面 修改 Picture Box pb_7 進(jìn)入編輯模式 插入 Picture Box pb_8 插入一條查詢(xún)條件 刪除 Picture Box pb_9 刪除一條查詢(xún)條件 存盤(pán) Picture Box pb_10 修改后的數(shù)據(jù)存盤(pán) 打印 Picture Box pb_11 打印查詢(xún)結(jié)果報(bào)表 存為默認(rèn)顯示項(xiàng) Picture Box pb_12 將顯示項(xiàng)存為當(dāng)前用戶(hù)默認(rèn) Single line edit sle_1 查詢(xún)內(nèi)容輸入（字符型） Edit mask em_1 查詢(xún)內(nèi)容輸入（日期型） Static text st_1 顯示當(dāng)前用戶(hù)名 Picture P_1 修改按鈕裝飾 Picture P_2 Gb_1 顯示裝飾 Picture P_3 顯示當(dāng)前用戶(hù)頭像 Drop down list box ddlb_1 查詢(xún)項(xiàng)選擇 Drop down list box ddlb_2 查詢(xún)操作符選擇 Tab control tab_1 共有三個(gè) tabpage 頁(yè) tabpage1:模糊查詢(xún) tabpage2:組合查詢(xún) tabpage3: 更新打印 Datawindows control dw_1 對(duì)應(yīng)數(shù)據(jù)窗口 d_information 圖書(shū)信息檢索 Datawindows control dw_2 對(duì)應(yīng)數(shù)據(jù)窗口 d_query_condition 查詢(xún)條件檢索 Command button Cb_2 模糊查詢(xún)操作符英－中轉(zhuǎn)換 表 5－ 2 查詢(xún)模塊控件信息表 控件： w_main 事件（ event）： open Script of open string mode,p,xs,headboolean xs_item[10]integer (sqlca)dw_1. Retrieve()//打開(kāi)窗口顯示全部記錄 sj_check=0//為檢索窗口排序變量賦初值 =user// 在查詢(xún)窗口右上角顯示當(dāng)前用戶(hù)名 SELECT keeper.display_item, keeper. head_picture INTO :xs, :head FROM keeper WHERE keeper.name = :user。 //從用戶(hù)表中讀出當(dāng)前用戶(hù)的頭像值及顯示像值并分別賦值給變量 在查詢(xún)窗口右上角 if isnull(head) =false else = headend if ////將當(dāng)前用戶(hù)查詢(xún)顯示項(xiàng)變量讀出并賦值給每個(gè)查詢(xún)顯示控件 for i=1 to 8 if Mid (xs, i, 1)=39。039。 then xs_item[i]=false else xs_item[i]=true end ifend for////給每 中國(guó)最大的管 理 資料下載中心 (收集 \整理 . 大量免費(fèi)資源共享 ) 第 24 頁(yè) 共 32 頁(yè) 個(gè)對(duì)應(yīng)的 CHECKBOX 賦值，確實(shí)是勾還是叉 = xs_item[1] = xs_item[2] = xs_item[3] = xs_item[4] = xs_item[5] = xs_item[6] = xs_item[7] = xs_item[8] ////對(duì)應(yīng)的數(shù)據(jù)窗口顯示情況 = .visible = = . = = cbx_4. = = cbx_6. = = cbx_8. = .=Yes 控件： pb_12 “存為默認(rèn)顯示選項(xiàng)” 事件