大學(xué)宿舍管理系統(tǒng)解析

大學(xué)宿舍管理系統(tǒng)分析大學(xué)宿舍管理系統(tǒng)分析78/78大學(xué)宿舍管理系統(tǒng)分析高校宿舍管理系統(tǒng)河套大學(xué)宿舍管理系統(tǒng)綱要高校學(xué)生宿舍管理系統(tǒng)是典型的信息管理系統(tǒng)(MIS),其開(kāi)發(fā)主要包括后臺(tái)數(shù)據(jù)庫(kù)的建立和保護(hù)以及前端應(yīng)用程序的開(kāi)發(fā)兩個(gè)方面。對(duì)于后臺(tái)數(shù)據(jù)庫(kù)的建立和保護(hù)要求建立起數(shù)據(jù)一致性、完滿性強(qiáng)、數(shù)據(jù)安全性好的庫(kù)。而對(duì)于前端應(yīng)用程序的開(kāi)發(fā)則要求應(yīng)用程序能供應(yīng)富強(qiáng)的數(shù)據(jù)控制功能，界面友好、使用簡(jiǎn)單方便等特點(diǎn)。我們使用VisualBasic6.0和SQLServer2000數(shù)據(jù)庫(kù)為開(kāi)發(fā)工具,VisualBasic6.0是簡(jiǎn)單合用的面向數(shù)據(jù)庫(kù)開(kāi)發(fā)工具,同時(shí)它供應(yīng)的集成開(kāi)發(fā)環(huán)境及面向?qū)ο蟾鳂訕?biāo)準(zhǔn)化控件,利于對(duì)數(shù)據(jù)庫(kù)和數(shù)據(jù)表的直接操作和辦理，提高了編程效率和可靠性。別的經(jīng)過(guò)ASP為一般學(xué)生開(kāi)發(fā)一個(gè)簡(jiǎn)單盤(pán)問(wèn)界面，贊同學(xué)生經(jīng)過(guò)閱讀器盤(pán)問(wèn)與學(xué)生個(gè)人親近相關(guān)的宿舍管理信息以及與宿舍中心進(jìn)行信息交流。過(guò)去的手工紀(jì)錄的宿舍管理方式已經(jīng)不能夠適應(yīng)高速發(fā)展的信息化時(shí)代，新的宿舍管理系統(tǒng)開(kāi)發(fā)出來(lái)此后，學(xué)校的現(xiàn)有的宿舍信息管理將有很大的改觀，由過(guò)去的人工方式轉(zhuǎn)變成計(jì)算機(jī)方式，由效率低、數(shù)據(jù)冗余、易產(chǎn)生錯(cuò)誤轉(zhuǎn)變成檢索迅速、查找方便、可靠性高、儲(chǔ)藏量大。這些優(yōu)點(diǎn)能夠極大地提高效率,也是學(xué)校科學(xué)化、正規(guī)化管理的重要條件。要點(diǎn)詞：宿舍管理系統(tǒng)；數(shù)據(jù)庫(kù)；第1頁(yè)高校宿舍管理系統(tǒng)第一章項(xiàng)目背景與需求分析1．1項(xiàng)目背景近幾年，隨著國(guó)家教育政策的調(diào)整和完滿，我國(guó)高等院校大面積擴(kuò)招，給宿舍管理帶來(lái)了不小的沖擊，要使學(xué)生擁有一個(gè)好的學(xué)習(xí)環(huán)境和生活氛圍，是每一所高校都必定面對(duì)的重要工作。河套大學(xué)是一所綜合性大學(xué)，學(xué)校下設(shè)人文學(xué)部、理工部、農(nóng)牧科學(xué)系、外語(yǔ)系、數(shù)學(xué)與計(jì)算機(jī)系等。2003年起學(xué)校與鄰省區(qū)進(jìn)行對(duì)口交流招生整合后的河套大學(xué)當(dāng)前擁有各樣在校生13000多人，學(xué)生公寓8棟。宿舍管理系統(tǒng)對(duì)于一個(gè)學(xué)校來(lái)說(shuō)是必不能少的組成部分。當(dāng)前學(xué)校還停留在宿舍管理人員手工記錄數(shù)據(jù)的最初階段，手工記錄對(duì)于規(guī)模小的學(xué)校來(lái)說(shuō)還勉強(qiáng)能夠接受，但對(duì)于這樣的綜合性大學(xué)由于學(xué)生信息量比較弘大，需要記錄存檔的數(shù)據(jù)比很多的高校來(lái)說(shuō)，人工記錄是相當(dāng)麻煩的。而且當(dāng)查找某條記錄時(shí)，由于數(shù)據(jù)量弘大，還只能靠人工一條條的查找，這樣不僅麻煩還浪費(fèi)了好多時(shí)間，效率也比較低?，F(xiàn)在社會(huì)是飛速進(jìn)步的世界，原始的記錄方式已經(jīng)被社會(huì)所裁汰了，計(jì)算機(jī)化管理正是適應(yīng)時(shí)代的產(chǎn)物。信息世界永遠(yuǎn)不會(huì)是一個(gè)寧?kù)o的世界，當(dāng)一種技術(shù)不能夠滿足需求時(shí)，就會(huì)有新的技術(shù)出生并取代舊技術(shù)。21世紀(jì)的今天,信息社會(huì)占著主流地位，計(jì)算機(jī)在各行各業(yè)中的運(yùn)用已經(jīng)獲取普及，自動(dòng)化、信息化的管理越來(lái)越廣泛應(yīng)用于各個(gè)領(lǐng)域。我們針對(duì)這樣，設(shè)計(jì)了一套學(xué)生宿舍管理系統(tǒng)。學(xué)生宿舍管理系統(tǒng)采用的是計(jì)算機(jī)化管理，系統(tǒng)做的盡量人性化，使用者會(huì)感覺(jué)操作特別方便，管理人員需要做的就是將數(shù)據(jù)輸入到系統(tǒng)的數(shù)據(jù)庫(kù)中去。由于數(shù)據(jù)庫(kù)儲(chǔ)藏容量相當(dāng)大，而且比較牢固，適合較長(zhǎng)時(shí)間的保存，也不簡(jiǎn)單扔掉。這無(wú)疑是為信息儲(chǔ)藏量比較大的學(xué)校供應(yīng)了一個(gè)方便、快捷的操作方式。本系統(tǒng)擁有運(yùn)行速度快、安全性高、牢固性好的優(yōu)點(diǎn)，能夠迅速的盤(pán)問(wèn)學(xué)校所需的住宿信息。1．2功能需求1．2．1基本功能需求基于學(xué)校的宿舍管理采用的還是人工來(lái)進(jìn)行管理的,為了適應(yīng)學(xué)校發(fā)展的實(shí)質(zhì)情況，我經(jīng)過(guò)實(shí)地調(diào)研此后，以為實(shí)現(xiàn)學(xué)生宿舍管理系統(tǒng)在設(shè)計(jì)時(shí)應(yīng)盡可能的貼近學(xué)生便于學(xué)生用戶操作，系統(tǒng)在實(shí)現(xiàn)上應(yīng)擁有入相功能：（1）系統(tǒng)實(shí)現(xiàn)用戶身份認(rèn)證并對(duì)登錄取戶的操作權(quán)限分級(jí)管理。（2）系統(tǒng)應(yīng)供應(yīng)學(xué)生入學(xué)的注冊(cè)、基本信息的錄入。第2頁(yè)高校宿舍管理系統(tǒng)（3）系統(tǒng)應(yīng)供應(yīng)宿舍基本情況的錄入。（4）系統(tǒng)應(yīng)供應(yīng)學(xué)生住宿情況的基本登記。（5）系統(tǒng)應(yīng)供應(yīng)學(xué)生退宿情況的辦理。（6）系統(tǒng)還應(yīng)擁有基本的盤(pán)問(wèn)功能。（7）系統(tǒng)不但供應(yīng)管理部門(mén)對(duì)宿舍管理信息的盤(pán)問(wèn)功能，還應(yīng)供應(yīng)一般學(xué)生經(jīng)過(guò)Internet盤(pán)問(wèn)宿舍基礎(chǔ)信息的功能。1．2．2用戶界面需求學(xué)生宿舍管理系統(tǒng)應(yīng)供應(yīng)簡(jiǎn)單、層次關(guān)系了然、清楚的操作界面，使用戶如數(shù)家珍。盡可能的為用戶的錄入、盤(pán)問(wèn)等功能操作供應(yīng)方便?？旖莅粹o的創(chuàng)辦也是特別需要的，以方便用戶操作。1．3性能需求1．3．1系統(tǒng)安全性學(xué)生宿舍管理系統(tǒng)中的增加用戶、學(xué)生學(xué)期注冊(cè)、學(xué)生畢業(yè)離校等模塊都是和學(xué)生住宿費(fèi)相聯(lián)系在一起的，所以在系統(tǒng)的管理權(quán)限上應(yīng)該進(jìn)行嚴(yán)格控制，詳細(xì)思想以下：（1）要想對(duì)該學(xué)生宿舍管理系統(tǒng)進(jìn)行操作就應(yīng)該擁有某些操作權(quán)限。沒(méi)有權(quán)限的用戶將不能夠經(jīng)過(guò)任何渠道來(lái)登錄該系統(tǒng)，查察該系統(tǒng)的任何信息和數(shù)據(jù)，以保證系統(tǒng)的嚴(yán)實(shí)性和安全性。（2）在上述要求基礎(chǔ)上，程序開(kāi)始運(yùn)行全部功能將是不履行用的，只適用戶登錄窗口能夠使用，沒(méi)有正確的用戶名和密碼任何人都不能夠登錄該系統(tǒng)。（3）在詳細(xì)實(shí)現(xiàn)時(shí)還應(yīng)為各用戶設(shè)定不同樣的權(quán)限，系統(tǒng)管理員應(yīng)該能夠使用系統(tǒng)的全部模塊，一般用戶只能閱讀系統(tǒng)中的宿舍及學(xué)生基本信息。（4）在系統(tǒng)開(kāi)始試運(yùn)行后，需要采用必然的技術(shù)手段對(duì)內(nèi)部用戶的接見(jiàn)和外面用戶接見(jiàn)進(jìn)行劃分，采用必然的措施，嚴(yán)格控制Internet的用戶的操作權(quán)限。第二章宿舍管理系統(tǒng)的系統(tǒng)規(guī)劃2．1系統(tǒng)規(guī)劃規(guī)劃，一般是對(duì)較長(zhǎng)久間的活動(dòng)進(jìn)行整體的、全面的計(jì)劃。由于管理系統(tǒng)的建設(shè)耗資巨大，歷時(shí)較長(zhǎng)，技術(shù)復(fù)雜且涉及面廣，系統(tǒng)規(guī)劃第3頁(yè)高校宿舍管理系統(tǒng)是這一工作的初步間段。這項(xiàng)工作的利害直接影響到整個(gè)系統(tǒng)建設(shè)的成敗，為了提高規(guī)劃工作的科學(xué)性和有效性應(yīng)注意以下要點(diǎn)問(wèn)題：（1）戰(zhàn)略計(jì)劃是中心（2）解決問(wèn)題的有效性是要點(diǎn)（3）應(yīng)變能力是系統(tǒng)成功的要點(diǎn)問(wèn)題之一，也是當(dāng)前系統(tǒng)建設(shè)與應(yīng)用的瓶頸問(wèn)題。（4）人、管理、技術(shù)應(yīng)協(xié)調(diào)發(fā)展，三者之間相互當(dāng)合、相互促進(jìn)，以加速系統(tǒng)的建設(shè)進(jìn)度。2．2管理信息系統(tǒng)理論宿舍管理系統(tǒng)是典型的信息管理系統(tǒng)（MIS），需要MIS的基本理論的指導(dǎo)，基于此，我們回顧一下MIS的基本理論。2．2．1管理信息系統(tǒng)的歸納管理信息系統(tǒng)是一個(gè)由人和計(jì)算機(jī)組成的能進(jìn)行管理信息的收集、傳達(dá)、加工、保存、保護(hù)和使用的系統(tǒng)。它能實(shí)測(cè)公民經(jīng)濟(jì)和企業(yè)的各樣運(yùn)行情況；管理信息系統(tǒng)利用歷史數(shù)據(jù)展望將來(lái)；從全局出發(fā)協(xié)助管理決策；利用信息控制企業(yè)的行為，幫助實(shí)現(xiàn)其規(guī)劃目標(biāo)。管理信息系統(tǒng)是以計(jì)算為主要手段辦理信息，重申信息辦理的系統(tǒng)性、綜合性，不僅需求在事物辦理上高效率，而且更重申對(duì)各級(jí)管理決策的有效支持，管理信息系統(tǒng)的建立，為各級(jí)管理決策供應(yīng)了信息支持，從根本上改進(jìn)了管理人員的勞動(dòng)條件和工作性質(zhì)，是管理手段現(xiàn)代化的重要標(biāo)志。2．2．2管理信息系統(tǒng)的特點(diǎn)管理信息系統(tǒng)的特點(diǎn)可歸納為：數(shù)據(jù)集中一致，采用數(shù)據(jù)庫(kù)數(shù)據(jù)模型的應(yīng)用有展望和控制能力面向決策管理信息系統(tǒng)是一門(mén)新的學(xué)科，它引用其他學(xué)科如管理學(xué)與工程經(jīng)濟(jì)理論、統(tǒng)計(jì)學(xué)、運(yùn)籌學(xué)以及計(jì)算機(jī)科學(xué)等多學(xué)科的見(jiàn)解和方法，交融成為一門(mén)新的綜合性、邊緣性的學(xué)科。第4頁(yè)高校宿舍管理系統(tǒng)2．2．3管理信息系統(tǒng)開(kāi)發(fā)的基本方法用系統(tǒng)工程的方法開(kāi)發(fā)管理信息系統(tǒng)的詳細(xì)方法有生命周期法、原型法、面向?qū)ο箝_(kāi)發(fā)方法和CASE方法等多種。（1）生命周期法所謂生命周期法，就是依照料理信息生命周期的見(jiàn)解，嚴(yán)格地依照系統(tǒng)生命周期的各個(gè)過(guò)程和步驟去開(kāi)發(fā)系統(tǒng)。即分為五個(gè)階段：系統(tǒng)分析、系統(tǒng)設(shè)計(jì)、系統(tǒng)推行、系統(tǒng)運(yùn)行、系統(tǒng)保護(hù)階段。對(duì)于大系統(tǒng)或系統(tǒng)開(kāi)發(fā)缺少經(jīng)驗(yàn)的情況，采用生命周期法能夠立足全局，步步為營(yíng)，減少返工，有利于提高開(kāi)發(fā)質(zhì)量，加速工程進(jìn)度。生命周期法的不足之處是系統(tǒng)的開(kāi)發(fā)周期太長(zhǎng)，有時(shí)系統(tǒng)開(kāi)發(fā)尚在開(kāi)發(fā)過(guò)程之中，而內(nèi)外環(huán)境已有所變化，對(duì)系統(tǒng)的要求也發(fā)生了變化。（2）原型法原型法的基本思想是：開(kāi)發(fā)者和用戶在系統(tǒng)的主要需求上獲取一致建議后，由開(kāi)發(fā)者很快開(kāi)發(fā)出一個(gè)初步的原型系統(tǒng)，爾后經(jīng)過(guò)用戶使用和談?wù)?，提出改進(jìn)建議，屢次更正、擴(kuò)展和完滿，直到形成一個(gè)相對(duì)牢固的系統(tǒng)。原型法能充分發(fā)揮用戶的積極性，能提前發(fā)現(xiàn)開(kāi)發(fā)中出現(xiàn)的問(wèn)題，所以系統(tǒng)的合用性較高，原型法主要用于以下一些場(chǎng)合：用戶早先難以說(shuō)明需求的較小的應(yīng)用系統(tǒng)；決策支持系統(tǒng)；與生命周期法結(jié)合起來(lái)使用，即整體上仍使用生命周期法，而僅對(duì)其中功能獨(dú)立的模塊采用原型法。（3）面向?qū)ο蠓嫦驅(qū)ο蠓ㄊ且环N認(rèn)識(shí)問(wèn)題和解決問(wèn)題的思想方法，它把客觀世界看作是由好多不同樣的對(duì)象組成。在面向?qū)ο蟮南到y(tǒng)中，我們把系統(tǒng)中全部資源（如系統(tǒng)、數(shù)據(jù)、模塊）都看作是對(duì)象，每一對(duì)象都有自己的運(yùn)動(dòng)規(guī)律和內(nèi)部狀態(tài)。不同樣對(duì)象間的相互聯(lián)系和相互作用組成一個(gè)完滿的客觀世界。（4）計(jì)算機(jī)協(xié)助系統(tǒng)開(kāi)發(fā)法（CASE法）計(jì)算機(jī)協(xié)助系統(tǒng)開(kāi)發(fā)方法是運(yùn)用計(jì)算機(jī)軟件工具協(xié)助系統(tǒng)開(kāi)發(fā)的一種方法。由于當(dāng)前宿舍管理還處于手工管理階段，管理水平還比較低，要求宿管部門(mén)的工作人員一次性地供應(yīng)完滿的需求確實(shí)存在困難，經(jīng)過(guò)認(rèn)真分析，我決定采用第5頁(yè)高校宿舍管理系統(tǒng)原型法開(kāi)發(fā)。即先很快建立一個(gè)系統(tǒng)的原型，讓用戶認(rèn)識(shí)它、使用它、熟悉它、更正它、談?wù)撍粩嗟臐M足用戶提出的新的需求，進(jìn)一步完滿和提高系統(tǒng)地綜合性能。自然本系統(tǒng)的開(kāi)發(fā)設(shè)計(jì)過(guò)程仍嚴(yán)格遵守生命周期法的開(kāi)發(fā)相關(guān)規(guī)范。第三章宿舍管理系統(tǒng)的系統(tǒng)分析3．1系統(tǒng)初步檢查系統(tǒng)初步檢查是系統(tǒng)分析階段的第一項(xiàng)活動(dòng)，其主要目標(biāo)就是從系統(tǒng)分析人員和管理人員的角度看新項(xiàng)目開(kāi)發(fā)的可能性和必要性。河套大學(xué)作為一所綜合性大學(xué)，當(dāng)前學(xué)校下設(shè)多個(gè)院系，特別近來(lái)幾年來(lái)與鄰省區(qū)進(jìn)行對(duì)口交流招生后，生源大量增加，學(xué)生住宿管理問(wèn)題引起了校領(lǐng)導(dǎo)及主管學(xué)生住宿的宿管部門(mén)的重視?，F(xiàn)在學(xué)校宿舍管理主要依賴于手工管理方式，它存在著好多弊端，如學(xué)生開(kāi)學(xué)入住登記繁瑣且簡(jiǎn)單出錯(cuò)；數(shù)據(jù)冗余現(xiàn)象嚴(yán)重；盤(pán)問(wèn)不方便等。為了完滿這方面的管理，經(jīng)多次與校領(lǐng)導(dǎo)及宿舍管理負(fù)責(zé)人的談?wù)摚覜Q定為河套大學(xué)開(kāi)發(fā)一個(gè)宿舍管理系統(tǒng)，以此來(lái)改進(jìn)現(xiàn)有的管理模式，使學(xué)校各方面的管理向著系統(tǒng)化、科學(xué)化邁進(jìn)。3．2開(kāi)發(fā)方式選擇面對(duì)當(dāng)前的學(xué)生入學(xué)情況及校內(nèi)現(xiàn)有的硬件資源，校領(lǐng)導(dǎo)對(duì)學(xué)生宿舍管理能夠做出以下三種計(jì)劃安排：（1）連續(xù)采用當(dāng)前的手工管理方式，需要再聘用幾個(gè)生活老師加強(qiáng)對(duì)學(xué)生及宿舍的管理。（2）購(gòu)買(mǎi)市場(chǎng)上已有宿舍管理系統(tǒng)，一般來(lái)說(shuō)能夠幫助人們?cè)谀承┉h(huán)節(jié)上達(dá)成一些簡(jiǎn)單的、重復(fù)性的工作。（3）自己開(kāi)發(fā)一個(gè)宿舍管理系統(tǒng)，依照學(xué)校自己情況明確目標(biāo)，開(kāi)發(fā)適合自己的系統(tǒng)。對(duì)于第一種顯然是個(gè)不能行的，那樣既不能減少學(xué)校的支出也不能夠夠改進(jìn)學(xué)校宿舍管理制度，過(guò)去工作中的弊端和問(wèn)題仍沒(méi)有獲取根本的改變和解決。對(duì)于第二種購(gòu)買(mǎi)理論上是可行的，但存在著這樣一些問(wèn)題，第一購(gòu)買(mǎi)現(xiàn)有的軟件是比較昂貴的；其次購(gòu)買(mǎi)到真切滿足學(xué)校需求、適應(yīng)學(xué)校環(huán)境的軟件是十分困難的；最后購(gòu)買(mǎi)來(lái)的軟件是作用和可靠程度一般都不盡如人意，所以經(jīng)過(guò)多次檢查談?wù)摵笪覜Q定借畢業(yè)設(shè)計(jì)的機(jī)遇為學(xué)校開(kāi)發(fā)一個(gè)宿舍管理系統(tǒng)。自己開(kāi)發(fā)軟件目注明確、吻合需求、便于進(jìn)一步擴(kuò)大和升級(jí)。所以，自行開(kāi)發(fā)為自己所用的，第6頁(yè)高校宿舍管理系統(tǒng)合用于學(xué)校這一特定應(yīng)用范圍的，只支持宿舍管理這一局部功能的軟件是學(xué)校最正確的選擇。3．3系統(tǒng)開(kāi)發(fā)的可行性分析與談?wù)摽尚行匝芯渴窍到y(tǒng)分析階段的第二項(xiàng)活動(dòng)，其主要目標(biāo)是進(jìn)一步確定系統(tǒng)目標(biāo)、規(guī)模與功能，對(duì)系統(tǒng)開(kāi)發(fā)背景、必要性和意義進(jìn)行檢查分析并依照需要和可能提出開(kāi)發(fā)系統(tǒng)的初步方案與計(jì)劃。下面，我從三個(gè)方面對(duì)河套大學(xué)宿舍管理系統(tǒng)的可行性進(jìn)行分析。（1）技術(shù)可行性：技術(shù)上的可行性要考慮將來(lái)采用的硬件和軟件技術(shù)可否滿足用戶提出的要求?；诋?dāng)前的計(jì)算機(jī)網(wǎng)絡(luò)技術(shù)和數(shù)據(jù)技術(shù)已成熟，而且管理信息系統(tǒng)（MIS）的各樣開(kāi)發(fā)技術(shù)也已經(jīng)相看作熟，而且在各個(gè)領(lǐng)域都不乏成熟的案例。所以為河套大學(xué)開(kāi)發(fā)一套網(wǎng)絡(luò)平臺(tái)的多用戶共享信息的宿舍管理系統(tǒng)在技術(shù)上是可行的。（2）經(jīng)濟(jì)可行性：經(jīng)濟(jì)可行性主若是對(duì)項(xiàng)目的經(jīng)濟(jì)效益進(jìn)行談?wù)?。?dāng)前，河套大學(xué)已建立了校園網(wǎng)絡(luò)系統(tǒng)，具備了運(yùn)行網(wǎng)絡(luò)平臺(tái)的MIS的硬件基礎(chǔ)，而且本系統(tǒng)是我作為畢業(yè)設(shè)計(jì)自行開(kāi)發(fā)，免費(fèi)幫助設(shè)計(jì)并推行的。所以開(kāi)發(fā)、設(shè)計(jì)這套系統(tǒng)的支出花銷是學(xué)校能夠肩負(fù)的，即經(jīng)濟(jì)上是可行的。（3）運(yùn)營(yíng)可行性：宿舍管理系統(tǒng)的開(kāi)發(fā)不會(huì)影響學(xué)校其他職能部門(mén)的正常運(yùn)行?，F(xiàn)有的生活部負(fù)責(zé)人及生活老師素質(zhì)比較高，所以宿舍管理系統(tǒng)的推行不會(huì)碰到阻力，加上校領(lǐng)導(dǎo)的支持和其他各部分的配合，宿舍管理系統(tǒng)的推行在運(yùn)營(yíng)上是可行的。3．4系統(tǒng)詳細(xì)檢查系統(tǒng)詳細(xì)檢查的目標(biāo)是在可行性研究的基礎(chǔ)進(jìn)步一步對(duì)現(xiàn)有系統(tǒng)進(jìn)行全面、深入的檢查和分析，弄清楚現(xiàn)行系統(tǒng)的運(yùn)行情況發(fā)現(xiàn)其單薄環(huán)節(jié)，找出要解決的問(wèn)題的實(shí)質(zhì)，保證新系統(tǒng)比原系統(tǒng)更有效。經(jīng)過(guò)詳細(xì)檢查，學(xué)?，F(xiàn)有在校學(xué)生13000多人，宿舍樓8座，男女生各4座。當(dāng)前，宿舍管理工作完滿靠生活部老師手工達(dá)成。學(xué)生注冊(cè)后，入住管理都是手工方式進(jìn)行。由生活部老師依照學(xué)生的專業(yè)及到校的先后次序依次安排入住。學(xué)生的基本記錄，以及安排入住后的相關(guān)資料也由生活老師手工登記，這使的生活部工作量很大，而且宿舍推行一致標(biāo)準(zhǔn)的管理，也不能夠滿足學(xué)生及家長(zhǎng)的住宿要求，這些問(wèn)題都亟待解決。所以，即使當(dāng)前全部宿舍都是一致的6人間標(biāo)準(zhǔn)，由于完滿采用手工管理，生活部的老師已經(jīng)特別辛苦。而且隨著多層次、多等級(jí)標(biāo)準(zhǔn)宿舍的出現(xiàn)，手工方式的管理已經(jīng)完滿不能夠適應(yīng)管理工作的需要。第7頁(yè)高校宿舍管理系統(tǒng)3．5系統(tǒng)邏輯模型的提出這一階段是系統(tǒng)分析的最后一項(xiàng)活動(dòng)，目標(biāo)是明確用戶的信息需求，確定新系統(tǒng)的邏輯功能，提出新系統(tǒng)的邏輯方案。經(jīng)過(guò)初步檢查及詳細(xì)檢查后發(fā)現(xiàn)原有的手工管理方式不能夠滿足學(xué)校現(xiàn)在的管理要求，學(xué)校將采用新的管理方式，對(duì)學(xué)生宿舍推行公寓化管理，將現(xiàn)有的宿舍化分為三個(gè)標(biāo)準(zhǔn)：2人間、4人間和6人間，各樣標(biāo)準(zhǔn)的公寓內(nèi)部設(shè)施各不同樣，相應(yīng)的住宿費(fèi)也不同樣。學(xué)生報(bào)到后持繳費(fèi)單到生活部報(bào)到安排住宿，依照學(xué)生的不同樣情況，第一登記學(xué)生的基本信息，爾后盤(pán)問(wèn)相應(yīng)的宿舍情況，依次安排學(xué)生入住。使學(xué)生很快適應(yīng)新的環(huán)境，進(jìn)入正常、健康的大學(xué)生活，為了豐富大學(xué)的生活我們睜開(kāi)各樣評(píng)比活動(dòng)而且學(xué)期結(jié)束，按評(píng)比結(jié)果進(jìn)行獎(jiǎng)勵(lì)。（1）宿舍管理系統(tǒng)關(guān)系圖,以以下圖所示：（2）宿舍管理系統(tǒng)頂層圖，以以下圖所示：F1：學(xué)生注冊(cè)單F2：宿舍標(biāo)準(zhǔn)信息F3：學(xué)生基本信息第8頁(yè)高校宿舍管理系統(tǒng)F4：宿舍信息F7：退宿結(jié)果F5：評(píng)比依照F8：入住結(jié)果F6：評(píng)比結(jié)果F9：學(xué)生信息第四章宿舍管理系統(tǒng)的系統(tǒng)設(shè)計(jì)4．1數(shù)據(jù)庫(kù)的設(shè)計(jì)4．1．1數(shù)據(jù)庫(kù)需求分析需求分析階段應(yīng)該對(duì)系統(tǒng)的整個(gè)應(yīng)用情況作全面的、詳細(xì)的檢查，確定系統(tǒng)的目標(biāo)，收集支持系統(tǒng)總的設(shè)計(jì)目標(biāo)的基礎(chǔ)數(shù)據(jù)和對(duì)這些數(shù)據(jù)的要求，確定用戶的需求。要設(shè)計(jì)一個(gè)性能優(yōu)異的數(shù)據(jù)庫(kù)系統(tǒng)，收集和分析用戶需求，明確應(yīng)用環(huán)境對(duì)系統(tǒng)的要求是首要的和最基本的。特別是數(shù)據(jù)庫(kù)應(yīng)用特別廣泛，特別復(fù)雜，多個(gè)應(yīng)用程序能夠在同一個(gè)數(shù)據(jù)庫(kù)上運(yùn)行時(shí)，為了支持全部應(yīng)用程序的運(yùn)行，數(shù)據(jù)庫(kù)設(shè)計(jì)就變的復(fù)雜。所以早先對(duì)信息進(jìn)行充分和認(rèn)真的分析，是數(shù)據(jù)庫(kù)設(shè)計(jì)獲取成功的要點(diǎn)所在。事實(shí)上確定全部的用戶需求是一件很困難的事情，原因以下：（1）系統(tǒng)自己的需求是變化的，用戶的需求必定不斷調(diào)整，使之與這變化相一致。（2）由于用戶缺少計(jì)算機(jī)信息系統(tǒng)設(shè)計(jì)方面的專業(yè)知識(shí)，要正確表達(dá)他們的需求很困難，特別是很難討情楚某部分工作的功能與發(fā)展過(guò)程。（3）要調(diào)動(dòng)用戶積極性，使他們能夠積極的參加系統(tǒng)的分析與設(shè)計(jì)工作相當(dāng)困難。誠(chéng)然面對(duì)這些困難，但它關(guān)系到數(shù)據(jù)庫(kù)設(shè)計(jì)的成功與否所以必然要認(rèn)真對(duì)待。所以，我們應(yīng)收集盡可能詳細(xì)的資料，而且認(rèn)識(shí)系統(tǒng)將來(lái)要發(fā)生的變化，收集將來(lái)應(yīng)用所涉及的數(shù)據(jù)，充分考慮到系統(tǒng)可能的擴(kuò)大和變動(dòng)，使系統(tǒng)設(shè)計(jì)更吻合將來(lái)發(fā)展的趨向，而且易于變動(dòng)，以減少系統(tǒng)保護(hù)的代價(jià)。4．1．2數(shù)據(jù)庫(kù)見(jiàn)解模式設(shè)計(jì)（E－R圖）在見(jiàn)解設(shè)計(jì)階段中，設(shè)計(jì)人員從用戶的角度對(duì)待數(shù)據(jù)及辦理要求和拘束，產(chǎn)生一個(gè)反響用戶見(jiàn)解的見(jiàn)解模型。為了使E－R圖表示的更加清楚，我將E－R圖分成實(shí)體及其屬性圖和實(shí)體及其聯(lián)系圖以下所示。第9頁(yè)高校宿舍管理系統(tǒng)第10頁(yè)高校宿舍管理系統(tǒng)第11頁(yè)高校宿舍管理系統(tǒng)4．1．3數(shù)據(jù)庫(kù)邏輯結(jié)構(gòu)設(shè)計(jì)邏輯設(shè)計(jì)主若是把見(jiàn)解模式變換成DBMS能辦理的模式，E－R圖到關(guān)系模式的變換是比較直接的，實(shí)體的聯(lián)系都能夠表示成關(guān)系，E－R圖中的屬性也能夠變換成關(guān)系的屬性。E－R圖直接轉(zhuǎn)變成的關(guān)系模式的不是唯一的，也不是必然是最優(yōu)的，還得依照現(xiàn)實(shí)語(yǔ)義，運(yùn)用范式規(guī)范化理論進(jìn)行優(yōu)化。系統(tǒng)中所涉及到的實(shí)體有：學(xué)生實(shí)體、宿舍實(shí)體、宿舍標(biāo)準(zhǔn)實(shí)體、獎(jiǎng)勵(lì)等級(jí)實(shí)體及獎(jiǎng)品實(shí)體。將其E－R圖向關(guān)系模型變換結(jié)果以下：用戶表（用戶ID，用戶名，密碼，學(xué)生信息管理，宿舍信息管理，學(xué)生住宿管理，評(píng)比及獎(jiǎng)勵(lì)管理，綜合信息盤(pán)問(wèn)）用戶ID為此關(guān)系的碼（注：學(xué)生信息管理，宿舍信息管理，學(xué)生住宿管理，評(píng)比及獎(jiǎng)勵(lì)管理，綜合信息盤(pán)問(wèn)為權(quán)限分類）。學(xué)生基本信息表（學(xué)號(hào)，姓名，性別，出壽辰期，入學(xué)時(shí)間，專業(yè)，家庭地址，聯(lián)電話，郵編）學(xué)號(hào)為此表的碼。宿舍標(biāo)準(zhǔn)表（標(biāo)準(zhǔn)號(hào)，標(biāo)準(zhǔn)名稱，住宿費(fèi)，床，桌子，柜子，椅子，電視，網(wǎng)口，電話，可否有獨(dú)立衛(wèi)生間）標(biāo)準(zhǔn)號(hào)是此表的碼宿舍信息表（宿舍號(hào)，標(biāo)準(zhǔn)號(hào)，地址，床位總數(shù)，已用床位，未用床位，電話號(hào)碼，）宿舍號(hào)為此表的碼。獎(jiǎng)品信息表（獎(jiǎng)品號(hào)，獎(jiǎng)品名稱，數(shù)量，價(jià)值）獎(jiǎng)品號(hào)為此表的碼。?獎(jiǎng)勵(lì)等級(jí)表（等級(jí)號(hào)，等級(jí)名稱，評(píng)獎(jiǎng)機(jī)構(gòu)）等級(jí)號(hào)為此表的碼。?獎(jiǎng)品發(fā)放表（獎(jiǎng)品號(hào)，等級(jí)號(hào)，數(shù)量）學(xué)生入宿表（入住編號(hào)，姓名，學(xué)號(hào)，宿舍號(hào)，入住時(shí)間，聯(lián)系電話）學(xué)號(hào)和宿舍號(hào)為此表的碼。學(xué)生退宿表（退宿編號(hào)，宿舍號(hào)，學(xué)號(hào)，姓名，退宿日期，入住編號(hào)）宿舍號(hào)和學(xué)號(hào)為此表的碼。宿舍評(píng)比等級(jí)表（領(lǐng)用編號(hào)，宿舍號(hào)，獎(jiǎng)勵(lì)等級(jí)號(hào)，評(píng)比時(shí)間，備注）宿舍號(hào)和獎(jiǎng)勵(lì)等級(jí)號(hào)為此表的碼。系統(tǒng)自動(dòng)編號(hào)表（編號(hào)名稱，編號(hào)）編號(hào)為此表的碼。4．1．4數(shù)據(jù)庫(kù)的物理設(shè)計(jì)（1）數(shù)據(jù)庫(kù)和表名稱在河套大學(xué)宿舍管理系統(tǒng)中數(shù)據(jù)庫(kù)的名稱設(shè)置為hostel數(shù)據(jù)庫(kù)中的表名稱第12頁(yè)高校宿舍管理系統(tǒng)（2）表結(jié)構(gòu)設(shè)計(jì)：第13頁(yè)高校宿舍管理系統(tǒng)宿舍信息表（hosgrn）第14頁(yè)高校宿舍管理系統(tǒng)第15頁(yè)高校宿舍管理系統(tǒng)學(xué)生退宿表（gobacktable）宿舍評(píng)比等級(jí)表（gogrademess）第16頁(yè)高校宿舍管理系統(tǒng)4．2安全性設(shè)計(jì)為了加強(qiáng)數(shù)據(jù)安全性,學(xué)校要求采用大型數(shù)據(jù)庫(kù)。利用大型關(guān)系數(shù)據(jù)庫(kù)自己的事務(wù)回卷，如期備份等功能，以便保證系統(tǒng)啟用后不會(huì)出現(xiàn)數(shù)據(jù)扔掉、死機(jī)等現(xiàn)象，并保證數(shù)據(jù)庫(kù)的一致性、并發(fā)性和可移植性。SQLServer2000數(shù)據(jù)庫(kù)的安全性管理功能就特別富強(qiáng)，相對(duì)來(lái)說(shuō)也比較復(fù)雜，下面將從系統(tǒng)開(kāi)發(fā)的實(shí)質(zhì)情況出發(fā)，依照系統(tǒng)分析的結(jié)果，對(duì)系統(tǒng)安全性進(jìn)行有針對(duì)性的設(shè)計(jì)。（1）后臺(tái)SQLServer數(shù)據(jù)庫(kù)以Sa為系統(tǒng)管理員，這一角色由河套大學(xué)的專職計(jì)算機(jī)人員擔(dān)當(dāng)，負(fù)責(zé)對(duì)后臺(tái)數(shù)據(jù)庫(kù)的保護(hù)。（2）對(duì)全部從“宿舍管理系統(tǒng)”前臺(tái)登錄的合法用戶，都以DBO角色來(lái)接見(jiàn)后臺(tái)數(shù)據(jù)庫(kù)。（3）經(jīng)過(guò)前臺(tái)開(kāi)發(fā)工具VisualBasic6.0對(duì)用戶登錄權(quán)限進(jìn)行嚴(yán)格的控制管理。4．3網(wǎng)絡(luò)拓?fù)浣Y(jié)構(gòu)圖4-2C/S和B/S混雜結(jié)構(gòu)的系統(tǒng)結(jié)構(gòu)圖4．4代碼設(shè)計(jì)代碼設(shè)計(jì)的主要原則是簡(jiǎn)單，易懂和可擴(kuò)大性，代碼設(shè)計(jì)的方法有好多，本系統(tǒng)采用層次疊加碼作為河套大學(xué)的信息編碼方案。下表以資源信息代碼表組成為例描述學(xué)生號(hào)的組成原理。第17頁(yè)高校宿舍管理系統(tǒng)4．5界面設(shè)計(jì)界面設(shè)計(jì)應(yīng)簡(jiǎn)單了然，如數(shù)家珍。一方面從用戶應(yīng)用需求出發(fā)，宿舍管理系統(tǒng)面對(duì)的最后用戶是對(duì)計(jì)算機(jī)其實(shí)不精曉的學(xué)校生活部管理員；另一方面友好、清楚的界面也易學(xué)易用，易保護(hù)。（1）河套大學(xué)宿舍管理系統(tǒng)界面，以以下圖所示：圖4-3宿舍系統(tǒng)主界面在屏幕最上方為主菜單區(qū)，顯示本系統(tǒng)的主菜單，用戶能夠用鼠標(biāo)來(lái)選擇下拉菜單項(xiàng)選擇項(xiàng)，選擇權(quán)限范圍內(nèi)的選項(xiàng)。當(dāng)用戶經(jīng)過(guò)選擇了菜單所要進(jìn)行的工作后，系統(tǒng)進(jìn)入相應(yīng)的業(yè)務(wù)辦理功能，這時(shí)整個(gè)業(yè)務(wù)辦理活動(dòng)在系統(tǒng)工作區(qū)進(jìn)行。當(dāng)業(yè)務(wù)辦理達(dá)成后，系統(tǒng)自動(dòng)返回到進(jìn)入次辦理以前的原始菜單顯示狀態(tài)。（2）輸入界面的設(shè)計(jì)第18頁(yè)高校宿舍管理系統(tǒng)為了方便用戶的使用，宿舍管理系統(tǒng)的界面大量的采用VisualBasic所供應(yīng)的標(biāo)準(zhǔn)控件，并配以一些下拉式菜單適合提高用戶工作效率，宿舍管理系統(tǒng)的輸入界面主要有：學(xué)生信息管理錄入、宿舍信息設(shè)置、入住信息錄入、評(píng)比獎(jiǎng)勵(lì)登記等。學(xué)生信息管理錄入以以下圖所示：圖4-4學(xué)生信息錄入界面4．6功能結(jié)構(gòu)圖的設(shè)計(jì)功能結(jié)構(gòu)圖主要從功能的角度描述了系統(tǒng)的結(jié)構(gòu)，但并未能表達(dá)各功能這間的數(shù)據(jù)傳達(dá)關(guān)系。河套大學(xué)宿舍管理系統(tǒng)從功能上能夠劃分出以下幾個(gè)模塊，以以下圖所示：第19頁(yè)高校宿舍管理系統(tǒng)圖4-5學(xué)生宿舍主功能圖為了詳細(xì)的描述系統(tǒng)功能，我將宿舍管理系統(tǒng)分為七個(gè)大的模塊：系統(tǒng)管理模塊，學(xué)生信息管理模塊，宿舍信息管理模塊，學(xué)生住宿管理模塊，評(píng)比及獎(jiǎng)勵(lì)管理模塊，綜合盤(pán)問(wèn)管理模塊，幫助模塊，每個(gè)模塊將實(shí)現(xiàn)不同樣的功能。下面將詳細(xì)進(jìn)行介紹4．6．1系統(tǒng)管理模塊系統(tǒng)管理模塊包括：用戶設(shè)置，操作銷定，注銷系統(tǒng)，撤出系統(tǒng)，數(shù)據(jù)清空幾個(gè)部分。以以下圖所示：圖4－6系統(tǒng)管理功能圖從登錄框登錄后，只有系統(tǒng)管理員才擁適用戶設(shè)置的權(quán)限。一般用戶不能夠夠使用，即沒(méi)有增加、更正用戶權(quán)限的權(quán)益。（1）用戶設(shè)置：設(shè)置用戶信息，如：用戶ID，用戶名稱，用戶密碼，以及用第20頁(yè)高校宿舍管理系統(tǒng)戶權(quán)限。（只有系統(tǒng)管理員system能夠設(shè)置新用戶權(quán)限）（2）操作銷定：判斷可否銷定系統(tǒng)，以應(yīng)付緊急情況。（3）注銷系統(tǒng)：注銷當(dāng)前工作用戶重新登錄系統(tǒng)。（4）撤出系統(tǒng)：?jiǎn)螕舫烦鱿到y(tǒng)。（5）數(shù)據(jù)清空：清空全部數(shù)據(jù)（只有系統(tǒng)管理員system有此權(quán)限）4．6．2學(xué)生信息管理模塊學(xué)生信息管理模塊包括：注冊(cè)學(xué)生信息，學(xué)生信息閱讀，學(xué)生信息盤(pán)問(wèn)三個(gè)部分，以以下圖所示：圖4－7學(xué)生信息管理功能圖注冊(cè)學(xué)生信息：登記學(xué)生基本信息。學(xué)生信息閱讀：閱讀全部注冊(cè)學(xué)生的信息。學(xué)生信息盤(pán)問(wèn)：以學(xué)號(hào)或姓名或性別為要點(diǎn)字進(jìn)行按條件盤(pán)問(wèn)。4．6．3宿舍信息管理模塊宿舍信息管理模塊包括：宿舍標(biāo)準(zhǔn)設(shè)置，宿舍信息設(shè)置。以以下圖所示：第21頁(yè)高校宿舍管理系統(tǒng)圖4-8宿舍信息管理功能圖（1）宿舍標(biāo)準(zhǔn)設(shè)置：設(shè)置各個(gè)標(biāo)準(zhǔn)信息，實(shí)現(xiàn)不同樣宿舍標(biāo)準(zhǔn)的分級(jí)管理。（2）宿舍信息設(shè)置：設(shè)置宿舍的所屬的標(biāo)準(zhǔn)及宿舍相關(guān)情況。4．6．4學(xué)生住宿管理模塊：學(xué)生住宿管理模塊包括：學(xué)生住宿登記，學(xué)生退宿登記，節(jié)余宿舍盤(pán)問(wèn)三個(gè)部分。以以下圖所示：圖4－9學(xué)生住宿管理功能圖（1）學(xué)生住宿登記：記錄學(xué)生選擇宿舍標(biāo)準(zhǔn)后的相關(guān)入宿情況。（2）學(xué)生退宿登記：學(xué)生退宿歸還宿舍資源（床位）情況的記錄（3）節(jié)余宿舍盤(pán)問(wèn)：統(tǒng)計(jì)未入住或未住滿的宿舍情況。4．6．5評(píng)比及獎(jiǎng)勵(lì)管理模塊評(píng)比及獎(jiǎng)勵(lì)管理模塊包括：評(píng)比標(biāo)準(zhǔn)，獎(jiǎng)品管理，評(píng)比獎(jiǎng)勵(lì)登記。以以下圖所示：第22頁(yè)高校宿舍管理系統(tǒng)圖4-10評(píng)比、獎(jiǎng)勵(lì)功能圖評(píng)比標(biāo)準(zhǔn)：以文本框的形式顯示評(píng)比標(biāo)準(zhǔn)。（1）獎(jiǎng)品管理：A獎(jiǎng)品等級(jí)設(shè)置：設(shè)置不同樣樣級(jí)獎(jiǎng)勵(lì)獎(jiǎng)品發(fā)放情況。獎(jiǎng)品明細(xì)設(shè)置：相關(guān)獎(jiǎng)品信息的設(shè)置。（2）評(píng)比等級(jí)登記：宿舍評(píng)比等級(jí)錄入情況。4．6．6綜合信息盤(pán)問(wèn)：學(xué)生注冊(cè)入宿信息管理模塊包括：宿舍標(biāo)準(zhǔn)盤(pán)問(wèn)，學(xué)生入住信息盤(pán)問(wèn)兩個(gè)模塊。以以下圖所示：圖4－11綜合信息盤(pán)問(wèn)功能圖第23頁(yè)高校宿舍管理系統(tǒng)宿舍標(biāo)準(zhǔn)盤(pán)問(wèn)：統(tǒng)計(jì)全部宿舍標(biāo)準(zhǔn)，即宿舍設(shè)置情況以宿舍號(hào)或床位數(shù)為要點(diǎn)字盤(pán)問(wèn)相應(yīng)設(shè)置情況。(2)學(xué)生入住信息盤(pán)問(wèn)：統(tǒng)計(jì)全部學(xué)生入住情況，以宿舍號(hào)或?qū)W號(hào)或姓名進(jìn)行有條件盤(pán)問(wèn)。4．6．7幫助模塊此模塊是對(duì)學(xué)生宿舍管理系統(tǒng)開(kāi)發(fā)者的相關(guān)信息的一個(gè)簡(jiǎn)單的介紹。第五章宿舍管理系統(tǒng)的系統(tǒng)推行經(jīng)過(guò)了系統(tǒng)規(guī)劃，系統(tǒng)分析和系統(tǒng)設(shè)計(jì)等階段后，便開(kāi)始了系統(tǒng)推行階段，這個(gè)階段要繼承以前各階段的工作成就，是系統(tǒng)分析和設(shè)計(jì)階段的結(jié)晶。5．1開(kāi)發(fā)工具的選擇5．1．1前臺(tái)開(kāi)發(fā)工具的選擇比較幾種開(kāi)發(fā)工具今后，我選擇了VisualBasic6.0作為河套大學(xué)宿舍管理系統(tǒng)前臺(tái)開(kāi)發(fā)工具。這主若是考慮到學(xué)習(xí)比較簡(jiǎn)單，而且相關(guān)論壇比很多，能夠?qū)崟r(shí)的達(dá)成任務(wù)。BASIC語(yǔ)言是碰到國(guó)內(nèi)外千百萬(wàn)計(jì)算機(jī)愛(ài)好者歡迎的語(yǔ)言，自1964年問(wèn)世以來(lái)，從實(shí)驗(yàn)室走向校園，從校園走向社會(huì)，從社會(huì)一度走向全世界，向來(lái)不衰。BASIC是BeginnersAllPurposeSystemInterChangeCode（初學(xué)者通用符號(hào)代碼）的縮寫(xiě)。與其他高級(jí)語(yǔ)言對(duì)照，它的語(yǔ)法規(guī)則相對(duì)簡(jiǎn)單，簡(jiǎn)單理解和掌握，且擁有使用價(jià)值，被以為是最理想的初學(xué)者語(yǔ)言。BASIC語(yǔ)言自出生以來(lái)，在廣泛使用中不斷的發(fā)展。隨著Windows環(huán)境的推履行用，好多人正在學(xué)習(xí)和使用了在Windows環(huán)境中編程使用的BASIC—VisualBasic。故我采用VisualBasic6.0作為前臺(tái)開(kāi)發(fā)工具。5．1．2后臺(tái)數(shù)據(jù)庫(kù)的選擇數(shù)據(jù)庫(kù)是數(shù)據(jù)管理的最新技術(shù)，是計(jì)算機(jī)科學(xué)的重要分支。十年來(lái)，數(shù)據(jù)庫(kù)管理系統(tǒng)已從專用的應(yīng)用程序包發(fā)展成為通用系統(tǒng)軟件。由于數(shù)據(jù)庫(kù)擁有數(shù)據(jù)結(jié)構(gòu)化、最低冗余度、較高的程序與數(shù)據(jù)獨(dú)立性、易于擴(kuò)大、易于編制應(yīng)用程序等優(yōu)點(diǎn)，較大的信息系統(tǒng)都是建立在數(shù)據(jù)庫(kù)設(shè)計(jì)之上的。由于用到的數(shù)據(jù)表格多，別的考慮到實(shí)質(zhì)情況，學(xué)生基本信息的變動(dòng)，還有員工信息的多少的變化，我們采用SQLServer作為數(shù)據(jù)庫(kù)開(kāi)發(fā)，而不用Access，主若是由于Access數(shù)據(jù)庫(kù)是一個(gè)桌面數(shù)據(jù)庫(kù)系統(tǒng)，不合合用戶程序?qū)?shù)據(jù)庫(kù)遠(yuǎn)第24頁(yè)高校宿舍管理系統(tǒng)程連接，而SQLServer是一種常用的關(guān)系數(shù)據(jù)庫(kù)，能存放和讀取大量的數(shù)據(jù)，管理眾多并發(fā)的用戶，應(yīng)采用SQLServer數(shù)據(jù)庫(kù)。5．2程序?qū)崿F(xiàn)（源代碼）5．2．1系統(tǒng)源代碼我用Visualbasic為河套大學(xué)開(kāi)發(fā)的<<宿舍管理系統(tǒng)>>，有大量的程序源代碼，下面僅有幾種重要的程序源代碼，列示以下：系統(tǒng)界面源代碼：――――――――――――――PrivateSubMDIForm_Load()MainForm.Caption=StrSystem'IfTrim(LimStuMess)=1ThenStudenMan.Enabled=TrueElseStudenMan.Enabled=FalseEndIfIfTrim(LimHosMess)=1ThenHostelMan.Enabled=TrueElseHostelMan.Enabled=FalseEndIfIfTrim(GoHosManMess)=1ThenGoHosMan.Enabled=TrueElseGoHosMan.Enabled=FalseEndIfIfTrim(LimGradeMess)=1ThenStuGrade.Enabled=TrueElseStuGrade.Enabled=FalseEndIfIfTrim(LimAllMess)=1ThenAllData.Enabled=TrueElseAllData.Enabled=FalseEndIf第25頁(yè)高校宿舍管理系統(tǒng)Statu.Panels(1).Text=StrSystem&Space(10)&"Version1.0"Statu.Panels(2).Text="當(dāng)前操作員："&LoginNameStatu.Panels(3).Text="系統(tǒng)開(kāi)發(fā)人員：王淑霞"EndSubPrivateSubNoHosFind_Click()EndSubPrivateSubOpLock_Click()CallSysLockSubEndSubPrivateSubStaHosFind_Click()EndSubPrivateSubStaticHos_Click()EndSubPrivateSubStuFind_Click()EndSubPrivateSubStuHosFind_Click()EndSubPrivateSubStuMessList_Click()EndSubPrivateSubSysExit_Click()EndEndSubPrivateSubTimer1_Timer()第26頁(yè)高校宿舍管理系統(tǒng)Label1.Caption=Now()EndSubPrivateSubTryLogin_Click()DimIsYesNoAsStringSetrs=NothingSetcn=NothingIsYesNo=MsgBox("可否確認(rèn)注銷系統(tǒng)？",vbQuestion+vbYesNo,strsytem)IfIsYesNo=vbYesThenUnloadMainFormEndIfEndSubPrivateSubUserSys_Click()EndSubPublicSubSysLockSub()DimISLOCKAsStringISLOCK=MsgBox("可否確認(rèn)鎖定系統(tǒng)？",vbCritical+vbYesNo,StrSystem)IfISLOCK=vbYesThenSysLock.Show1EndIfEndSub―――――――――――――――――――――――――――宿舍標(biāo)準(zhǔn)信息設(shè)置源代碼：――――――――――OptionExplicitPublicIsAddEditAsStringPrivateSubCmdAdd_Click()StaticNumber.Enabled=TrueStaticName.Enabled=TrueHosMoney.Enabled=TrueStaticNumber.Text=""StaticName.Text=""HosMoney.Text=""CmdAdd.Enabled=False第27頁(yè)高校宿舍管理系統(tǒng)CmdSave.Enabled=TrueCmdFind.Enabled=FalseCmdDel.Enabled=FalseIsAddEdit="新增"EndSubPrivateSubCmdDel_Click()DimstrSQLAsStringDimIsYesNoAsStringIsYesNo=MsgBox("可否確認(rèn)刪除記錄？",vbInformation+vbYesNo,StrSystem)IfIsYesNo=vbYesThenstrSQL="DELETEFROMStaticHosTableWHEREStaticNumber='"&StaticNumber.Text&"'"Ifrs.State=1ThenEndIfrs.OpenstrSQL,cn,adOpenStatic,adLockOptimisticCallShowListData("")EndIfEndSubPrivateSubCmdExt_Click()UnloadMeEndSubPrivateSubCmdFind_Click()DimStrWhereAsStringDimIsWhereAsStringIsWhere=InputBox("請(qǐng)輸入您要查找的宿舍標(biāo)準(zhǔn)號(hào)或標(biāo)準(zhǔn)名稱

