【正文】 參 考 文 獻(xiàn) [1]薛華成 .管理信息系統(tǒng) .北京 :清華大學(xué)出版社 [2]周文俊，倪波等主編，圖書館研究論文集 ,北京 ,書目文獻(xiàn)出版社 ,1996 [3]李兵 ,李麗梅 ,淺談圖書館自動化系統(tǒng)發(fā)展 ,江西圖書館學(xué)刊 1999 [4] (美 )小瑞芒德同時感謝大學(xué)。在 畢業(yè)設(shè)計(jì)過程中經(jīng)常給我提出許多關(guān)鍵性的問題，使我受益匪淺。 非常感謝我的同班同學(xué)，在我的畢業(yè)設(shè)計(jì)中，他們的指導(dǎo)給予了我極大的幫助，使我對整個畢業(yè)設(shè)計(jì)的思路有了總體的把握，并耐心的幫我解決了許多實(shí)際問題，使我有了很大收獲。在這段時間里，我從他們身上不僅學(xué)到了許多的專業(yè)知識，更感受到了他們工作中的兢兢業(yè)業(yè)，生活中的平易近人。本系統(tǒng)是在指導(dǎo)老師的指導(dǎo) 下修改完成的。借此論文之際，我想向所有人表示我的謝意。 致 謝 在做畢業(yè)設(shè)計(jì)的這段時間里是我學(xué)生生涯中最有價值的一段時光。 第 六 章 結(jié) 論 本系統(tǒng)是在對相關(guān)人員進(jìn)行詳細(xì)調(diào)研后 ，確定了系統(tǒng)涉及的領(lǐng)域，包括系統(tǒng)設(shè)計(jì)、數(shù)據(jù)庫設(shè)計(jì)、程序設(shè)計(jì)等，是一個具有實(shí)際應(yīng)用意義的典型管理系統(tǒng)。 本次開發(fā)的賓館客房管理系統(tǒng)采用了并行轉(zhuǎn)換方式，以保證平衡可靠的過度。 系統(tǒng)轉(zhuǎn)換的主要工作：確定了系統(tǒng)的轉(zhuǎn)換方式以后，除了做好組織準(zhǔn)備、物質(zhì)準(zhǔn)備和人員培訓(xùn)以外，最重要并且工作量最大的是數(shù)據(jù)準(zhǔn)備和系統(tǒng)初始化工作。 測試結(jié)果一覽表 測試名稱 測試結(jié)果 問題所在 “主界面”測試 與系統(tǒng)目標(biāo)相符 “ 房產(chǎn)管理 ”測試 該部分基本能實(shí)現(xiàn)系統(tǒng)的目標(biāo)，對 提示信息作了修改 “ 合同管理 ”測試 該部分能夠?qū)崿F(xiàn)信函、行文、報(bào)表、投訴等功能，與系統(tǒng)目標(biāo)相符 “ 租金管理 ”測試 不能實(shí)現(xiàn)提案記錄的添加，現(xiàn)已改正 源代碼書寫錯誤 “ 信息統(tǒng)計(jì) ”測試 與系統(tǒng)目標(biāo)相符 “ 系統(tǒng)維護(hù) ”測試 與系統(tǒng)目標(biāo)相符 “ 背景設(shè)置 ”測試 與系統(tǒng)目標(biāo)相符 系統(tǒng)安裝 新舊系統(tǒng)轉(zhuǎn)換新舊系統(tǒng)轉(zhuǎn)換，也稱系統(tǒng)切換與運(yùn)行，是指以新開發(fā)的系統(tǒng)替換舊的系統(tǒng)，并使之投入使用的過程。 測試結(jié)果：（見下頁表） 軟件功能結(jié)果： 按照前一階段編制的“房屋出租管理系統(tǒng)模塊功能表”，對系統(tǒng)每個模塊功能，用白盒法與黑盒法進(jìn)行了系統(tǒng)的測試，并沒有發(fā)現(xiàn)錯誤，說明了我的軟件預(yù)期功能全部實(shí)現(xiàn)。 測試內(nèi)容說明 測試名稱： ①“主界面”測試 ②“房產(chǎn)管理”測試③“合同管理”測試 ④“租金管理”測試 ⑤“信息統(tǒng)計(jì)”測試 ⑥“系統(tǒng)維護(hù)”測試 ⑦“背景設(shè)置”測試 測試進(jìn)度： 第一天 “主界面”測試 “房產(chǎn)管理”測試 “合同管理”測試 第二天 “租金管理”測試 “信息統(tǒng)計(jì)”測試 “系統(tǒng)維護(hù)”測試 第三天 “背景設(shè)置”測試 測試分析報(bào)告 引 言： ① 背景：近三天來，我按照測試計(jì)劃有條不紊地測試完了系統(tǒng)，發(fā)現(xiàn)了許多錯誤，并改正了，測試完畢后，我又對測試結(jié)果進(jìn)行了分析。 ②質(zhì)量：檢查每模塊的功能、性能、要求是否符合相關(guān)文檔的技術(shù)要求，不合格者，糾正錯誤，保證質(zhì)量。 目的：系統(tǒng)不可能沒有錯誤，為了保證系統(tǒng)的質(zhì)量，為了使系統(tǒng)和用戶的需求無誤，最有效的方法就是進(jìn)行軟件測試，為了使測試有條不紊地進(jìn)行，我制定了該測試計(jì)劃。 //按房子類型查詢 end 待出租的房屋窗體的設(shè)計(jì) 功能是能查看到所有空房的具體情況。 end。).Value := 。 (39。 :=39。 end。).Value := 。 (39。 :=39。 //在 Combobox1中顯示房子類型 procedure (Sender: TObject)。 end。 end。 。select distinct 類型 from 房產(chǎn)表 39。 。房子類型： 39。 //在 Combobox1中顯示坐落位置 procedure (Sender: TObject)。 end。 end。 。select distinct 坐落位置 from 房產(chǎn)表 39。 。坐落位置： 39。 窗體布局如下 : 圖 421 房產(chǎn)信息查詢窗體 功能實(shí)現(xiàn)的代碼如下： procedure (Sender: TObject)。 end。).Value:=。 (39。lx39。 。 :=39。 窗體的布局如下： 圖 420房價查詢窗口 功能 實(shí)現(xiàn)的代碼如下： procedure (Sender: TObject)。 代碼的實(shí)現(xiàn)也很簡單，跟第一個主窗體“房屋管理系統(tǒng)”類似。 主窗體游客瀏覽的創(chuàng)建 該窗體的設(shè)計(jì)是為了給租房者提供信息的，包括“房價查詢”“房產(chǎn)咨詢”“有房出租”三大模塊。 //修改密碼且保 存新密碼 end。密碼修改成功！ 39。 。密碼 39。 。新密碼與確認(rèn)密碼不一致！ 39。用戶名或密碼錯誤 39。密碼39。 。name39。select * from 用戶表 where 用戶名 =:name39。 begin 。 具體的功能控件屬性 功能實(shí)現(xiàn)的代碼設(shè)計(jì) 窗體布局如下圖： 圖 417 數(shù)據(jù)恢復(fù)窗口圖 密碼管理的 窗體創(chuàng)建 該窗體也是“系統(tǒng)維護(hù)”模塊的一部分，能實(shí)現(xiàn)密碼的修改。 該窗體的功能理論上是對新數(shù)據(jù)進(jìn)行保存，防止數(shù)據(jù)的丟失。 //打印預(yù)覽統(tǒng)計(jì)情況 空閑房屋統(tǒng)計(jì)窗體的設(shè)計(jì) 與履約金統(tǒng)計(jì)窗 口的設(shè)計(jì)類似。 。039。bz39。select * from 合同表 where 標(biāo)志 =:bz39。 begin 。 end。+inttostr()+39。 := 39。039。bz39。select * from 合同表 where 標(biāo)志 =:bz39。 begin 。 end。 。).Value:=39。 (39。 :=39。 //按紐“統(tǒng)計(jì)”的實(shí)現(xiàn)代碼，即到期合同的統(tǒng)計(jì)情況 procedure (Sender: TObject)。 條 39。共 39。 。).Value:=39。 (39。 :=39。 功能是統(tǒng)計(jì)和打印出已到期的合同情況，窗體設(shè)計(jì)如下； 圖 414 已到期合同的統(tǒng)計(jì)窗口 具體 實(shí)現(xiàn)功能的代碼如下 ： procedure (Sender: TObject)。 end。 if [0].Value null then :=[0].Value else :=39。).Value :=rq2。 (39。ssrq139。 。 :=39。 。ssrq239。).Value :=rq1。 (39。select * from 租金表 where 實(shí)收日期 =:ssrq1 and 實(shí)收日期 =:ssrq239。 //實(shí)現(xiàn)時間的設(shè)置 。039。 rq2 := rq2 + inttostr(monthof())。 if monthof()10 then rq2 := rq2 + 39。 rq1 := rq1 + inttostr(dayof())。 if dayof()10 then rq1 := rq1 +39。039。 begin rq1 := inttostr(yearof( ))。 窗體布局如下圖： 圖 413 租金信息統(tǒng)計(jì)窗口 功能實(shí)現(xiàn)代碼如下： 功能實(shí)現(xiàn)主要點(diǎn)擊“統(tǒng)計(jì)”按紐，就可以完成，該按紐的代碼為： procedure (Sender: TObject)。 租金信息統(tǒng)計(jì)窗口的設(shè)計(jì) 該窗體是屬于“信息統(tǒng)計(jì)”模塊的其中一個窗口。 //打印預(yù)覽租金表 end. 按發(fā)票號租金查詢窗口的設(shè)計(jì) 功能是輸入要查詢的發(fā)票號，可查看該發(fā)票號所對應(yīng)的租金情況， 圖 412 按發(fā)票號租金查詢窗口 具體功能的實(shí)現(xiàn)代碼與“按合同號租金查詢窗口”類似，此處略。 end。 。hth39。select * from 租金表 where 合同號 =:hth39。 then else begin 。 begin if =39。 end。 //顯示全部租金收取情況 procedure (Sender: TObject)。39。39。 。 :=39。 “顯示全部”按紐的代碼為： procedure (Sender: TObject)。 //顯示所輸入合同號的租金收取總額 end。 。hth39。select sum(實(shí)收金額 ) from 租金表 where 合同號=:hth39。 //用于顯示所輸入合同號的租金情況 。).Value := 。 (39。 :=39。39。 表 44 主要控件屬性如下 對象名 屬性 取值（說明） Form14 (form) caption 按合同號租金查詢 position poscreencenter ADOConnection1 name ADOConnect1 (ADOConnection) Defaultdatabase house Connected true Loginprompt false ADOdataset1 (ADODataset) Name ADODataset1 Connection ADOconnection1 Active false Commandtext Select *from 租金表 ADOdataset2 (ADODataset) Name ADODataset2 Connection ADOconnection1 Active false Commandtext Select * from 租金表 Datasource1 (Datasource) Name Datasource1 Dataset ADODataset1 Edit1 (Edit) Text (空 )用于輸入合同號 Edit2 (Edit) Text (空 )用于顯示所選合同號的租金收取總額 Readonly true Button1(TButton) Caption 退出 Button2(TButton) Caption 顯示 Button3(TButton) Caption 顯示全部 Button4(TButton) Caption 打印 實(shí)現(xiàn)上述功能的代碼有： “顯示”按紐的程序?yàn)椋? procedure (Sender: TObject)。 //打印租金收取單 按合同號租金查詢窗體的設(shè)計(jì) 該窗體的功能是輸入合同號后查詢該合同的租金情況，并且可以總結(jié)出該合同的總體上繳租金。 。).Value:=。 (39。 :=39。 //對租金的收取進(jìn)行保存 procedure (Sender: TObject)。)。 showmessage(39。 圖 410租金收取窗體 功能的實(shí)現(xiàn)代碼如下： procedure (Sender: TObject)。 //按租用單位查詢 合同信息總表瀏覽窗體的設(shè)計(jì)（略） 與房產(chǎn)信息總表瀏覽窗體的設(shè)計(jì)類似。 條 39。共 39。 end。).Value := 。 (39。 :=39。 end。).Value := 。 (39。 :=39。 end。).Value := 。 (39。 :=39。 窗體布局如圖： 圖 49 合同信息查詢窗體 本窗體的功能主要 是通過“查詢“按鈕的 clicked 事件來實(shí)現(xiàn)的，具體代碼如下： procedure (Sender: TObject)。 end。)。 showmessage(39。 。).Value:=39。 (39。).Value := 39。 (39。 。hth39。select * from 合同 表 where 合同號 =:hth39。 begin if = then begin 。 end。 本窗體能打印房產(chǎn)信息的總表，打印按紐的 clicked事件的代碼為： procedure (Sender: TObject)。 end。 := false。 := true。 :=false。 :=false。 :=false。 begin 。 //對所顯示的記錄進(jìn)行打印 end。 。fwh39。select * from 房產(chǎn)表 where 房屋號=:fwh39。 begin 。 //對插入或修改的記錄進(jìn)行保存，保存后顯示“保存完畢” end。保存完畢 39。 beg