【正文】 迫而重要的任務(wù)。計(jì)算機(jī)能實(shí)現(xiàn)對(duì)各項(xiàng)信息快速、準(zhǔn)確地記錄、存儲(chǔ)和檢索。計(jì)算機(jī)和網(wǎng)絡(luò)技術(shù)的應(yīng)用 不僅可以幫助學(xué)校建立起一套全新的、信息資源共享的管理體系，而且有助于提高管理效率，節(jié)約成本，培養(yǎng)學(xué)生的科技意識(shí)。其次，上機(jī)過(guò)程中，每個(gè)計(jì)算機(jī)機(jī)房都需要值班人員值班，耗費(fèi)了管理人員的很多時(shí)間。隨著上機(jī)人數(shù)的不斷增加，管理人 員卻仍有限等因素，隨之而來(lái)的各種管理問(wèn)題和矛盾就顯得尤為突出，總體來(lái)說(shuō)，目前許多高等院校機(jī)房管理在以下方面存在不同程度的問(wèn)題： （ 1） .管理工作量大 在整個(gè)上機(jī)過(guò)程中，管理人員需隨時(shí)進(jìn)行上下機(jī)查卡登記、人數(shù)核查、超時(shí)檢查等工作，特別是在上下機(jī)高峰或機(jī)房較大、微機(jī)臺(tái)數(shù)較多的情況下，更是忙做一團(tuán)，往往要安排多人值班才行，造成管理混亂和費(fèi)用增大的問(wèn)題。手工安排上機(jī)課表，因管理人員無(wú)法及時(shí)了解每天機(jī)房安排課時(shí)上機(jī)情況，易造成沖突，調(diào)度不方便，費(fèi)時(shí)費(fèi)人費(fèi)力。 （ 4） .財(cái)務(wù)漏洞較多 由于課外上機(jī)大多是收費(fèi)服務(wù)的，所以少不了要進(jìn)行經(jīng)濟(jì)方面的核算。 （ 6） .難于統(tǒng)計(jì)查詢(xún) Inter 的應(yīng)用使得對(duì)學(xué)生上網(wǎng)的記錄查詢(xún)與管理變得十分重要。 本系統(tǒng)開(kāi)發(fā)具有的主要的三大模塊：登陸模塊、上機(jī)管理模塊、系統(tǒng)費(fèi)率設(shè)置模塊。管理員可以自行設(shè)置各種收費(fèi)標(biāo)準(zhǔn)。 B/S 結(jié)構(gòu)簡(jiǎn)介 B/S 結(jié)構(gòu)，又稱(chēng) B/S 模 式，即 Brower/Server，瀏覽器 /服務(wù)器結(jié)構(gòu)， B/S 模式是指在 TCP/IP 的支持下，以 HTTP 為傳輸協(xié)議，客戶(hù)端通過(guò) Browser 訪(fǎng)問(wèn) Web服務(wù)器以及與之相連的后臺(tái)數(shù)據(jù)庫(kù)的技術(shù)及體系結(jié)構(gòu)。 與傳統(tǒng) C/S（客戶(hù)機(jī) /服務(wù)器）比較，其具有以下特點(diǎn)： 1．瘦客戶(hù)端 （ thinclient）使應(yīng)用更為便捷。 C/S 一般建立在專(zhuān)用的 網(wǎng)絡(luò)上，小范圍里的網(wǎng)絡(luò)環(huán)境，局域網(wǎng)之間再通過(guò)專(zhuān)門(mén)服務(wù)器提供連接和數(shù)據(jù)交換服務(wù)。 4．軟件組合性和重用性能更好。服務(wù)器將擔(dān)負(fù)更多的工作，對(duì)數(shù)據(jù)庫(kù)的訪(fǎng)問(wèn)和應(yīng)用程序的執(zhí)行將在服務(wù)器上完成。 這種結(jié)構(gòu)不僅把客戶(hù)機(jī)從沉重的負(fù)擔(dān)和不斷對(duì)其提高的性能的要求中解放出來(lái)，也把技術(shù)維護(hù)人員從繁重的維護(hù)升級(jí)工作中解脫出來(lái)。維護(hù)簡(jiǎn)單方便，只需要改變網(wǎng)貞，即可實(shí)現(xiàn)所有用戶(hù)的同步更新 。但最重要的還是Object Pascal 語(yǔ)言，它才是一切的根本?？梢哉f(shuō) Delphi 同時(shí)兼?zhèn)淞?VC功能強(qiáng)大和 VB 簡(jiǎn)單易學(xué)的特點(diǎn)。在 中 Borland 放棄了 OWL，取而帶之的是全新的 Visual Component Library，從此開(kāi)始了組件 (Component)技術(shù)的時(shí)代，其意義深遠(yuǎn)； 是完全面向?qū)ο蟮?。這大大方便了類(lèi)似數(shù)據(jù)輸入界面的管理，比如收款錄入和付款錄入界面，很多動(dòng)作相同，于是可以先構(gòu)造一個(gè) Form 作為基類(lèi)，繼承下去兩個(gè)甚至多個(gè)界面，相同動(dòng)作寫(xiě)于基類(lèi)中，不同的編寫(xiě)于子類(lèi)中。 在微軟 COM/DCOM 技術(shù)日益成熟的情況和企業(yè)對(duì)分布式應(yīng)用程序開(kāi)發(fā)工具的需求下， Borland 的開(kāi)發(fā)人員巧妙的平衡了二者的關(guān)系，使 成為Windows 平臺(tái)的第一款提供分布式開(kāi)發(fā)的開(kāi)發(fā)工具 。 Delphi 6 添加了對(duì)如下特性的支持：對(duì) CLX(Component Library for CrossPlatform CLX)跨平臺(tái)開(kāi)發(fā)的支持，擴(kuò)展的運(yùn)行庫(kù) (runtime library)，dbExpress 數(shù)據(jù)庫(kù)引擎， Web 服務(wù)和杰出的 XML 支持，一個(gè)強(qiáng)大的 Web 開(kāi)發(fā)框架，IDE 的更多增強(qiáng) ，大量的組件和類(lèi)， delphi 開(kāi)始為向 . 過(guò)渡做準(zhǔn)備。 用 Delphi7 開(kāi)發(fā)數(shù)據(jù)庫(kù)應(yīng)用，重點(diǎn)是和各種數(shù)據(jù)庫(kù)組件打交道，現(xiàn)在就我在系統(tǒng)設(shè)計(jì)中所使用的 ADO 數(shù)據(jù)訪(fǎng)問(wèn)組件 給與簡(jiǎn)單介紹。 ADO 使您的客戶(hù)端應(yīng)用程序能夠通過(guò) OLE DB提供訪(fǎng)問(wèn)和操作在數(shù)據(jù)庫(kù)服務(wù)器中的數(shù)據(jù)。利用 ADO 數(shù)據(jù)訪(fǎng)問(wèn)組件，可以只使用 ADO 結(jié)構(gòu)與數(shù)據(jù)庫(kù)取得聯(lián)系并對(duì)其中的數(shù)據(jù)進(jìn)行操 作，而在這些過(guò)程中完全不需要使用 BDE。使用這些 ADO 組件的方式與我們常使用的數(shù)據(jù)訪(fǎng)問(wèn)組件（基于 BDE）都有許多相同之處。 DELPHI 中利用 ADO 組件成功連接了數(shù)據(jù)庫(kù)，下面是一般步驟： TADOConnection 組件，并設(shè)置其 ConnectionString 屬性，以便連接數(shù)據(jù)庫(kù)。設(shè)計(jì)程序 時(shí)，在該組件的屬性對(duì)話(huà)框中選擇 SQL 屬性，單擊帶省略號(hào)的按鈕，就可以打開(kāi)String List Editor 對(duì)話(huà)框，然后我們就可以在對(duì)話(huà)框中添加 SQL 語(yǔ)句。數(shù)據(jù)庫(kù)中的數(shù)據(jù)可以是文字、圖象、聲音等。 ” Access 數(shù)據(jù)庫(kù)管理系統(tǒng)是 Microsoft Office 套件的重要組成部分，是 Access的最新版本，可在 Windows 95 環(huán)境下運(yùn)行。 Access數(shù)據(jù)庫(kù)以文件形式保存，文件的擴(kuò)展名是 MDB。 查詢(xún) (Query)——查詢(xún)可以按索引快速查找到需要的記錄，按要求篩選記錄并能連接若干個(gè)表的字段組成新表。 報(bào)表 (Report)——報(bào)表的功能是將數(shù)據(jù)庫(kù)中的數(shù)據(jù)分類(lèi)匯總，然后打印出來(lái)，以便分析。模塊使用 Visual Basic 編程。 Access 還可以方便地利用 FoxPro 數(shù)據(jù)庫(kù)、 Excel電子表格的數(shù)據(jù)，還可以和 Word 混合使用，打印通用信函或信 Access 數(shù)據(jù)庫(kù)軟件是一個(gè)關(guān)系型數(shù)據(jù)庫(kù)管理系統(tǒng)，它為用戶(hù)提供了數(shù)據(jù)庫(kù)管理的工具集和應(yīng)用程序的開(kāi)發(fā)環(huán)境。 Access 具有主關(guān)鍵字和外部關(guān)鍵字定義，提供了數(shù)據(jù)庫(kù)的完整性應(yīng)用，避免數(shù)據(jù)遭到不合理的刪除或修改。 Access 是面向數(shù)據(jù)庫(kù)開(kāi)發(fā)人員和最終用戶(hù)的數(shù)據(jù)庫(kù)管理系統(tǒng) Access 提供了 VBA(VISUAL BASIC FOR APPLICATION)語(yǔ)言。 14 Access 是開(kāi)放式的數(shù)據(jù)庫(kù)管理系統(tǒng) Access 內(nèi)置了大量的內(nèi)部函數(shù)。但是充分利用網(wǎng)絡(luò)信息渠道和現(xiàn)代設(shè)備進(jìn)行信息交流與協(xié)作，實(shí)現(xiàn)高效科學(xué)的實(shí)驗(yàn)室輔助管理便成為現(xiàn)代化企業(yè)所追求的目標(biāo)。技術(shù)上主要涉 及到以下些內(nèi)容：運(yùn)用網(wǎng)頁(yè)編輯技術(shù)，配合數(shù)據(jù)庫(kù)軟件開(kāi)發(fā)本系統(tǒng)，首先在本地編輯連接、對(duì)模塊進(jìn)行測(cè)試，在模塊測(cè)試之后就對(duì)系統(tǒng)的整體進(jìn)行測(cè)試。沒(méi)有可靠的經(jīng)費(fèi)來(lái)源，亦談不上系統(tǒng)完成后，能否帶來(lái)經(jīng)濟(jì)效益，無(wú)從考慮這個(gè)系 統(tǒng)項(xiàng)目是否合算等些許牽涉到利益的問(wèn)題。 計(jì)費(fèi)管理系統(tǒng)現(xiàn)狀 目前各地學(xué)校機(jī)房計(jì)費(fèi)系統(tǒng)主要分為前主要有 3種計(jì)費(fèi)方式：純軟件計(jì)費(fèi)、 16 純硬件計(jì)費(fèi)、軟硬件結(jié)合計(jì)費(fèi)。首先，同類(lèi)型的計(jì)費(fèi)軟件數(shù)量眾多，網(wǎng)上就有很多可輕松下載，如《美萍網(wǎng)管大師》與《網(wǎng)吧管理專(zhuān)家》等，學(xué)校在選擇時(shí)要分辨其優(yōu)劣很困難；其次，安全性很差，很容易被學(xué)生繞過(guò)或者破解；再次，在操作系統(tǒng)安裝客戶(hù)端也會(huì)有很多麻煩，一直占用電腦的資源，電腦的功能不能很 好的發(fā)揮，并不適合在學(xué)校的計(jì)算機(jī)實(shí)驗(yàn)室使用。它只在機(jī)房或者入口處設(shè)刷卡機(jī)，每臺(tái)計(jì)算機(jī)的管理，通過(guò)軟件來(lái)實(shí)現(xiàn)。 其中最為關(guān)鍵的是對(duì)公共機(jī)房應(yīng)建立網(wǎng)吧式的收費(fèi)管理系統(tǒng)。 網(wǎng)絡(luò)連接設(shè)備： Hub 和 Switch 互聯(lián)網(wǎng)PC PCPCPC. . . . . .互聯(lián)網(wǎng)接入服務(wù)器互聯(lián)網(wǎng)接入設(shè)備網(wǎng)絡(luò)連接設(shè)備 18 集中式系統(tǒng)適應(yīng)的標(biāo)準(zhǔn)網(wǎng)絡(luò)結(jié)構(gòu)如圖 所示 圖 多個(gè)互聯(lián)網(wǎng)出口 該結(jié)構(gòu)的特點(diǎn)是：通過(guò)多臺(tái)代理服務(wù)器或多個(gè)共享器上網(wǎng)，局域網(wǎng)采用 Hub 或Switch 連接。 在系 統(tǒng)中采用數(shù)據(jù)流圖（ DFD）這種半形式化的描述方式表達(dá)需求。 即簡(jiǎn)單 ,又明了 . 經(jīng)過(guò)對(duì)系統(tǒng)的分析首先得 DFD 圖 ，如下 圖 ： 圖 DFD 圖 (登陸管理 ) 再進(jìn)一步細(xì)化每一個(gè)數(shù)據(jù)加工功能，得到系 統(tǒng)的 DFD 圖 如下圖 ， ， 20 圖 DFD 圖（上機(jī)管理） 圖 DFD 圖（費(fèi)率設(shè)置） 在經(jīng)過(guò) 以上 階段的分析， 使 我確定了 系統(tǒng) 所要做的是 .以及應(yīng)實(shí)現(xiàn)的有關(guān)功能 . 概要設(shè)計(jì) 開(kāi)放性實(shí)驗(yàn)室輔助管理系統(tǒng)總的功能劃分如圖 ： 系統(tǒng) 設(shè)置 系統(tǒng)設(shè) 置表 系統(tǒng) 參數(shù) 學(xué)生 上機(jī) 學(xué)生 下機(jī) 記錄 查詢(xún) 記錄 統(tǒng)計(jì) 記錄 打印 當(dāng)前在機(jī)表 以前上機(jī)表 21 圖 系統(tǒng) 模塊 圖 系統(tǒng)功能描述 從幾年來(lái)的使用和管理經(jīng)驗(yàn)來(lái)看，學(xué)校需要的 “ 機(jī)房計(jì)費(fèi)管理系統(tǒng) ” 管理端與客戶(hù)端應(yīng)能達(dá)到和解決如下一些問(wèn)題： ◆ 可以支持 windows xp 操作系統(tǒng)的計(jì)費(fèi)； ◆ 計(jì)費(fèi)客戶(hù)端盡可能脫離操作系統(tǒng)運(yùn)行，最大限度的降低學(xué)生破解的可能性，增加安全性，增強(qiáng)系統(tǒng)穩(wěn)定性，減少維護(hù)量； ◆ 實(shí)現(xiàn)跨網(wǎng)段、跨路由，突破網(wǎng)段的限制； ◆ 能滿(mǎn)足大校區(qū)／多校區(qū)的要求，支持大數(shù)量 PC，保證整個(gè)系統(tǒng)的穩(wěn)定； ◆ 刷卡上機(jī)，學(xué)生一次只能開(kāi)啟一臺(tái) PC，對(duì)其他機(jī) 器無(wú)使用權(quán)； ◆ 學(xué)生下機(jī)注銷(xiāo)自動(dòng)關(guān)閉計(jì)算機(jī)，； ◆ 門(mén)禁機(jī)可顯示各個(gè)機(jī)房狀態(tài)和機(jī)房的預(yù)約狀態(tài)； ◆ 可設(shè)定指定學(xué)生上機(jī)位置，或隨意上機(jī)； ◆ 對(duì)不同的用戶(hù)、不同的機(jī)房或不同的電腦設(shè)定不同的費(fèi)率和收費(fèi)系數(shù)； ◆ 預(yù)約和自由上機(jī)記費(fèi)模式可自動(dòng)切換； ◆ 可提臨時(shí)上機(jī)、帳號(hào)上機(jī)等多種模式，且各模式可同時(shí)并存； ◆ 可將用戶(hù)原有的數(shù)據(jù)導(dǎo)入、導(dǎo)出功能，方便學(xué)生數(shù)據(jù)維護(hù)與生成； ◆ 可將公共消息發(fā)布到學(xué)生電腦上去的公告版消息理； 實(shí)驗(yàn)室計(jì)費(fèi)管理系統(tǒng) 系統(tǒng)登陸管理 系統(tǒng)上機(jī)管理 系統(tǒng)費(fèi)率 管理 22 ◆ 學(xué)生打印自動(dòng)計(jì)費(fèi)管理功能； ◆ 完善的查詢(xún) 費(fèi)用 功能； ◆ 安全的管理員權(quán)限管理，可以細(xì)分每個(gè)管理員的管理 權(quán)限； ◆ 機(jī)房網(wǎng)絡(luò)不通或服務(wù)器暫無(wú)法使用時(shí)，提供特殊計(jì)費(fèi)密碼繼續(xù)保證正常教學(xué)； ◆ 可對(duì)學(xué)校提供部分的二次開(kāi)發(fā)接口； 數(shù)據(jù)組織及定義 本系統(tǒng)是使用 Access 20xx 作為系統(tǒng)支撐數(shù)據(jù)庫(kù)： 建立數(shù)據(jù)庫(kù) ,主要用于管理員用戶(hù)的信息、獎(jiǎng)懲信息和獎(jiǎng)懲字段、班級(jí)管理、上機(jī)詳細(xì)記錄和卡號(hào)密碼、充值信息、機(jī)房信息、系統(tǒng)設(shè)定、卡號(hào)詳細(xì)信息，其對(duì)應(yīng)的表分別為 AdminList、 Award、 AwardItem、 ClassList、 CurOnline、dlpass、 FillNote、 jsjinfo、 OnlineNote、 SysSetup、 UserList[7]。 begin inherited。39。 exit。 then begin showmessage(39。 26 end。 end。,39。 if PassNum2 then begin MessageBox(handle,39。,MB_OK or MB_ICONERROR)。 end else ShowMessage(39。 procedure (Sender: TObject)。 procedure (Sender: TObject。 MIBtnOKClick(MIBtnOK)。此模塊可實(shí)現(xiàn)上機(jī)，下機(jī)以及全部上機(jī)記錄的顯示等功能 [9]。 begin inherited。 end。 // 學(xué)生上機(jī) :=Trim()。 if ( =39。+inttostr()+39。 if =39。 30 end。 Action:=caFree。詳細(xì)設(shè)計(jì)時(shí)各對(duì)象屬性如表 ： 表 下機(jī)收費(fèi) 管理界面對(duì)象屬性表 對(duì)象名（控件名） 屬性 取值（說(shuō)明 ） Xiaji Bisystm Menu True Biminimize False Caption 下機(jī)收費(fèi) Listview1(Tlistview) Gridlines True Tableorder 1 [0] Caption 卡號(hào) [1] Caption 上機(jī)時(shí)間 [2] Caption 下機(jī)時(shí)間 [3] Caption 用時(shí)（分） [4] Caption 費(fèi)用（元） Button1 (tbutton) Caption 關(guān)閉 31 下機(jī)流程如下圖 ： 圖 下機(jī)流程圖 實(shí)現(xiàn)功能代碼： procedure (Sender: TObject。 showmessage(39。 卡號(hào) 39。下機(jī)成功！ 39。 end。 miao:real； begin inherited。卡號(hào) 39。]+[39。 (datetimetostr(now))。 (floattostr(miao*))。 begin DateTimeToSystemTime(UpTime,Up)。詳細(xì)設(shè)計(jì)時(shí)各對(duì)象屬性如表 ： 表 計(jì)費(fèi) 費(fèi)率設(shè)置界面對(duì)象屬性表 對(duì)象名（控件名） 屬性 取值（說(shuō)明） Palclien