","請(qǐng)輸入條件

","請(qǐng)輸入您要查找的宿舍標(biāo)準(zhǔn)號(hào)或標(biāo)準(zhǔn)名稱")StrWhere="AND(StaticNumberLIKE'%"&CheckString(IsWhere)&"%'ORStaticNameLIKE'%"&CheckString(IsWhere)&"%')"CallShowListData(StrWhere)EndSubPrivateSubCmdSave_Click()第28頁(yè)高校宿舍管理系統(tǒng)DimstrSQLAsStringIfIsAddEdit="新增"ThenIfTrim(StaticNumber.Text)=""OrTrim(StaticName.Text)=""OrTrim(HosMoney.Text)=""ThenMsgBox"宿舍標(biāo)準(zhǔn)號(hào)、標(biāo)準(zhǔn)名稱、住宿費(fèi)均不能以為空！",vbInformation,StrSystemExitSubEndIfstrSQL="SELECT*FROMStaticHosTableWHEREStaticNumber='"&CheckString(StaticNumber.Text)&"'"Ifrs.State=1ThenEndIfrs.OpenstrSQL,cn,adOpenStatic,adLockOptimisticIfrs.EOF=FalseThenMsgBox"宿舍號(hào)標(biāo)準(zhǔn)號(hào)不能夠重復(fù)！",vbInformation,StrSystemExitSubEndIfstrSQL="INSERTINTOStaticHosTable(StaticNumber,StaticName,HosMoney,Hoskip,Hosdsk,Hoscab,HosCha,HosTv,HosNet,HosTelNum,HosTol)VALUES('"strSQL=strSQL&CheckString(StaticNumber.Text)&"','"&CheckString(StaticName.Text)&"','"&CheckString(HosMoney.Text)&"',"strSQL=strSQL&CheckString(HosKip.Text)&","&CheckString(HosDsk.Text)&","&CheckString(HosCab.Text)&","&CheckString(HosCha.Text)&","&CheckString(HosTv.Text)&","strSQL=strSQL&CheckString(HosNet.Text)&","&CheckString(HosTelNum.Text)",'"&CheckString(HosTol.Text)&"')"Ifrs.State=1Thenrs.CloseEndIfrs.OpenstrSQL,cn,adOpenStatic,adLockOptimisticEndIfIfIsAddEdit="更正"ThenstrSQL="UPDATEStaticHosTableSETStaticName='"&CheckString(StaticName.Text)&"',HosMoney="&CheckString(HosMoney.Text)&",HosKip="strSQL=strSQL&HosKip.Text&",HosDsk="&HosDsk.Text&",HosCab="&HosCab.Text&",HosCha="&HosCha.Text&",HosTv="strSQL=strSQL&HosTv.Text&",HosTelNum="&HosTelNum.Text&",HosTol='"HosTol.Text&"'WHEREStaticNumber='"&StaticNumber.Text&"'"第29頁(yè)高校宿舍管理系統(tǒng)rs.OpenstrSQL,cn,adOpenStatic,adLockOptimisticEndIfStaticNumber.Enabled=FalseStaticName.Enabled=FalseHosMoney.Enabled=FalseCmdAdd.Enabled=TrueCmdSave.Enabled=FalseCmdFind.Enabled=TrueCmdDel.Enabled=TrueCallShowListData("")EndSubPrivateSubForm_Load()HosStaticMess.Caption=StrSystem&"--宿舍標(biāo)準(zhǔn)信息設(shè)置"CmdAdd.Enabled=TrueCmdSave.Enabled=FalseCmdFind.Enabled=TrueCmdDel.Enabled=TrueStaticNumber.Enabled=FalseStaticName.Enabled=FalseHosMoney.Enabled=FalseCallShowListData("")EndSubPrivateSubHosList_Click()IsAddEdit="更正"DimstrSQLAsStringIfHosList.ListItems.Count=0ThenExitSubEndIfstrSQL="SELECT*FROMStaticHosTableWHEREHosList.SelectedItem.Text&"'"Ifrs.State=1ThenEndIfrs.OpenstrSQL,cn,adOpenStatic,adLockOptimistic第30頁(yè)StaticNumber='"&高校宿舍管理系統(tǒng)Ifrs.EOF=FalseThenStaticNumber.Text=Trim(rs![StaticNumber])StaticName.Text=Trim(rs![StaticName])HosMoney.Text=Trim(rs![HosMoney])HosKip.Text=Trim(rs![HosKip])HosDsk.Text=Trim(rs![HosDsk])HosCab.Text=Trim(rs![HosCab])HosTv.Text=Trim(rs![HosTv])HosNet.Text=Trim(rs![HosNet])HosTelNum.Text=Trim(rs![HosTelNum])HosTol.Text=Trim(rs![HosTol])EndIfSetrs=NothingEndSubPrivateSubHosList_DblClick()CmdAdd.Enabled=FalseCmdSave.Enabled=TrueCmdFind.Enabled=FalseCmdDel.Enabled=FalseStaticNumber.Enabled=FalseStaticName.Enabled=TrueHosMoney.Enabled=TrueEndSubPrivateSubV1_Change()EndSubPrivateSubV2_Change()EndSubPrivateSubV3_Change()EndSubPrivateSubV4_Change()第31頁(yè)高校宿舍管理系統(tǒng)EndSubPrivateSubV5_Change()EndSubPrivateSubV6_Change()EndSubPrivateSubV7_Change()EndSubPublicSubShowListData(ByVallpWhereAsString)''自定義過(guò)程，公共部分，為了實(shí)現(xiàn)顯示數(shù)據(jù)'DimrsAsDimstrSQLAsStringDimLvAsListItemstrSQL="SELECT*FROMStaticHosTableWHERE1=1"IflpWhere<>""ThenstrSQL=strSQL&lpWhereEndIfIfrs.State=1ThenEndIfrs.OpenstrSQL,cn,adOpenStatic,adLockOptimisticIfrs.EOF=FalseThenWhilers.EOF=FalseSetLv=HosList.ListItems.Add(,,Trim(rs![StaticNumber]))Lv.SubItems(1)=Trim(rs![StaticName])Lv.SubItems(2)=Trim(rs![HosMoney])Lv.SubItems(3)=Trim(rs![HosKip])第32頁(yè)高校宿舍管理系統(tǒng)Lv.SubItems(4)=Trim(rs![HosDsk])Lv.SubItems(5)=Trim(rs![HosCab])Lv.SubItems(6)=Trim(rs![HosCha])Lv.SubItems(7)=Trim(rs![HosTv])Lv.SubItems(8)=Trim(rs![HosNet])Lv.SubItems(9)=Trim(rs![HosTelNum])Lv.SubItems(10)=Trim(rs![HosTol])rs.MoveNextWendElseEndIfEndSub―――――――――――――――――――――5．2．2系統(tǒng)主要界面登陸框：圖5-1系統(tǒng)登錄界面系統(tǒng)主界面：（見(jiàn)圖4-2）學(xué)生入住界面：第33頁(yè)高校宿舍管理系統(tǒng)圖5-2學(xué)生入住界面學(xué)生退宿管理界面：圖5-3學(xué)生退宿界面第34頁(yè)高校宿舍管理系統(tǒng)節(jié)余宿舍盤(pán)問(wèn)界面：圖5-4節(jié)余宿舍盤(pán)問(wèn)界面5．3系統(tǒng)運(yùn)行環(huán)境5．3．1系統(tǒng)運(yùn)行的硬件環(huán)境服務(wù)器：CPU：P43．0GHZ內(nèi)存：1024MB硬盤(pán)：150GB顯示器：17”彩顯軟盤(pán)驅(qū)動(dòng)器：一個(gè)光盤(pán)驅(qū)動(dòng)器：一個(gè)當(dāng)前，服務(wù)器由高檔微機(jī)肩負(fù)，建議在資本條件贊同情況下，配置專用服務(wù)器。客戶端：CPU：P41．7GHZ內(nèi)存：256MB硬盤(pán)：60GB顯示器：17”彩顯軟盤(pán)驅(qū)動(dòng)器：一個(gè)光盤(pán)驅(qū)動(dòng)器：一個(gè)第35頁(yè)高校宿舍管理系統(tǒng)網(wǎng)絡(luò)環(huán)境：交換機(jī)一臺(tái)網(wǎng)線若干5．4系統(tǒng)操作步驟5．4．1系統(tǒng)的進(jìn)入（1）打開(kāi)客戶機(jī)，啟動(dòng)WindowsXP。（2）在桌面上單擊[河套大學(xué)宿舍管理系統(tǒng)]圖標(biāo)。（3）屏幕上出現(xiàn)登錄畫(huà)面，輸入代碼，姓名，密碼，達(dá)成后用鼠標(biāo)單擊按鈕。（4）進(jìn)入系統(tǒng)后，用鼠標(biāo)單擊菜單項(xiàng)選擇綱要執(zhí)行的功能。5．4．2系統(tǒng)操作次序

