版權(quán)說(shuō)明:本文檔由用戶提供并上傳,收益歸屬內(nèi)容提供方,若內(nèi)容存在侵權(quán),請(qǐng)進(jìn)行舉報(bào)或認(rèn)領(lǐng)
文檔簡(jiǎn)介
1、<p><b> 目 錄</b></p><p><b> 第一章.概述4</b></p><p><b> 1.1概述4</b></p><p> 第二章.系統(tǒng)分析6</p><p><b> 2.1需求分析6</b>&
2、lt;/p><p> 2.1.1開發(fā)的背景6</p><p> 2.1.2功能簡(jiǎn)介6</p><p> 2.1.3實(shí)現(xiàn)平臺(tái)7</p><p><b> 2.2系統(tǒng)分析7</b></p><p> 2.2.1系統(tǒng)分析的概念7</p><p> 2.2.1.1
3、系統(tǒng)分析階段的目標(biāo)7</p><p> 2.2.1.2系統(tǒng)分析工作活動(dòng)以及特點(diǎn)7</p><p> 2.2.2系統(tǒng)的可行性研究7</p><p> 2.2.2.1開發(fā)網(wǎng)吧計(jì)費(fèi)管理系統(tǒng)的經(jīng)濟(jì)可行性研究7</p><p> 2.2.2.2開發(fā)網(wǎng)吧計(jì)費(fèi)管理系統(tǒng)的技術(shù)可行性研究7</p><p> 2.2.
4、2.3開發(fā)網(wǎng)吧計(jì)費(fèi)管理系統(tǒng)的操作可行性研究8</p><p> 2.2.3網(wǎng)吧計(jì)費(fèi)管理系統(tǒng)邏輯模型的提出8</p><p> 2.2.3.1業(yè)務(wù)流程圖8</p><p> 2.2.3.2數(shù)據(jù)流圖9</p><p> 第三章.系統(tǒng)設(shè)計(jì)10</p><p> 3.1系統(tǒng)設(shè)計(jì)的含義10</p>
5、;<p> 3.2系統(tǒng)設(shè)計(jì)的任務(wù)10</p><p> 3.3系統(tǒng)設(shè)計(jì)的原則10</p><p> 3.4系統(tǒng)設(shè)計(jì)的目標(biāo)和功能10</p><p> 3.4.1系統(tǒng)功能描述11</p><p> 3.5總體設(shè)計(jì)12</p><p> 3.5.1總體設(shè)計(jì)中的問(wèn)題12</p>
6、;<p> 3.5.2子系統(tǒng)的劃分和確認(rèn)12</p><p> 3.6代碼設(shè)計(jì)13</p><p> 3.6.1代碼設(shè)計(jì)的原則13</p><p> 3.6.2代碼結(jié)構(gòu)的類型13</p><p> 3.6.3代碼設(shè)計(jì)的步驟與方法14</p><p> 3.6.4本系統(tǒng)中的代碼設(shè)計(jì)1
7、4</p><p><b> 3.7二維表14</b></p><p> 3.8數(shù)據(jù)字典15</p><p> 3.9功能實(shí)現(xiàn)過(guò)程15</p><p> 第四章.系統(tǒng)實(shí)現(xiàn)與轉(zhuǎn)換17</p><p> 4.1建立系統(tǒng)主界面17</p><p> 4.2建
8、立會(huì)員信息查詢界面18</p><p> 4.3建立管理員信息查詢界面22</p><p> 4.4建立硬件維護(hù)界面26</p><p><b> 第五章.結(jié)論28</b></p><p> 5.1會(huì)員信息查詢28</p><p> 5.2管理員信息查詢··
9、····································
10、3;·················28</p><p> 5.3維護(hù)··············
11、183;····································
12、···············29</p><p><b> 網(wǎng)吧計(jì)費(fèi)管理系統(tǒng)</b></p><p> 李瑩 指導(dǎo)教師:朱瑜</p><p> (2008級(jí)計(jì)算機(jī)科學(xué)與技術(shù))<
13、/p><p><b> 第一章.概述</b></p><p><b> 1.1概述: </b></p><p> 隨著計(jì)算機(jī)技術(shù)的成熟和計(jì)算機(jī)的網(wǎng)絡(luò)的普及,計(jì)算機(jī)的應(yīng)用在生活中隨處可見(jiàn), 網(wǎng)吧已成為大眾生活的一部分,網(wǎng)吧的出現(xiàn)同時(shí)也帶來(lái)了計(jì)時(shí)計(jì)費(fèi)的問(wèn)題。 網(wǎng)吧計(jì)費(fèi)管理系統(tǒng)就是針對(duì)此問(wèn)題而開發(fā)的系統(tǒng),
14、它主要面向網(wǎng)吧、電子閱覽室,在計(jì)費(fèi)管理上體現(xiàn)出一定的優(yōu)越性,可以實(shí)現(xiàn)輕松管理,并且實(shí)現(xiàn)效益最大,效益可持續(xù)化的多重需要。</p><p> 網(wǎng)吧計(jì)費(fèi)管理系統(tǒng)以計(jì)算機(jī)為工具,通過(guò)對(duì)上機(jī)管理所需的信息管理,把管理人從繁瑣的數(shù)據(jù)計(jì)算處理中解脫出來(lái),網(wǎng)吧計(jì)費(fèi)管理系統(tǒng)是一個(gè)實(shí)時(shí)人機(jī)系統(tǒng),它要求要有較高的可靠性、可適應(yīng)性、擴(kuò)充能力。</p><p> 系統(tǒng)采用了先進(jìn)的軟、硬件結(jié)合的方式。</
15、p><p> 客戶端采用硬件模式,通過(guò)硬件級(jí)的底層網(wǎng)絡(luò)登錄與身份驗(yàn)證相結(jié)合, 達(dá)到安全性。管理端采用軟件模式,主要管理網(wǎng)吧的上機(jī)業(yè)務(wù),它的主要功能模塊包括,系統(tǒng)管理、用戶結(jié)帳管理、電腦與計(jì)算機(jī)信息管理、日常管理、新會(huì)員辦理管理、用戶信息的維護(hù)管理、管理員信息的維護(hù)管理、用戶權(quán)限管理以及實(shí)行跨平臺(tái)管理等。本系統(tǒng)是一個(gè)運(yùn)行在局域網(wǎng)上的子系統(tǒng),能夠直觀、方便、有效、可靠地管理通過(guò)局域網(wǎng)聯(lián)在一起的所有機(jī)器,它具有以下優(yōu)點(diǎn):
16、 </p><p><b> 1.不用人守:</b></p><p> 系統(tǒng)通過(guò)提供強(qiáng)大的功能,最大限度降低網(wǎng)吧管理員的工作量,它能夠做到自動(dòng)判斷上網(wǎng)者是否已經(jīng)注冊(cè)會(huì)員、會(huì)員卡上金額是否足夠、以及通過(guò)驗(yàn)證上網(wǎng)者的身份來(lái)確定是否允許上網(wǎng)者使用機(jī)器,隨時(shí)判斷上網(wǎng)者卡上的當(dāng)前金額還能上機(jī)多久,當(dāng)卡上剩余金額低于系統(tǒng)規(guī)定的限額時(shí),系統(tǒng)會(huì)提前5分鐘提示上網(wǎng)者,"請(qǐng)
17、準(zhǔn)備下機(jī)",5分鐘后,系統(tǒng)會(huì)自動(dòng)將上網(wǎng)者所用的機(jī)器電源關(guān)掉。上網(wǎng)者下機(jī)時(shí),系統(tǒng)自動(dòng)計(jì)算并扣除上網(wǎng)者的上機(jī)費(fèi)用;同時(shí)自動(dòng)將該上網(wǎng)者所用的機(jī)器電源關(guān)掉。</p><p><b> 2.方便管理:</b></p><p> 本系統(tǒng)采用友好的界面,能夠幫助網(wǎng)吧管理員方便有效地對(duì)網(wǎng)吧進(jìn)行管理。系統(tǒng)詳細(xì)提供網(wǎng)吧所有機(jī)器的使用狀況,如登錄時(shí)間、總金額、消費(fèi)金額、現(xiàn)剩余
18、金額等信息,使網(wǎng)吧管理人員對(duì)每臺(tái)客戶機(jī)使用狀況一目了然;同時(shí)系統(tǒng)提供強(qiáng)大的管理功能,網(wǎng)吧管理員能夠方便有效地對(duì)網(wǎng)吧內(nèi)任意機(jī)器進(jìn)行管理,如發(fā)消息、禁止使用等。一次可以選中一臺(tái)機(jī)器進(jìn)行管理操作,也可以同時(shí)選中多臺(tái)機(jī)器進(jìn)行管理操作。系統(tǒng)還提供可追蹤的歷史記錄,如上網(wǎng)者上機(jī)的歷史記錄,還包括上網(wǎng)者在辦理會(huì)員卡后忘記密碼,這時(shí)就可根據(jù)上網(wǎng)者最初的原始記錄,查找出密碼。上網(wǎng)者上機(jī)的歷史記錄使得網(wǎng)吧管理人員對(duì)上網(wǎng)者使用機(jī)器狀況有清晰的了解,對(duì)機(jī)器出現(xiàn)
19、的故障能夠追究責(zé)任到個(gè)人。對(duì)上網(wǎng)者消費(fèi)金額的變動(dòng)提供了有跡可尋的記錄。 </p><p><b> 3.功能強(qiáng)大:</b></p><p> 網(wǎng)吧使用安排靈活方便,自由安排機(jī)時(shí)單價(jià),具有預(yù)定座位功能,環(huán)境要求低,適應(yīng)能力強(qiáng),無(wú)須特殊的配置或者專門的服務(wù)器。</p><p> 本系統(tǒng)充分考慮了用戶環(huán)境各種可能出現(xiàn)的情況,提供靈活的應(yīng)變措施,
20、充分利用網(wǎng)吧的網(wǎng)絡(luò)資源,對(duì)網(wǎng)吧進(jìn)行有效的管理。即使網(wǎng)吧的網(wǎng)絡(luò)發(fā)生故障,不能正常工作,系統(tǒng)仍然能夠在各個(gè)單機(jī)上獨(dú)立地對(duì)機(jī)器資源進(jìn)行安全控制、計(jì)算上機(jī)費(fèi)用、并登記使用情況。</p><p><b> 4.查詢功能:</b></p><p> 本系統(tǒng)充分考慮到管理的需要,從網(wǎng)吧管理員、上網(wǎng)者上機(jī)、兩個(gè)層面提供了完善的查詢功能。</p><p>
21、 從網(wǎng)吧管理員角度,系統(tǒng)提供了有關(guān)任意機(jī)器在任意范圍時(shí)間內(nèi)的使用情況、使用者信息方面的詳細(xì)信息。</p><p> 從上網(wǎng)者上機(jī)角度,系統(tǒng)提供了個(gè)人在任意時(shí)間范圍內(nèi)的繳費(fèi)情況、消費(fèi)情況及剩余金額等信息,高級(jí)別的安全管理機(jī)制。</p><p><b> 5.安全機(jī)制:</b></p><p> 系統(tǒng)提供了方便高效的用戶授權(quán)機(jī)制,加強(qiáng)了對(duì)用戶
22、身份的識(shí)別,避免未經(jīng)授權(quán)的用戶越權(quán)使用系統(tǒng)。VB+ACCESS的使用使得系統(tǒng)的數(shù)據(jù)不會(huì)輕易被外界惡意的攻擊破壞,簡(jiǎn)單易懂,使用方便,身份識(shí)別有效者方可上機(jī),同一身份在同一時(shí)段不可復(fù)用,可有效防止密碼盜用,確保用戶資金安全。</p><p><b> 6.跨平臺(tái)管理:</b></p><p> 系統(tǒng)能夠同時(shí)在客戶機(jī)和服務(wù)器機(jī)上進(jìn)行控制和管理,實(shí)現(xiàn)跨平臺(tái)管理。<
23、/p><p> 并具有系統(tǒng)的可擴(kuò)充性.</p><p><b> 第二章.系統(tǒng)分析</b></p><p><b> 2.1需求分析:</b></p><p> 2.1.1開發(fā)的背景:</p><p> 針對(duì)網(wǎng)吧內(nèi)機(jī)子太多,上網(wǎng)人數(shù)也比較多,網(wǎng)吧管理人員對(duì)于網(wǎng)吧的管理雜
24、亂無(wú)章。工作進(jìn)行的非常不便。有時(shí)在進(jìn)行對(duì)機(jī)子的開機(jī)或者辦理會(huì)員,以及對(duì)機(jī)子維護(hù)時(shí)存在著工作的不便。其主要有以下幾點(diǎn):</p><p> 1.在整個(gè)上機(jī)過(guò)程中,管理人員需隨時(shí)進(jìn)行上下機(jī)登記、超時(shí)檢查等工作,特別是在上下機(jī)高峰或網(wǎng)吧較大,微機(jī)臺(tái)數(shù)較多的情況下,更是忙成一團(tuán),往往要安排多人值班才行,造成管理混亂和費(fèi)用增大的問(wèn)題。</p><p> 2. 由于上機(jī)是收費(fèi)服務(wù)的,所以免不了要進(jìn)行
25、經(jīng)濟(jì)方面的核算。不論是上機(jī)使用的鈔票還是使用會(huì)員卡進(jìn)行登記,都存在著偽造和人為因素的徇私舞弊行為的極大可能性,無(wú)法進(jìn)行有效、準(zhǔn)確、方便的財(cái)務(wù)核查和統(tǒng)計(jì)工作,必然造成經(jīng)濟(jì)損失和難于管理。</p><p> 3.因缺乏完備的上機(jī)檔案記錄,網(wǎng)吧無(wú)法對(duì)網(wǎng)吧的運(yùn)作進(jìn)行便捷的統(tǒng)計(jì)分析。</p><p> 2.1.2功能簡(jiǎn)介:</p><p> 對(duì)于以上所提出的問(wèn)題,越來(lái)越
26、多的網(wǎng)吧老板意識(shí)到網(wǎng)吧信息化管理的重要性、必要性,并逐步引進(jìn)穩(wěn)定性好的、簡(jiǎn)單易用、方便管理、具有人性化的軟件系統(tǒng)。</p><p> 為了網(wǎng)吧在管理上能減少這種雜亂無(wú)章的局面,又能讓網(wǎng)吧管理的工作更具人性化的一面。為此我們將開發(fā)一套針對(duì)于管理網(wǎng)吧的軟件-------網(wǎng)吧計(jì)費(fèi)管理系統(tǒng)。</p><p><b> 1.查詢功能:</b></p><
27、p> 我們想到能讓系統(tǒng)的管理在查詢方面有一定的功能。我們將在系統(tǒng)中開發(fā)查詢這一功能。這一功能將完成兩方面的大的工作就是對(duì)網(wǎng)吧內(nèi)的機(jī)子狀態(tài)進(jìn)行查詢還就是對(duì)會(huì)員進(jìn)行查詢。對(duì)會(huì)員的記錄的查詢可以根據(jù)用戶提供的證件進(jìn)行查詢。管理員還可以對(duì)某一個(gè)用戶進(jìn)行查詢以后對(duì)他的記錄進(jìn)行刪除、修改、充值等操作。</p><p><b> 2.硬件管理:</b></p><p>
28、 除以上所說(shuō)的功能以外我們還將對(duì)計(jì)算機(jī)的硬件設(shè)備進(jìn)行管理。也就是說(shuō)我們將要對(duì)每一臺(tái)機(jī)子CPU 網(wǎng)卡 顯卡等等的硬件設(shè)備進(jìn)行統(tǒng)計(jì)存入數(shù)據(jù)庫(kù)中去。進(jìn)行這方面的統(tǒng)計(jì)管理是為了在以后對(duì)機(jī)子的維護(hù)提供一些信息,這樣就對(duì)今后的計(jì)算機(jī)的維護(hù)提供了方便。</p><p> 2.1.3實(shí)現(xiàn)平臺(tái):</p><p> 本系統(tǒng)的功能實(shí)現(xiàn)是通過(guò)VB+ACCESS來(lái)實(shí)現(xiàn)的我們通過(guò)在服務(wù)器上用ACCESS來(lái)建立后臺(tái)
29、數(shù)據(jù)庫(kù),然后在應(yīng)用VB6.0來(lái)實(shí)現(xiàn)系統(tǒng)工作界面的制作。而在客戶服務(wù)器上也是應(yīng)用VB6.0來(lái)實(shí)現(xiàn)界面的制作只不過(guò)對(duì)于程序的數(shù)據(jù)調(diào)用是通過(guò)調(diào)用服務(wù)器的后臺(tái)數(shù)據(jù)來(lái)實(shí)現(xiàn)的。</p><p><b> 2.2系統(tǒng)分析:</b></p><p> 2.2.1系統(tǒng)分析的概念:</p><p> “分析”通常是指對(duì)現(xiàn)有系統(tǒng)的內(nèi)、外情況進(jìn)行調(diào)查、分析、研究
30、、分解、剖析,以明確問(wèn)題或機(jī)會(huì)所在,認(rèn)識(shí)解決這些問(wèn)題或把握這些機(jī)會(huì)的必要性,為確定有關(guān)活動(dòng)的目標(biāo)和可能的方案提供科學(xué)依據(jù)。系統(tǒng)分析也指應(yīng)用系統(tǒng)思想和系統(tǒng)科學(xué)的原理進(jìn)行分析工作的方法與技術(shù)。</p><p> 2.2.1.1系統(tǒng)分析階段的目標(biāo):</p><p> 系統(tǒng)分析階段的目標(biāo),就是按系統(tǒng)規(guī)則所定的某個(gè)開發(fā)項(xiàng)目范圍內(nèi)明確系統(tǒng)開發(fā)的目標(biāo)和用戶的信息需求,提出系統(tǒng)的邏輯方案。系統(tǒng)分析在整
31、個(gè)開發(fā)過(guò)程中,是要解決:“做什么”的問(wèn)題,把要解決哪些問(wèn)題,滿足用戶哪些具體的信息需求調(diào)查分析清楚,從邏輯上,或者說(shuō)從信息處理的功能需求上提出系統(tǒng)的方案,即邏輯模型,為下一階段進(jìn)行物理方案(即計(jì)算機(jī)和通信系統(tǒng)方案)設(shè)計(jì),解決:“怎么做”提供依據(jù)。</p><p> 2.2.1.2系統(tǒng)分析工作活動(dòng)以及特點(diǎn):</p><p> 系統(tǒng)分析階段的主要活動(dòng)有:系統(tǒng)初步調(diào)查、可行性研究、系統(tǒng)詳細(xì)調(diào)
32、查、新系統(tǒng)邏輯方案的提出。</p><p> 系統(tǒng)分析工作的特點(diǎn):</p><p> 1、工作內(nèi)容涉及面廣,不確定性大。</p><p> 2、系統(tǒng)分析工作主要面向組織管理問(wèn)題,工作方式主要是和人打交道。</p><p> 3、系統(tǒng)分析的主要成果是文件。</p><p> 4、系統(tǒng)分析工作追求的是有限目標(biāo)。
33、</p><p> 2.2.2系統(tǒng)的可行性研究:</p><p> 2.2.2.1開發(fā)網(wǎng)吧計(jì)費(fèi)管理系統(tǒng)的經(jīng)濟(jì)可行性研究:</p><p> 網(wǎng)吧是向社會(huì)公眾開放的營(yíng)利性上網(wǎng)服務(wù)提供場(chǎng)所,上網(wǎng)的人員日漸增多,網(wǎng)吧的管理十分不便,開發(fā)此軟件可以有效地減少管理勞動(dòng)力,從而節(jié)約很大一部分管理經(jīng)費(fèi),在經(jīng)濟(jì)上是可行的。</p><p> 2.2.
34、2.2開發(fā)網(wǎng)吧計(jì)費(fèi)管理系統(tǒng)的技術(shù)可行性研究:</p><p> 網(wǎng)吧計(jì)費(fèi)管理系統(tǒng)是比較簡(jiǎn)便的軟件,我們是計(jì)算機(jī)專業(yè)的學(xué)生,有一定的編程經(jīng)驗(yàn),可以將其開發(fā)出來(lái),在技術(shù)上是可行的。</p><p> 2.2.2.3開發(fā)網(wǎng)吧計(jì)費(fèi)管理系統(tǒng)的操作可行性研究:</p><p> 網(wǎng)吧管理系統(tǒng)是個(gè)比較簡(jiǎn)單的軟件,擁有一定電腦知識(shí)的人都可以使用。網(wǎng)吧管理系統(tǒng)就是一個(gè)使用少量的
35、工作人員對(duì)網(wǎng)吧進(jìn)行管理。只要系統(tǒng)開發(fā)使用后我們就可以使用較少的管理人員和維護(hù)人員來(lái)完成網(wǎng)吧里的工作。在操作上是可行的。</p><p> 2.2.3網(wǎng)吧計(jì)費(fèi)管理系統(tǒng)邏輯模型的提出:</p><p> 系統(tǒng)分析階段的任務(wù)是明確系統(tǒng)功能。通過(guò)對(duì)現(xiàn)行系統(tǒng)的調(diào)查分析,抽象出現(xiàn)行系統(tǒng)的邏輯模型,分析其存在的問(wèn)題。</p><p> 2.2.3.1業(yè)務(wù)流程圖:</p
36、><p> 2.2.3.2數(shù)據(jù)流圖:</p><p><b> 第三章.系統(tǒng)設(shè)計(jì)</b></p><p> 3.1系統(tǒng)設(shè)計(jì)的含義:</p><p> 系統(tǒng)設(shè)計(jì)就是根據(jù)新系統(tǒng)的邏輯模型建立物理模型,是一個(gè)根據(jù)新系統(tǒng)邏輯功能的要求,考慮企業(yè)的實(shí)際情況,詳細(xì)地確定新系統(tǒng)的結(jié)構(gòu)和具體實(shí)施方案的過(guò)程。如果說(shuō)系統(tǒng)分析解決了“系統(tǒng)
37、干什么”的問(wèn)題,那么系統(tǒng)設(shè)計(jì)就是解決“怎么干”。</p><p> 3.2系統(tǒng)設(shè)計(jì)的任務(wù):</p><p> 系統(tǒng)設(shè)計(jì)的任務(wù)就是要依據(jù)系統(tǒng)分析階段產(chǎn)生的文檔資料,采用正確的方法確定新系統(tǒng)在計(jì)算機(jī)內(nèi)應(yīng)該由哪些程序模塊組成,它們之間用什么方式聯(lián)結(jié)在一起以構(gòu)成一個(gè)最好的系統(tǒng)機(jī)內(nèi)結(jié)構(gòu),同時(shí)還要使用一定的工具將所設(shè)計(jì)的成果表達(dá)出來(lái)。另外,考慮到實(shí)現(xiàn)系統(tǒng)功能的需要,還要進(jìn)行數(shù)據(jù)庫(kù)的詳細(xì)設(shè)計(jì)、編碼設(shè)
38、計(jì)、輸入輸出設(shè)計(jì)、人機(jī)界面設(shè)計(jì)、系統(tǒng)的安全設(shè)計(jì)等。</p><p> 3.3系統(tǒng)設(shè)計(jì)的原則:</p><p><b> 1、簡(jiǎn)單性</b></p><p><b> 2、一致性和完整性</b></p><p><b> 3、靈活和適應(yīng)性</b></p>&
39、lt;p><b> 4、可靠性</b></p><p><b> 5、安全性</b></p><p><b> 6、經(jīng)濟(jì)性</b></p><p> 3.4系統(tǒng)設(shè)計(jì)的目標(biāo)和功能:</p><p> 系統(tǒng)設(shè)計(jì)就是根據(jù)新系統(tǒng)的邏輯模型建立物理模型,解決“怎么干”的問(wèn)
40、題。具體的是什么呢?就是根據(jù)系統(tǒng)分析所調(diào)查得到的資料,進(jìn)行進(jìn)一步的具體化的劃分。其實(shí)在系統(tǒng)設(shè)計(jì)里面所要做的東西,與系統(tǒng)分析里面的內(nèi)容是大同小異的。只是在系統(tǒng)設(shè)計(jì)里面把那些內(nèi)容給具體化了。利用分析工具和其他的工具用圖形和文字的形式,把系統(tǒng)所要達(dá)到的功能展現(xiàn)出來(lái),讓用戶能夠看到的明白。</p><p> 我們可以用下圖(2-3)來(lái)對(duì)系統(tǒng)的功能進(jìn)行描述。下圖是一張?jiān)谙到y(tǒng)分析階段的功能結(jié)構(gòu)圖。它為我們展示了一下系統(tǒng)的大
41、的功能模塊的情況。但是我們可以通過(guò)這張圖,來(lái)描述一下系統(tǒng)的功能。</p><p> 3.4.1系統(tǒng)功能描述:</p><p> 通過(guò)這張圖我們可以看出系統(tǒng)主要,要實(shí)現(xiàn)的是什么。系統(tǒng)主要實(shí)現(xiàn)是對(duì)用戶的管理、對(duì)信息的處理、對(duì)系統(tǒng)的維護(hù)管理的功能。</p><p> 在對(duì)用戶的管理的功能方面,又分為對(duì)會(huì)員的管理和對(duì)管理員的管理這兩方面。然而在每一方面又分為登陸管理和
42、注冊(cè)管理。</p><p> 在對(duì)于信息的處理方面呢,就是對(duì)信息的查詢處理。它主要又分為三個(gè)方面的處理:</p><p> 1、對(duì)于用戶信息的查詢處理</p><p> 2、對(duì)于上機(jī)用戶結(jié)賬信息的查詢處理</p><p> 3、對(duì)于硬件信息的查詢處理</p><p> 這三個(gè)功能主要是對(duì)信息查詢后,便于對(duì)用戶
43、進(jìn)行注冊(cè)操作和對(duì)計(jì)算機(jī)的維護(hù)工作。</p><p> 在對(duì)于系統(tǒng)維護(hù)這一個(gè)方面主要是對(duì)計(jì)算機(jī)的硬件的維護(hù)。這一功能的實(shí)現(xiàn),首先要通過(guò)對(duì)計(jì)算機(jī)信息的查詢后在進(jìn)行操作工作。為什么要進(jìn)行先查詢?cè)诓僮髂??這是為了能讓維護(hù)人員知道,需要維護(hù)的計(jì)算機(jī)它所配的硬件是什么型號(hào)的,在庫(kù)存里面還有沒(méi)有相應(yīng)的硬件設(shè)備。</p><p><b> 3.5總體設(shè)計(jì):</b></p&g
44、t;<p> 3.5.1總體設(shè)計(jì)中的問(wèn)題:</p><p> 總體結(jié)構(gòu)設(shè)計(jì)需要從軟硬件兩方面描述系統(tǒng)的總體結(jié)構(gòu),需要考慮以下問(wèn)題:</p><p> 1、如何將系統(tǒng)總體劃中劃分的子系統(tǒng)更合理的區(qū)別和確認(rèn)</p><p> 2、如何將子系統(tǒng)劃分為若干模塊</p><p> 3、模塊間的數(shù)據(jù)傳送和調(diào)用關(guān)系</p>
45、;<p> 4、如何評(píng)價(jià)模塊結(jié)構(gòu)的質(zhì)量</p><p> 5、采用怎樣的網(wǎng)絡(luò)拓?fù)浣Y(jié)構(gòu)</p><p> 6、如何進(jìn)行設(shè)備和網(wǎng)絡(luò)的配置</p><p> 3.5.2子系統(tǒng)的劃分和確認(rèn):</p><p> 1.系統(tǒng)劃分的原則:</p><p> ?。?)子系統(tǒng)要具有相對(duì)獨(dú)立性。</p>
46、<p> ?。?)使數(shù)據(jù)冗余較小。</p><p> ?。?)便于系統(tǒng)分階段實(shí)現(xiàn)。</p><p> (4)適應(yīng)組織管理機(jī)構(gòu)的設(shè)置。</p><p> (5)充分利用各種資源。</p><p> 2.系統(tǒng)劃分的方法:</p><p><b> (1)按職能劃分</b></
47、p><p> ?。?)按邏輯功能劃分</p><p><b> (3)按通信劃分</b></p><p> ?。?)按業(yè)務(wù)處理順序劃分</p><p> (5)按業(yè)務(wù)處理的時(shí)間關(guān)系劃分</p><p><b> 3.6代碼設(shè)計(jì):</b></p><p&g
48、t; 3.6.1代碼設(shè)計(jì)的原則:</p><p> 設(shè)計(jì)好的代碼體系,必須符合以下一些要求:</p><p> 1、唯一確定性。保證沒(méi)一個(gè)被表示的實(shí)體有而且只有一個(gè)確定的代碼。</p><p> 2、標(biāo)準(zhǔn)化與通用性。應(yīng)盡量采用上級(jí)部門規(guī)定的編碼標(biāo)準(zhǔn),列如行業(yè)編碼、部委與國(guó)家標(biāo)準(zhǔn)編碼等。系統(tǒng)內(nèi)部的代碼必須是統(tǒng)一的和規(guī)范。</p><p>
49、; 3、可擴(kuò)充性和穩(wěn)定性。代碼的結(jié)構(gòu)和編碼規(guī)則要考慮一段時(shí)期的不變性和日后增加代碼對(duì)象的適應(yīng)性。盡量避免代碼體系的變動(dòng)而引致數(shù)據(jù)存儲(chǔ)結(jié)構(gòu)及程序系統(tǒng)的大修改。</p><p> 4、便于識(shí)別和記憶。充分運(yùn)用各種結(jié)構(gòu)的符號(hào)組合和編碼技巧,使代碼不僅具有邏輯含義,而且便于識(shí)別和記憶。</p><p> 5、力求短小與格式統(tǒng)一。在不影響使用的前提下,應(yīng)盡量縮短代碼的長(zhǎng)度和使同類代碼在格式上的
50、統(tǒng)一。這不僅是為了讓用戶容易掌握和運(yùn)用,更重要的是要提高計(jì)算機(jī)存儲(chǔ)和處理數(shù)據(jù)的效率。</p><p> 6、容易修改。在需要時(shí)應(yīng)能方便地對(duì)某些代碼進(jìn)行調(diào)整或修改。</p><p> 3.6.2代碼結(jié)構(gòu)的類型:</p><p><b> 1、順序碼</b></p><p><b> 2、區(qū)間碼</b
51、></p><p><b> 1)層次碼</b></p><p><b> 2)十進(jìn)制碼</b></p><p><b> 3)特征碼</b></p><p><b> 3、 助記碼</b></p><p><b
52、> 4、 縮寫碼</b></p><p> 3.6.3代碼設(shè)計(jì)的步驟與方法:</p><p> 1、 確定代碼化實(shí)體</p><p><b> 2、 代碼結(jié)構(gòu)設(shè)計(jì)</b></p><p><b> 3、 確定編碼規(guī)則</b></p><p><
53、;b> 4、 實(shí)施編碼</b></p><p> 5、 建立計(jì)算機(jī)代碼體系</p><p> 3.6.4本系統(tǒng)中的代碼設(shè)計(jì):</p><p> 1、 本系統(tǒng)是針對(duì)網(wǎng)吧管理而開發(fā)的。所以在對(duì)數(shù)據(jù)庫(kù)的代碼的設(shè)計(jì)時(shí),對(duì)于上機(jī)的會(huì)員號(hào),采用的是區(qū)間碼中的層次碼。采用層次碼可以很快的知道上機(jī)用戶的大概身份,這樣對(duì)于一些突發(fā)事件的發(fā)生,就可以很快的知道
54、一些信息以便于進(jìn)行處理。因?yàn)樵诰W(wǎng)吧里,每臺(tái)電腦都有自己的編號(hào)。在進(jìn)行代碼設(shè)計(jì)的時(shí)候,就可以將電腦的編號(hào)放在前面,再把個(gè)人的編號(hào)放在后面這樣就實(shí)現(xiàn)了代碼的設(shè)計(jì)。</p><p> 2、 對(duì)于系統(tǒng)采用層次碼,還有一個(gè)很好的好處。就是便于記憶,用戶們不需要把全部的數(shù)字記住,只需要記住后面的數(shù)字即可。</p><p> 3、 系統(tǒng)的數(shù)據(jù)庫(kù)的代碼設(shè)計(jì),具體請(qǐng)看數(shù)據(jù)字典。</p>&
55、lt;p><b> 3.7二維表:</b></p><p><b> 管理員表</b></p><p><b> 會(huì)員表</b></p><p><b> 硬件表</b></p><p><b> 3.8數(shù)據(jù)字典:</b&g
56、t;</p><p><b> (1)管理員表</b></p><p><b> ?。?)會(huì)員表</b></p><p><b> ?。?) 硬件管理表</b></p><p> 3.9功能實(shí)現(xiàn)過(guò)程:</p><p> 功能一 信息查詢
57、:</p><p> 信息的查詢分的是三方面的查詢: </p><p> 一 、是對(duì)用戶信息的查詢 </p><p> 二、 是對(duì)計(jì)算機(jī)狀態(tài)的查詢</p><p> 三、 是對(duì)計(jì)算機(jī)硬件設(shè)備的查詢</p><p> 對(duì)于查詢功能來(lái)說(shuō),都會(huì)根據(jù)一定的條件來(lái)進(jìn)行查詢。所以我們?cè)谶M(jìn)行開發(fā)的時(shí)候,都是采用的在菜單中
58、選擇已經(jīng)設(shè)定好的條件來(lái)進(jìn)行查詢。無(wú)論用戶單擊哪個(gè),都是使用界面查詢的方式來(lái)進(jìn)行信息的查詢。</p><p> 功能二 硬件管理:</p><p> 硬件管理功能主要的目的,就是為維護(hù)人員在進(jìn)行維護(hù)工作時(shí)提供方便。因?yàn)橛布芾?,所管理的是?jì)算機(jī)上所安裝的一些硬件設(shè)備的信息。這個(gè)功能的實(shí)現(xiàn)也是采用的界面的形式來(lái)完成的。當(dāng)維護(hù)人員把所要維護(hù)的計(jì)算機(jī)的編號(hào)輸入進(jìn)行查詢后,在使用界面的形式反
59、饋出來(lái)。</p><p> 第四章.系統(tǒng)實(shí)現(xiàn)與轉(zhuǎn)換</p><p> 建立程序界面、編寫程序代碼。</p><p> 建立程序界面時(shí),通常要建立主界面窗體,然后利用”菜單編輯器”建立主菜單系統(tǒng),利用工具條控鍵建立工具條,最后根據(jù)菜單選項(xiàng)的需要分別建立各窗體和對(duì)話框。</p><p> 4.1建立系統(tǒng)主界面:</p>&l
60、t;p> (1)載窗體frm開始,設(shè)置屬性如下:</p><p> Caption屬性設(shè)置為“系統(tǒng)主界面“;windowsstate屬性設(shè)置為“2-Maximized”</p><p> (2)建立主菜單系統(tǒng):</p><p> 該程序的主菜單系統(tǒng)個(gè)菜單項(xiàng)及其選項(xiàng)的具體設(shè)置如表4-1所示:</p><p> 表4-1 程序主
61、菜單選項(xiàng)設(shè)置一覽表</p><p> (3)系統(tǒng)主界面如圖4-3所示:</p><p> 圖4-3 系統(tǒng)主界面</p><p> 4.2建立會(huì)員信息查詢界面:</p><p> ?。?)加載窗體和控件,并設(shè)置起屬性如下圖4-5所示:</p><p> 圖4-5 會(huì)員信息查詢界面</p><
62、;p> 屬性設(shè)置:將form窗體的caption的值設(shè)為會(huì)員刪修界面, 其WINDOWSSTATE屬性設(shè)為“2-Maximized”;;用菜單編輯器編輯兩個(gè)一級(jí)菜單分別是“刪除”和“修改”;在界面上添加一個(gè)datagride控件,在進(jìn)行字段檢索;添加一個(gè)ADODC控件;添加一個(gè)framle控件設(shè)置其caption屬性為“要修改的信息”;在framle控件里放置8個(gè)標(biāo)簽和8個(gè)文本框,8個(gè)標(biāo)簽的caption屬性分別設(shè)置為“卡號(hào),密
63、碼,姓名,性別,證件號(hào),類型,剩余,狀態(tài)”;添加一個(gè)command1控件,設(shè)置其caption屬性值為”提交“。添加一個(gè)command2控件,設(shè)置其caption屬性值為”返回系統(tǒng)主界面“。</p><p> ?。?)編寫代碼如下:</p><p> Private Sub hyxxcx_Click()</p><p> 系統(tǒng)主界面.Hide</p>
64、<p> c = InputBox("請(qǐng)輸入卡號(hào)!")</p><p> Dim db As New ADODB.Connection</p><p> Dim rs As New ADODB.Recordset</p><p> Dim jj As New ADODB.Recordset</p><p&
65、gt; Dim sql As String</p><p> db.ConnectionString = "Provider=Microsoft.Jet.OLEDB.4.0;Data Source=I:\機(jī)放上機(jī)管理信息系統(tǒng)\會(huì)員表.mdb;Persist Security Info=False"</p><p><b> db.Open</b&g
66、t;</p><p> sql = "select * from 會(huì)員表"</p><p> rs.Open sql, db, adOpenStatic, adLockReadOnly</p><p> If c = "" Then &假設(shè)變量c的值為空則執(zhí)行下列語(yǔ)句</p><p&
67、gt; 系統(tǒng)主界面.Show</p><p><b> Else</b></p><p> d = "select * from 會(huì)員表 where 卡號(hào) = '" & c & "'" &變量的值不為空則執(zhí)行下列語(yǔ)句</p><p> jj.O
68、pen d, db, adOpenStatic, adLockReadOnly</p><p> 會(huì)員刪修界面.Text1.Text = jj.Fields(1).Value</p><p> 會(huì)員刪修界面.Text2.Text = jj.Fields(2).Value</p><p> 會(huì)員刪修界面.Text3.Text = jj.Fields(3).Val
69、ue</p><p> 會(huì)員刪修界面.Text4.Text = jj.Fields(4).Value</p><p> 會(huì)員刪修界面.Text5.Text = jj.Fields(5).Value</p><p> 會(huì)員刪修界面.Text6.Text = jj.Fields(6).Value</p><p> 會(huì)員刪修界面.Text7
70、.Text = jj.Fields(7).Value</p><p> 會(huì)員刪修界面.Text8.Text = jj.Fields(8).Value &將查詢所得記錄的字段值顯示在會(huì)員刪修界面對(duì)應(yīng)的文本框中</p><p> 會(huì)員刪修界面.Show</p><p><b> End If</b></p>&
71、lt;p><b> End Sub</b></p><p> Private Sub xg_Click()</p><p> MsgBox "你是否確定要進(jìn)行修改?"</p><p> Frame1.Visible = True</p><p> Command1.Visible =
72、True</p><p> MsgBox "請(qǐng)雜文本框中填寫你要修改的項(xiàng)后單擊提交"</p><p><b> End Sub</b></p><p> Private Sub 提交_Click()</p><p> Dim db As New ADODB.Connection &a
73、mp;與數(shù)據(jù)庫(kù)建立連接</p><p> Dim rs As New ADODB.Recordset &聲明可用記錄集</p><p> Dim sql As String</p><p> Dim z As String</p><p> db.ConnectionString = "Provider=M
74、icrosoft.Jet.OLEDB.4.0;Data Source=I:\機(jī)放上機(jī)管理信息系統(tǒng)\會(huì)員表.mdb;Persist Security Info=False" &連接數(shù)據(jù)庫(kù)的路徑</p><p> db.Open &打開庫(kù)</p><p> sql = "select * from 會(huì)員表" &am
75、p;查詢會(huì)員表里面的所有記錄</p><p> rs.Open sql, db, adOpenStatic, adLockReadOnly &打開記錄</p><p><b> rs.Close</b></p><p> z = InputBox("請(qǐng)?jiān)诖_認(rèn)一下卡號(hào)") &在修該信息
76、填寫好以后在次輸入卡號(hào)進(jìn)行確認(rèn)</p><p> a = "update 會(huì)員表 set 卡號(hào) = '" & Text1.Text & "',密碼 = '" & Text2.Text & "',姓名= '" & Text3.Text & "',性別
77、= '" & Text4.Text & "',證件號(hào)= '" & Text5.Text & "',類型= '" & Text6.Text & "',剩余= '" & Text7.Text & "',狀態(tài)= '" &
78、amp; Text8.Text & "'where 卡號(hào)='" & z & "'" &修改卡號(hào)等于InputBox里面的值的記錄,其對(duì)應(yīng)字段的值在文本框里面取</p><p> rs.Open a, db, adOpenStatic, adLockReadOnly &打開記錄集與數(shù)據(jù)庫(kù)的連
79、接</p><p> MsgBox "你已經(jīng)提交成功!"</p><p> Adodc1.Refresh & Adodc控件更新</p><p> 1.Refresh &DataGrid控件更新</p><p> DataGrid1.Visible = True &am
80、p;DataGrid設(shè)置為可見(jiàn)</p><p> Frame1.Visible = False & Frame設(shè)置為不可見(jiàn)</p><p><b> End Sub</b></p><p> Private Sub 刪除_Click()</p><p> Dim j, x As String&l
81、t;/p><p> x = InputBox("請(qǐng)?jiān)诖_認(rèn)一下卡號(hào)")</p><p> j = MsgBox("你確定要?jiǎng)h除這條記錄嗎?")</p><p> Dim db As New ADODB.Connection &與數(shù)據(jù)庫(kù)建立連接</p><p> Dim rs As N
82、ew ADODB.Recordset &聲明可用記錄集</p><p> Dim sql As String</p><p> db.ConnectionString = "Provider=Microsoft.Jet.OLEDB.4.0;Data Source=I:\機(jī)放上機(jī)管理信息系統(tǒng)\會(huì)員表.mdb;Persist Security Info=Fals
83、e" &連接數(shù)據(jù)庫(kù)的路徑</p><p> db.Open &打開庫(kù)</p><p> sql = "delete * from 會(huì)員表 where 卡號(hào) ='" & x & "'"刪除卡號(hào)等于InputBox值的記錄</p><p> rs.
84、Open sql, db, adOpenStatic, adLockReadOnly &打開記錄集</p><p> MsgBox "你已經(jīng)成功刪除記錄"</p><p> Adodc1.Refresh & Adodc控件更新</p><p> DataGrid1.Refresh &Da
85、taGrid控件更新</p><p> DataGrid1.Visible = True &DataGrid設(shè)置為顯示</p><p><b> End Sub</b></p><p> Private Sub 返回系統(tǒng)主界面_Click()</p><p> 會(huì)員刪修界面.Hide</p
86、><p> 系統(tǒng)主界面.Show</p><p><b> End Sub</b></p><p> 會(huì)員信息查詢的實(shí)現(xiàn)過(guò)程,就是當(dāng)用戶在系統(tǒng)主菜單上,用菜單會(huì)員信息查詢的時(shí)候,就會(huì)彈出一個(gè)inputbox叫用戶輸入要查詢相關(guān)會(huì)員的卡號(hào)。這時(shí)系統(tǒng)就會(huì)根據(jù)卡號(hào)從數(shù)據(jù)庫(kù)中,查詢出相關(guān)信息。這些信息就會(huì)被顯示在會(huì)員刪修界面上的文本框里。當(dāng)用戶想對(duì)查
87、詢出來(lái)的信息進(jìn)行修改時(shí),可以單擊菜單修改,然后根據(jù)提示進(jìn)行操作。如果用戶還想對(duì)某個(gè)會(huì)員的信息進(jìn)行刪除的話,可以用菜單刪除,只須要輸入會(huì)員的卡號(hào)即可。</p><p> 4.3建立管理員信息查詢界面:</p><p> ?。?)加載窗體和控件,并設(shè)置起屬性如下圖4-6所示:</p><p> 圖4-6 管理員信息查詢界面</p><p>
88、 屬性設(shè)置:將form窗體的caption的值設(shè)為管理員刪修界面, 其WINDOWSSTATE屬性設(shè)為“2-Maximized”;;用菜單編輯器編輯兩個(gè)一級(jí)菜單分別是“刪除”和“修改”;在界面上添加一個(gè)datagride控件,在進(jìn)行字段檢索;添加一個(gè)ADODC控件;添加一個(gè)framle控件設(shè)置其caption屬性為“要修改的信息”;在framle控件里放置8個(gè)標(biāo)簽和8個(gè)文本框,8個(gè)標(biāo)簽的caption屬性分別設(shè)置為“卡號(hào),密碼,姓名,
89、性別,年齡,電話號(hào)碼,備注,編號(hào)”;添加一個(gè)command控件,設(shè)置其caption屬性值為”提交“。添加一個(gè)command2控件,設(shè)置其caption屬性值為”返回系統(tǒng)主界面“。</p><p> (2)編寫代碼如下:</p><p> Private Sub glyxxcx_Click()</p><p> 系統(tǒng)主界面.Hide</p>&l
90、t;p> z = InputBox("請(qǐng)輸入管理員使用的用戶名")</p><p> 管理員刪修界面.Text1.Text = ""</p><p> 管理員刪修界面.Text2.Text = ""</p><p> 管理員刪修界面.Text3.Text = ""</
91、p><p> 管理員刪修界面.Text4.Text = ""</p><p> 管理員刪修界面.Text5.Text = ""</p><p> 管理員刪修界面.Text6.Text = ""</p><p> 管理員刪修界面.Text7.Text = ""&
92、lt;/p><p> 管理員刪修界面.Text8.Text = "" &將管理員刪修界面的8個(gè)文本框進(jìn)行清空</p><p> Dim db As New ADODB.Connection &與數(shù)據(jù)庫(kù)建立連接</p><p> Dim rs As New ADODB.Recordset &建
93、立可用記錄集</p><p> Dim sql As String</p><p> Dim x As String</p><p> Dim kk As New ADODB.Recordset &建立可用記錄集</p><p> db.ConnectionString = "Provider=Micros
94、oft.Jet.OLEDB.4.0;Data Source=I:\機(jī)放上機(jī)管理信息系統(tǒng)\會(huì)員表.mdb;Persist Security Info=False" &建立連接數(shù)據(jù)庫(kù)的路徑</p><p> db.Open &打開數(shù)據(jù)庫(kù)</p><p> sql = "select * from 管理員表" &am
95、p;查詢管理員表里面的所有記錄</p><p> rs.Open sql, db, adOpenStatic, adLockReadOnly &打開所有查詢所得的記錄返回到記錄集rs中</p><p> While rs.EOF = True &給定循環(huán)語(yǔ)句里的條件</p><p> rs.MoveNext</p>
96、;<p><b> Wend</b></p><p> If z = "" Then</p><p> 系統(tǒng)主界面.Show</p><p><b> Else</b></p><p> x = "select * from 管理員表 wher
97、e 用戶名 = '" & z & "'" &查詢關(guān)于用戶名為變量z的記錄</p><p> kk.Open x, db, adOpenStatic, adLockReadOnly</p><p> 管理員刪修界面.Text1.Text = kk.Fields(1).Value</p><
98、;p> 管理員刪修界面.Text2.Text = kk.Fields(2).Value</p><p> 管理員刪修界面.Text3.Text = kk.Fields(3).Value</p><p> 管理員刪修界面.Text4.Text = kk.Fields(4).Value</p><p> 管理員刪修界面.Text5.Text = kk.Fi
99、elds(5).Value</p><p> 管理員刪修界面.Text6.Text = kk.Fields(6).Value</p><p> 管理員刪修界面.Text7.Text = kk.Fields(7).Value</p><p> 管理員刪修界面.Text8.Text = kk.Fields(0).Value &將查詢所獲得的記錄的
100、字段值輸入到管理員刪修界面相應(yīng)的文本框里</p><p> 管理員刪修界面.Show</p><p><b> End If</b></p><p><b> End Sub</b></p><p> Private Sub Form_Load()</p><p>
101、 Command1.Visible = False</p><p><b> End Sub</b></p><p> Private Sub 提交_Click()</p><p> Dim db As New ADODB.Connection &與數(shù)據(jù)庫(kù)建立連接</p><p> Dim rs
102、 As New ADODB.Recordset &建立返回的可用記錄集</p><p> Dim sql As String</p><p> Dim a As String</p><p> Dim z As String</p><p> db.ConnectionString = "Provider=
103、Microsoft.Jet.OLEDB.4.0;Data Source=I:\機(jī)放上機(jī)管理信息系統(tǒng)\會(huì)員表.mdb;Persist Security Info=False" &建立與數(shù)據(jù)庫(kù)建立連接的路徑</p><p> db.Open &打開庫(kù)</p><p> sql = "select * from 管理員表"
104、 &查詢管理員表里面的所有記錄</p><p> rs.Open sql, db, adOpenStatic, adLockReadOnly</p><p><b> rs.Close</b></p><p> z = InputBox("請(qǐng)?jiān)诖_認(rèn)一下用戶名")</p><p>
105、 a = "update 管理員表 set 用戶名 = '" & Text1.Text & "',密碼 = '" & Text2.Text & "',姓名= '" & Text3.Text & "',性別= '" & Text4.Text &
106、; "',年齡= '" & Text5.Text & "',電話號(hào)碼= '" & Text6.Text & "',備注= '" & Text7.Text & "' where 用戶名='" & z & "'&quo
107、t; &修改用戶名為變量z的記錄,其修改的值在管理員刪修界面里面的文本框里取</p><p> rs.Open a, db, adOpenStatic, adLockReadOnly</p><p> MsgBox "你已經(jīng)提交成功!"</p><p> Adodc1.Refresh & Adodc控件更
108、新</p><p> DataGrid1.Refresh & DataGrid控件更新</p><p> DataGrid1.Visible = True & DataGrid設(shè)置為可見(jiàn)</p><p> Frame1.Visible = False & Frame設(shè)置為不可用</p><
109、;p><b> End Sub</b></p><p> Private Sub 刪除_Click()</p><p> Dim j, x As String</p><p> x = InputBox("請(qǐng)?jiān)诖_認(rèn)一下姓名")</p><p> j = MsgBox("你確定
110、要?jiǎng)h除這條記錄嗎?")</p><p> Dim db As New ADODB.Connection &與數(shù)據(jù)庫(kù)建立連接</p><p> Dim rs As New ADODB.Recordset &建立可用的記錄集</p><p> Dim sql As String</p><p>
111、 db.ConnectionString = "Provider=Microsoft.Jet.OLEDB.4.0;Data Source=I:\機(jī)放上機(jī)管理信息系統(tǒng)\會(huì)員表.mdb;Persist Security Info=False" &建立與數(shù)據(jù)庫(kù)進(jìn)行連接的路徑</p><p> db.Open &打開庫(kù)</p><p>
112、 sql = "delete * from 管理員表 where 用戶名 ='" & x & "'" &刪除用戶名為變量z的記錄</p><p> rs.Open sql, db, adOpenStatic, adLockReadOnly</p><p> MsgBox " 你已經(jīng)成功刪
113、除記錄"</p><p> Adodc1.Refresh & Adodc控件更新</p><p> DataGrid1.Refresh & DataGrid控件更新</p><p> DataGrid1.Visible = True & DataGrid設(shè)置為可見(jiàn)</p><p
114、><b> End Sub</b></p><p> Private Sub 返回系統(tǒng)主界面_Click()</p><p> 系統(tǒng)主界面.Show</p><p><b> End Sub</b></p><p> 管理員信息查詢的實(shí)現(xiàn)過(guò)程,與會(huì)員信息查詢的實(shí)現(xiàn)過(guò)程大同小異。當(dāng)用戶
115、在想對(duì)管理員的信息進(jìn)行查詢的時(shí)候,就可以通過(guò)系統(tǒng)主界面上的管理員信息查詢菜單來(lái)實(shí)現(xiàn)。當(dāng)用戶單擊管理員信息查詢菜單的時(shí)候,就會(huì)出現(xiàn)一個(gè)inputbox,這時(shí)候用戶只需要輸入用戶就可對(duì)管理員的信息進(jìn)行查詢。系統(tǒng)會(huì)將查詢到的信息,顯示到管理員刪修界面的文本框里面。如果用戶想對(duì)查詢到信息進(jìn)行修改,則可以通過(guò)單擊修改菜單然后根據(jù)提示進(jìn)行修改。</p><p> 如用戶想對(duì)某個(gè)管理員的信息進(jìn)行刪除的話,則可以通過(guò)刪除菜單來(lái)
116、實(shí)現(xiàn)。</p><p> 當(dāng)用戶進(jìn)行一系列的操作之后??梢詥螕舴祷叵到y(tǒng)主界面安鈕返回系統(tǒng)主界面。</p><p> 4.4建立硬件維護(hù)界面:</p><p> ?。?)加載窗體和控件,并設(shè)置起屬性如下圖4-7所示:</p><p> 圖4-7 硬件維護(hù)界面</p><p> 屬性設(shè)置:將form的captio
117、n 屬性設(shè)置為“維護(hù)界面“,其WINDOWSSTATE屬性設(shè)為“2-Maximized”;在添加6個(gè)標(biāo)簽控件和6個(gè)文本框,6個(gè)標(biāo)簽控件的caption屬性分別設(shè)置為“計(jì)算機(jī)編號(hào),cpu型號(hào),顯卡型號(hào),內(nèi)存條型號(hào),硬盤型號(hào),備注“;添加一個(gè)command控件設(shè)置其caption屬性為”關(guān)閉“。</p><p> ?。?)編寫代碼如下:</p><p> Private Sub wh_Cli
118、ck()</p><p> Dim a As String</p><p> a = InputBox("請(qǐng)輸入你要進(jìn)行維護(hù)的計(jì)算機(jī)的編號(hào),以便于了解其所安裝的硬件情況。")</p><p> Dim db As New ADODB.Connection &與數(shù)據(jù)庫(kù)建立連接</p><p> Di
119、m rs As New ADODB.Recordset &建立返回可用記錄集</p><p> Dim sql As String</p><p> Dim kk As New ADODB.Recordset &建立返回可用記錄集</p><p> Dim b As String</p><p>
120、db.ConnectionString = "Provider=Microsoft.Jet.OLEDB.4.0;Data Source=I:\機(jī)放上機(jī)管理信息系統(tǒng)\會(huì)員表.mdb;Persist Security Info=False" &建立與數(shù)據(jù)庫(kù)進(jìn)行連接的路徑</p><p> db.Open &打開庫(kù)</p><p> I
121、f a = "" Then</p><p> 系統(tǒng)主界面.Show</p><p><b> Else</b></p><p> sql = "select * from 硬件表" &查詢硬件表里面的所有記錄</p><p> rs.Open sql, d
122、b, adOpenStatic, adLockReadOnly</p><p> b = "select * from 硬件表 where 計(jì)算機(jī)編號(hào) = '" & a & "'" &查詢計(jì)算機(jī)編號(hào)為變量z的記錄</p><p> kk.Open b, db, adOpenStatic, adLo
123、ckReadOnly</p><p> If 維護(hù)界面.Text2.Text = "text2" And 維護(hù)界面.Text3.Text = "text3" And 維護(hù)界面.Text4.Text = "text4" And 維護(hù)界面.Text5.Text = "text5" And 維護(hù)界面.Text6.Text = "
124、text6" Then</p><p> MsgBox "沒(méi)有此條記錄!"</p><p><b> Else</b></p><p> 維護(hù)界面.Text1.Text = kk.Fields(0).Value</p><p> 維護(hù)界面.Text2.Text = kk.Fields
125、(1).Value</p><p> 維護(hù)界面.Text3.Text = kk.Fields(2).Value</p><p> 維護(hù)界面.Text4.Text = kk.Fields(3).Value</p><p> 維護(hù)界面.Text5.Text = kk.Fields(4).Value</p><p> 維護(hù)界面.Text6.
126、Text = kk.Fields(5).Value &將查詢的值顯示在維護(hù)界面的文本框里面</p><p><b> 維護(hù)界面.Show</b></p><p><b> End If</b></p><p><b> End If</b></p><p&g
127、t;<b> End Sub</b></p><p> Private Sub Command1_Click()</p><p><b> 維護(hù)界面.Hide</b></p><p> 系統(tǒng)主界面.Show</p><p><b> End Sub</b></p
128、><p> 維護(hù)界面主要,要實(shí)現(xiàn)的就是查詢各個(gè)計(jì)算機(jī),.配備的硬件設(shè)備的情況。其實(shí)現(xiàn)過(guò)程就是用戶在用鼠標(biāo)單擊系統(tǒng)主界面的維護(hù)的時(shí)候,就會(huì)提示用戶輸入計(jì)算機(jī)的編號(hào)。然后系統(tǒng)就會(huì)根據(jù)計(jì)算機(jī)的編號(hào)查詢信息。將查詢到的信息顯示在維護(hù)界面的文本框內(nèi)。</p><p> 當(dāng)用戶瀏覽了信息以后,可以單擊關(guān)閉然后返回到系統(tǒng)主界面。</p><p><b> 第五章.結(jié)論
129、</b></p><p> 對(duì)于系統(tǒng)功能的總結(jié):</p><p> 5.1會(huì)員信息查詢:</p><p> 1)會(huì)員信息查詢,就是對(duì)于會(huì)員信息的查詢?yōu)g覽,以便于進(jìn)行進(jìn)一步的操作的一項(xiàng)查詢功能。其操作的步驟如下:</p><p> 1)在主系統(tǒng)界面上單擊會(huì)員信息查詢菜單;</p><p> 2)在彈
溫馨提示
- 1. 本站所有資源如無(wú)特殊說(shuō)明,都需要本地電腦安裝OFFICE2007和PDF閱讀器。圖紙軟件為CAD,CAXA,PROE,UG,SolidWorks等.壓縮文件請(qǐng)下載最新的WinRAR軟件解壓。
- 2. 本站的文檔不包含任何第三方提供的附件圖紙等,如果需要附件,請(qǐng)聯(lián)系上傳者。文件的所有權(quán)益歸上傳用戶所有。
- 3. 本站RAR壓縮包中若帶圖紙,網(wǎng)頁(yè)內(nèi)容里面會(huì)有圖紙預(yù)覽,若沒(méi)有圖紙預(yù)覽就沒(méi)有圖紙。
- 4. 未經(jīng)權(quán)益所有人同意不得將文件中的內(nèi)容挪作商業(yè)或盈利用途。
- 5. 眾賞文庫(kù)僅提供信息存儲(chǔ)空間,僅對(duì)用戶上傳內(nèi)容的表現(xiàn)方式做保護(hù)處理,對(duì)用戶上傳分享的文檔內(nèi)容本身不做任何修改或編輯,并不能對(duì)任何下載內(nèi)容負(fù)責(zé)。
- 6. 下載文件中如有侵權(quán)或不適當(dāng)內(nèi)容,請(qǐng)與我們聯(lián)系,我們立即糾正。
- 7. 本站不保證下載資源的準(zhǔn)確性、安全性和完整性, 同時(shí)也不承擔(dān)用戶因使用這些下載資源對(duì)自己和他人造成任何形式的傷害或損失。
最新文檔
- java畢業(yè)設(shè)計(jì)--網(wǎng)吧收費(fèi)管理系統(tǒng)
- 畢業(yè)設(shè)計(jì)--《網(wǎng)吧收費(fèi)系統(tǒng)》
- 畢業(yè)設(shè)計(jì)--《網(wǎng)吧收費(fèi)系統(tǒng)》
- vb畢業(yè)設(shè)計(jì)--《網(wǎng)吧收費(fèi)系統(tǒng)》
- 畢業(yè)設(shè)計(jì)---網(wǎng)吧管理系統(tǒng)
- 網(wǎng)吧管理系統(tǒng)畢業(yè)設(shè)計(jì)
- 畢業(yè)設(shè)計(jì)---網(wǎng)吧計(jì)費(fèi)管理系統(tǒng)
- 門診收費(fèi)管理系統(tǒng)畢業(yè)設(shè)計(jì)
- 畢業(yè)設(shè)計(jì)---網(wǎng)吧組網(wǎng)與管理
- 學(xué)校用電收費(fèi)管理系統(tǒng)畢業(yè)設(shè)計(jì)
- 門診收費(fèi)管理系統(tǒng)畢業(yè)設(shè)計(jì)畢業(yè)論文
- 畢業(yè)設(shè)計(jì)---收費(fèi)站智能管理系統(tǒng)
- 畢業(yè)設(shè)計(jì)停車場(chǎng)收費(fèi)管理系統(tǒng)
- 畢業(yè)設(shè)計(jì)----超市收費(fèi)系統(tǒng)
- 網(wǎng)吧網(wǎng)絡(luò)規(guī)劃畢業(yè)設(shè)計(jì)
- 畢業(yè)設(shè)計(jì)---有線電視收費(fèi)管理系統(tǒng)設(shè)計(jì)
- 計(jì)算機(jī)畢業(yè)設(shè)計(jì)65delphi通用網(wǎng)吧管理系統(tǒng)設(shè)計(jì)
- 計(jì)算機(jī)畢業(yè)設(shè)計(jì)65delphi通用網(wǎng)吧管理系統(tǒng)設(shè)計(jì)
- 網(wǎng)吧管理系統(tǒng)設(shè)計(jì)
- 計(jì)算機(jī)畢業(yè)設(shè)計(jì)65delphi通用網(wǎng)吧管理系統(tǒng)設(shè)計(jì).doc
評(píng)論
0/150
提交評(píng)論