[確定]進(jìn)入系統(tǒng)后，只有依照正確的次序操作，才能保證系統(tǒng)的正常運(yùn)行，保證數(shù)據(jù)的正確性。當(dāng)?shù)谝淮芜M(jìn)入系統(tǒng)時(shí)，要先進(jìn)錄入管理，爾后再執(zhí)行其他模塊進(jìn)行辦理。5．4．3B/S模式的盤(pán)問(wèn)系統(tǒng)操作過(guò)程（1）在服務(wù)器上安裝IIS系統(tǒng)，啟動(dòng)Web服務(wù)；這樣系統(tǒng)就變成一個(gè)Web服務(wù)器。（2）在服務(wù)器上為數(shù)據(jù)庫(kù)建立用于Web服務(wù)的ODBC數(shù)據(jù)源。（3）以ASP技術(shù)為Web服務(wù)開(kāi)發(fā)盤(pán)問(wèn)程序，爾后將做好的ASP網(wǎng)頁(yè)復(fù)制到Web服務(wù)器的擁有可執(zhí)行權(quán)限的虛假目錄下，相關(guān)程序見(jiàn)附錄二:5．5系統(tǒng)測(cè)試經(jīng)過(guò)幾個(gè)月的努力，我的畢業(yè)設(shè)計(jì)《河套大學(xué)宿舍管理系統(tǒng)》也終于湊近結(jié)尾，為了使系統(tǒng)能夠牢固運(yùn)行，更加完滿，對(duì)系統(tǒng)進(jìn)行了有針對(duì)性的全面測(cè)試，采用的方式是：菜單項(xiàng)測(cè)試：為了保證每一項(xiàng)下拉菜單能夠正確的實(shí)現(xiàn)系統(tǒng)設(shè)計(jì)功能，我把相關(guān)學(xué)校宿舍及學(xué)生的基本數(shù)據(jù)，依照學(xué)生基本信息錄入，宿舍信息錄入等全部都輸入系統(tǒng)中，并對(duì)每個(gè)菜單屢次進(jìn)行了新增、刪除、更正、保存等操作，從而保證了菜單級(jí)功能的正確實(shí)現(xiàn)。數(shù)據(jù)追蹤：達(dá)成菜單測(cè)試后，我又對(duì)系統(tǒng)內(nèi)的每一個(gè)數(shù)據(jù)進(jìn)行了追蹤測(cè)試。比方：對(duì)學(xué)生信息管理的“增加”這一項(xiàng)。我第一將“計(jì)算機(jī)系2005級(jí)計(jì)算機(jī)第36頁(yè)高校宿舍管理系統(tǒng)信息管理專業(yè)01班的劉艷同學(xué)”錄入系統(tǒng)。爾后經(jīng)過(guò)“盤(pán)問(wèn)”來(lái)檢驗(yàn)數(shù)據(jù)可否正確插入了系統(tǒng)。綜合測(cè)試：在以上測(cè)試的基礎(chǔ)上對(duì)系統(tǒng)功能進(jìn)行整體測(cè)試，依次來(lái)檢驗(yàn)系統(tǒng)可否吻合系統(tǒng)設(shè)計(jì)的要求。第六章宿舍管理系統(tǒng)談?wù)摷罢雇?．1系統(tǒng)開(kāi)發(fā)總結(jié)歷時(shí)三個(gè)月的畢業(yè)設(shè)計(jì)現(xiàn)在已經(jīng)湊近結(jié)尾了，回想起這段日子,感覺(jué)收獲頗多。我此次畢業(yè)設(shè)計(jì)的任務(wù)是建立一個(gè)學(xué)生宿舍管理系統(tǒng)，它用到的開(kāi)發(fā)工具是VisualBasic語(yǔ)言，SQLServer數(shù)據(jù)庫(kù)。在設(shè)計(jì)的開(kāi)始階段為了趕忙熟悉VB語(yǔ)言，我詳細(xì)翻閱相關(guān)該方面的資料，對(duì)書(shū)中的基本理論知識(shí)逐章節(jié)地分析，同時(shí)還上機(jī)操作來(lái)加深理解。特別是對(duì)書(shū)中的一些典型實(shí)例，認(rèn)真學(xué)習(xí)它的編程思想，吸引它的編程技巧，弄懂程序中每句話的含義。在對(duì)所要應(yīng)用的技術(shù)有了一個(gè)基本認(rèn)識(shí)后，就開(kāi)始構(gòu)思自己的系統(tǒng)設(shè)計(jì)。認(rèn)真聽(tīng)老師對(duì)設(shè)計(jì)要求的講解，依照任務(wù)書(shū)的要求將整個(gè)系統(tǒng)分為幾個(gè)模塊，每個(gè)模塊詳細(xì)又要實(shí)現(xiàn)哪些功能，爾后就逐個(gè)模塊去一一詳細(xì)設(shè)計(jì)，設(shè)計(jì)的過(guò)程中不時(shí)地翻閱資料，用一些巧妙的技術(shù)來(lái)優(yōu)化程序。程序代碼達(dá)成此后，要進(jìn)行運(yùn)行調(diào)試，剛開(kāi)始由于沒(méi)有調(diào)試經(jīng)驗(yàn)和方法效率很低，最后在老師和同學(xué)的幫助下，終于順利達(dá)成了，自己也從中學(xué)到了很多東西?？傊?jīng)過(guò)幾個(gè)月的畢業(yè)設(shè)計(jì)，讓我感覺(jué)了軟件開(kāi)發(fā)的整個(gè)過(guò)程。畢業(yè)設(shè)計(jì)不但是對(duì)我在大學(xué)所學(xué)知識(shí)的一個(gè)綜合運(yùn)用，也是一次增加知識(shí)和經(jīng)驗(yàn)的好機(jī)遇，同時(shí)也使我學(xué)會(huì)了好多辦理、解決問(wèn)題的方法，大大提高了自己的著手能力，為立刻走上工作崗位打下了優(yōu)異的基礎(chǔ)。6．2系統(tǒng)開(kāi)發(fā)中碰到的問(wèn)題及解決措施一個(gè)系統(tǒng)的功能的實(shí)現(xiàn)，需要經(jīng)過(guò)這么幾步，第一把大體的骨架給設(shè)計(jì)好，爾后依照系統(tǒng)要求寫(xiě)代碼，接著是調(diào)試程序，最后完滿總結(jié)。其中最重要的兩步就是中間的兩步。在此次畢業(yè)設(shè)計(jì)中，給我印象最深的就是系統(tǒng)的調(diào)試。在調(diào)試過(guò)程中，碰到了很多的問(wèn)題，但是經(jīng)過(guò)我的不斷的查閱資料，老師的指導(dǎo)，同學(xué)的商討，這些問(wèn)題都逐漸獲取認(rèn)識(shí)決。6．3系統(tǒng)展望（1）本系統(tǒng)將對(duì)學(xué)校工作的影響第37頁(yè)高校宿舍管理系統(tǒng)本系統(tǒng)校方計(jì)劃將在下一學(xué)期開(kāi)始運(yùn)行，該系統(tǒng)的投入運(yùn)行將使宿管部門(mén)工作人員的工作負(fù)擔(dān)大減少，工作效率獲取提高，方便校內(nèi)各部門(mén)實(shí)現(xiàn)信息共享，同時(shí)對(duì)于推動(dòng)我校管理系統(tǒng)的改革，也將起到積極的作用。（2）下一步的工作宿舍內(nèi)部物質(zhì)的管理相對(duì)而言也是十分重要的，也需要進(jìn)行系統(tǒng)、規(guī)范的管理。設(shè)計(jì)初學(xué)校急于重申學(xué)生住宿管理工作，所以對(duì)于物質(zhì)管理仍保持過(guò)去管理方式，我和校方都已認(rèn)識(shí)到這一方面還需改進(jìn)。如何將物質(zhì)管理同樣推行規(guī)范化管理是我們下一步需要解決的問(wèn)題。當(dāng)前河套大學(xué)宿舍管理系統(tǒng)的B/S和C/S系統(tǒng)使用的后臺(tái)數(shù)據(jù)庫(kù)是同一臺(tái)服務(wù)器上的SQLServer數(shù)據(jù)庫(kù)，這種模式給我們的系統(tǒng)造成巨大的風(fēng)險(xiǎn)，為了防范一個(gè)服務(wù)器接入internet后可能碰到的各樣各樣的黑客的侵襲，經(jīng)過(guò)認(rèn)真研究并咨詢相關(guān)計(jì)算機(jī)專家，下一步我們決定對(duì)系統(tǒng)進(jìn)行以下改進(jìn)：供應(yīng)Web服務(wù)的服務(wù)器與供應(yīng)宿舍管理C/S模式的主服務(wù)分別，二者以適合的防火墻隔斷。由于Web用戶不過(guò)推行盤(pán)問(wèn)操作，而且盤(pán)問(wèn)信息對(duì)數(shù)據(jù)的實(shí)時(shí)性要求不太高，所以可采用主服器對(duì)Web服務(wù)器的數(shù)據(jù)庫(kù)準(zhǔn)時(shí)刷新的手段來(lái)解決Web服務(wù)器上的數(shù)據(jù)更新問(wèn)題。同時(shí)為了保證系統(tǒng)自己的安全，我們將采用一臺(tái)一般的微機(jī)作為備份機(jī)，每天準(zhǔn)時(shí)備份主服器的數(shù)據(jù)庫(kù)，這里介紹使用海量備份方式，可利用windows的計(jì)劃任務(wù)功能協(xié)助實(shí)現(xiàn)。改進(jìn)后的宿舍管理系統(tǒng)的結(jié)構(gòu)圖以下所示：圖6-1采用C/S和B/S混雜結(jié)構(gòu)的宿管系統(tǒng)結(jié)構(gòu)圖第38頁(yè)高校宿舍管理系統(tǒng)道謝片刻間，三個(gè)多月的畢業(yè)設(shè)計(jì)就要結(jié)束了，在參加設(shè)計(jì)的這段時(shí)間里，能夠達(dá)成此次畢業(yè)設(shè)計(jì)，除了我自己的努力外，老師和同學(xué)們也恩賜了我特別大的幫助。第一要感謝我的指導(dǎo)老師馬秀麟老師，在初次見(jiàn)面時(shí)，馬老師就耐心的為我分析該系統(tǒng)，告訴我當(dāng)前宿舍管理上的各樣弊端，讓我在就詳細(xì)設(shè)計(jì)該系統(tǒng)時(shí)盡可能的考慮全面，使我對(duì)整個(gè)設(shè)計(jì)有了一個(gè)初步的認(rèn)識(shí)。對(duì)我進(jìn)行全面、詳細(xì)的指導(dǎo)，并給了我好多難得的建議。在設(shè)計(jì)剛開(kāi)始時(shí)，對(duì)好多東西都是陌生的，發(fā)VB語(yǔ)言以前都沒(méi)有接觸過(guò)，都是我的指導(dǎo)老師恩賜了我耐心的指導(dǎo)，使我對(duì)陌生的開(kāi)發(fā)環(huán)境產(chǎn)生了濃厚的學(xué)習(xí)興趣。畢業(yè)設(shè)計(jì)能夠順利達(dá)成，我特別感謝馬老師任勞任怨的對(duì)我的幫助，同時(shí)也感謝我的同學(xué)，在該系統(tǒng)的達(dá)成過(guò)程也給我供應(yīng)了很多的建講和幫助?？傊诶蠋煴M心全力的幫助下，我的畢業(yè)設(shè)計(jì)才能如期順利達(dá)成，而且，我的導(dǎo)師就我的論文的編排和書(shū)寫(xiě)格式也為我提出了很多的更正建議。在此，我衷心的感謝他，誠(chéng)摯的向他說(shuō)一聲“感謝”!第39頁(yè)高校宿舍管理系統(tǒng)附錄一：主要參照文件VisualBasic程序設(shè)計(jì)》作者潭浩強(qiáng)袁玫清華大學(xué)初版《管理信息系統(tǒng)》主編黃梯云經(jīng)濟(jì)科學(xué)初版社《信息資源管理》主編甘仞初經(jīng)濟(jì)科學(xué)初版社《信息系統(tǒng)開(kāi)發(fā)》主編甘仞初經(jīng)濟(jì)科學(xué)初版社SQLServer中文版基礎(chǔ)培訓(xùn)教程》主編劉遵仁第40頁(yè)于忠清人民郵電初版社高校宿舍管理系統(tǒng)附錄二：主要源程序代碼用戶登陸源代碼：―――――――――PrivateSubCmdExt_Click()EndEndSubPrivateSubCmdOK_Click()DimstrSQLAsStringstrSQL="SELECT*FROMUserTableWHEREUserName='"&Replace(UserName.Text,"'","''")&"'ANDUserPwd='"&Replace(UserPwd.Text,"'","''")&"'"Ifrs.State=1ThenEndIfrs.OpenstrSQL,cn,adOpenStatic,adLockOptimisticIfrs.EOF=FalseThen'>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>LoginName=Trim(UserName.Text)LimStuMess=Trim(rs![StuMess])LimHosMess=Trim(rs![HosMess])LimGradeMess=Trim(rs![GradeMess])LimAllMess=Trim(rs![AllMess])'<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<UnloadMeElseMsgBox"密碼不正確，請(qǐng)重新輸入！UserPwd.SelStart=0UserPwd.SelLength=Len(UserPwd.Text)EndIfEndSub第41頁(yè)高校宿舍管理系統(tǒng)PrivateSubForm_Load()SystemName.Caption=StrSystem系'統(tǒng)名稱Login.Caption=StrSystem&"--登陸"IfLinkStartDatabase=FalseThenMsgBox"數(shù)據(jù)庫(kù)連接失敗，請(qǐng)重新配置系統(tǒng)UserMode中LinkStartDatabase的部分代碼！",vbInformation,StrSystemEndEndIfEndSubPrivateSubUserID_Change()''若是用戶輸入的ID正確，把相應(yīng)的用戶名顯示出來(lái)'DimrsAsNewADODB.RecordsetDimstrSQLAsStringIfTrim(UserID.Text)<>""ThenstrSQL="SELECT*FROMUserTableWHEREUserID='"&Replace(UserID.Text,"'","''")&"'"Ifrs.State=1ThenEndIfrs.OpenstrSQL,cn,adOpenStatic,adLockOptimisticIfrs.EOF=FalseThenUserName.Text=Trim(rs![UserName])CmdOK.Enabled=TrueElseUserName.Text=""CmdOK.Enabled=FalseEndIfEndIfSetrs=NothingEndSub――――――――――――――――――――――――――第42頁(yè)高校宿舍管理系統(tǒng)學(xué)生基本信息錄入源代碼：――――――――――PublicISAddEditAsStringPrivateSubCmdAdd_Click()ISAddEdit="ADD"StuNumber.Enabled=TrueStuName.Enabled=TrueStuAge.Enabled=TrueGoDate.Enabled=TrueSchDate.Enabled=TrueClass.Enabled=TrueAddRess.Enabled=TrueAddNumber.Enabled=TrueTelNumber.Enabled=True'StuNumber.Text=""StuName.Text=""Class.Text=""AddRess.Text=""AddNumber.Text=""TelNumber.Text=""CmdAdd.Enabled=FalseCmdSave.Enabled=TrueCmdFind.Enabled=TrueCmdDel.Enabled=FalseEndSubPrivateSubCmdDel_Click()DimIsDelAsStringDimstrSQLAsStringIsDel=MsgBox("可否確認(rèn)刪除該學(xué)生的信息？",vbInformation+vbYesNo,strsytem)'IfIsDel=vbYesThenIfStuList.ListItems.Count=0Then第43頁(yè)高校宿舍管理系統(tǒng)ExitSubEndIfstrSQL="DELETEFROMStuMessWHEREStuNumber='"&StuList.SelectedItem.Text&"'"Ifrs.State=1ThenEndIfrs.OpenstrSQL,cn,adOpenStatic,adLockOptimisticEndIfCallShowStuMessList("")EndSubPrivateSubCmdExt_Click()UnloadMeEndSubPrivateSubCmdFind_Click()DimstrWhereAsStringstrWhere=InputBox("請(qǐng)輸入您要盤(pán)問(wèn)學(xué)生學(xué)號(hào)或姓名要點(diǎn)字：

",

請(qǐng)輸入條件

,"請(qǐng)輸入您要盤(pán)問(wèn)學(xué)生學(xué)號(hào)或姓名要點(diǎn)字")strWhere="ANDStuNameLIKE'%"&CheckString(strWhere)&"%'ORStuNumberLIKE'%"&CheckString(strWhere)&"%'"CallShowStuMessList(strWhere)調(diào)'用自定義過(guò)程，傳達(dá)用戶輸入的條件！EndSubPrivateSubCmdSave_Click()DimstrSQLAsStringIfISAddEdit="ADD"ThenIfTrim(StuNumber.Text)<>""ThenstrSQL="SELECT*CheckString(StuNumber.Text)&"'"Ifrs.State=1ThenEndIfrs.OpenstrSQL,cn,adOpenStatic,adLockOptimisticIfrs.EOF=FalseThenMsgBox"學(xué)生信息中學(xué)生不能夠重復(fù)！",vbInformation,StrSystemStuNumber.Text=""FROMStuMessWHEREStuNumber='"&第44頁(yè)高校宿舍管理系統(tǒng)ExitSubEndIfEndIfIfTrim(StuNumber.Text)=""OrTrim(StuName.Text)=""ThenMsgBox"學(xué)生的學(xué)號(hào)或姓名均不能以為空！",vbInformation,StrSystemExitSubEndIfstrSQL="INSERTINTOStuMess(StuNumber,StuName,StuSex,GoDate,SchDate,Class,AddRes,AddNumber,TelNumber)VALUES('"strSQL=strSQL&CheckString(StuNumber.Text)&"','"&CheckString(StuName.Text)&"','"&CheckString(StuAge.Text)&"','"strSQL=strSQL&CheckString(GoDate.Value)&"','"&CheckString(SchDate.Value)&"','"&CheckString(Class.Text)&"','"strSQL=strSQL&CheckString(AddRess.Text)&"','"&CheckString(AddNumber.Text)&"','"&CheckString(TelNumber.Text)&"')"Ifrs.State=1ThenEndIfrs.OpenstrSQL,cn,adOpenStatic,adLockOptimisticEndIfIfISAddEdit="EDIT"ThenIfTrim(StuNumber.Text)=""OrTrim(StuName.Text)=""ThenMsgBox"學(xué)生的學(xué)號(hào)或姓名均不能以為空！",vbInformation,StrSystemExitSubEndIfstrSQL="UPDATEStuMessSETStuName='"&CheckString(StuName.Text)&"',StuSex='"&CheckString(StuAge.Text)&"',"strSQL=strSQL&"GoDate='"&CheckString(GoDate.Value)&"',SchDate='"&CheckString(SchDate.Value)&"',Class='"&CheckString(Class.Text)&"',"strSQL=strSQL&"AddRes='"&CheckString(AddRess.Text)&"',AddNumber='"&CheckString(AddNumber.Text)&"',TelNumber='"&CheckString(TelNumber.Text)"'"strSQL=strSQL&"WHEREStuNumber='"&Trim(StuNumber.Text)&"'"Ifrs.State=1Thenrs.CloseEndIfrs.OpenstrSQL,cn,adOpenStatic,adLockOptimisticEndIfCallShowStuMessList("")'顯示數(shù)據(jù),該處為自定過(guò)程.第45頁(yè)高校宿舍管理系統(tǒng)StuNumber.Enabled=FalseStuName.Enabled=FalseStuAge.Enabled=False性'別GoDate.Enabled=FalseSchDate.Enabled=FalseClass.Enabled=FalseAddRess.Enabled=FalseAddNumber.Enabled=FalseTelNumber.Enabled=FalseCmdAdd.Enabled=TrueCmdSave.Enabled=FalseCmdFind.Enabled=TrueCmdDel.Enabled=TrueSetrs=NothingEndSubPrivateSubForm_Load()Studen.Caption=StrSystem&"--學(xué)生基本信息"StuNumber.Enabled=FalseStuName.Enabled=FalseStuAge.Enabled=FalseGoDate.Enabled=FalseSchDate.Enabled=FalseClass.Enabled=FalseAddRess.Enabled=FalseAddNumber.Enabled=FalseTelNumber.Enabled=FalseCmdAdd.Enabled=TrueCmdSave.Enabled=FalseCallShowStuMessList("")EndSubPublicSubShowStuMessList(ByVallpWhereAsString)'第46頁(yè)高校宿舍管理系統(tǒng)'自定義過(guò)程，公共部分，為了實(shí)現(xiàn)顯示數(shù)據(jù)'DimrsAsDimstrSQLAsStringDimLvAsListItemstrSQL="SELECT*FROMStuMessWHERE1=1"IflpWhere<>""ThenstrSQL=strSQL&lpWhere&"ORDERBYStuNumber"EndIfIfrs.State=1ThenEndIfrs.OpenstrSQL,cn,adOpenStatic,adLockOptimisticIfrs.EOF=FalseThenWhilers.EOF=FalseSetLv=StuList.ListItems.Add(,,Trim(rs![StuNumber]))Lv.SubItems(1)=Trim(rs![StuName])Lv.SubItems(2)=Trim(rs![StuSex])Lv.SubItems(3)=Trim(rs![GoDate])Lv.SubItems(4)=Trim(rs![SchDate])Lv.SubItems(5)=Trim(rs![Class])Lv.SubItems(6)=Trim(rs![Addres])Lv.SubItems(7)=Trim(rs![AddNumber])Lv.SubItems(8)=Trim(rs![TelNumber])WendElseEndIfEndSubPrivateSubStuList_Click()CallShowData'調(diào)用自定義過(guò)程。EndSub第47頁(yè)高校宿舍管理系統(tǒng)PrivateSubStuList_DblClick()ISAddEdit="EDIT"CallShowData'用戶雙擊更正數(shù)據(jù)。StuNumber.Enabled=FalseStuName.Enabled=TrueStuAge.Enabled=TrueGoDate.Enabled=TrueSchDate.Enabled=TrueClass.Enabled=TrueAddRess.Enabled=TrueAddNumber.Enabled=TrueTelNumber.Enabled=TrueCmdAdd.Enabled=FalseCmdSave.Enabled=TrueCmdFind.Enabled=FalseCmdDel.Enabled=FalseEndSubPublicSubShowData()'把用戶選擇的該條數(shù)據(jù)顯示出來(lái)。DimstrSQLAsStringIfStuList.ListItems.Count=0ThenExitSubEndIfstrSQL="SELECT*FROMStuMessWHEREStuNumber='"&StuList.SelectedItem.Text&"'"Ifrs.State=1ThenEndIfrs.OpenstrSQL,cn,adOpenStatic,adLockOptimisticIfrs.EOF=FalseThenStuNumber.Text=Trim(rs![StuNumber])StuName.Text=Trim(rs![StuName])StuAge.Text=Trim(rs![StuSex])GoDate.Value=Trim(rs![GoDate])SchDate.Value=Trim(rs![SchDate])第48頁(yè)高校宿舍管理系統(tǒng)Class.Text=Trim(rs![Class])AddRess.Text=Trim(rs![Addres])AddNumber.Text=Trim(rs![AddNumber])TelNumber.Text=Trim(rs![TelNumber])EndIfEndSub―――――――――――――――――――――――――――――――學(xué)生入住管理源代碼：――――――――――OptionExplicitPublicstrStaticNumberAsString'宿舍號(hào)標(biāo)準(zhǔn)號(hào)PrivateSubCmdAdd_Click()DimstrSQLAsString'＊＊＊＊＊＊＊＊＊＊＊＊＊＊＊＊＊＊＊＊＊＊＊＊＊＊＊＊＊＊＊＊＊strSQL="SELECTHosNumberFROMHosGrnWHEREHosNoSum>=1"Ifrs.State=1ThenEndIfrs.OpenstrSQL,cn,adOpenStatic,adLockOptimisticIfrs.EOF=FalseThenWhilers.EOF=FalseHosNumber.AddItemTrim(rs![HosNumber])WendHosNumber.Text=""EndIf'＊＊＊＊＊＊＊＊＊＊＊＊＊＊＊＊＊＊＊＊＊＊＊＊＊＊＊＊＊＊＊＊＊strSQL="SELECTstuNumberFROMStuMess"Ifrs.State=1ThenEndIfrs.OpenstrSQL,cn,adOpenStatic,adLockOptimisticIfrs.EOF=FalseThen第49頁(yè)高校宿舍管理系統(tǒng)Whilers.EOF=FalseStuNumber.AddItemTrim(rs![StuNumber])WendStuNumber.Text=""EndIf'＊＊＊＊＊＊＊＊＊＊＊＊＊＊＊＊＊＊＊＊＊＊＊＊＊＊'＊＊＊＊＊＊＊＊＊＊＊＊＊＊＊＊＊＊＊＊＊＊＊＊＊＊GoNumber.Text=CreateNumber("Gh")strSQL="SELECT*FROMGoHosTableWHEREGoNumber='"&Trim(GoNumber.Text)&"'"Ifrs.State=1ThenEndIfrs.OpenstrSQL,cn,adOpenStatic,adLockOptimisticIfrs.EOF=FalseThenMsgBox"入住序號(hào)重復(fù)！",vbInformation,StrSystemGoNumber.Text=""CmdAdd.Enabled=TrueExitSubEndIf'＊＊＊＊＊＊＊＊＊＊＊＊＊＊＊＊＊＊＊＊＊＊＊'＊＊＊＊＊＊＊＊＊＊＊＊＊＊＊＊＊＊＊＊＊＊＊HosNumber.Enabled=TrueStuNumber.Enabled=TrueStuName.Enabled=TrueStuTel.Enabled=TrueGoDate.Enabled=TrueCmdAdd.Enabled=FalseCmdSave.Enabled=TrueCmdDel.Enabled=FalseCmdFind.Enabled=False'＊＊＊＊＊＊＊＊＊＊＊＊HosNumber.Text=""StuNumber.Text=""StuName.Text=""StuTel.Text=""'＊＊＊＊＊＊＊＊＊＊＊＊＊＊＊＊＊＊＊＊＊＊＊第50頁(yè)高校宿舍管理系統(tǒng)EndSubPrivateSubCmdDel_Click()DimstrSQLAsStringDimIsDelAsStringIfLoginName<>"system"ThenMsgBox"對(duì)不起，您沒(méi)有此權(quán)限！",vbCritical,StrSystemE