學(xué)生管理系統(tǒng)設(shè)計(jì)說明.doc

1 70 學(xué)生管理系統(tǒng)學(xué)生管理系統(tǒng) 詳細(xì)設(shè)計(jì)說明書 樂山師范學(xué)院計(jì)算機(jī)科學(xué)系樂山師范學(xué)院計(jì)算機(jī)科學(xué)系 Attract 工作室工作室 2003 08 30 2 70 編編寫寫說說明明 標(biāo)題 詳細(xì)設(shè)計(jì)說明書 類別 文檔 密級(jí) 內(nèi)部 編輯軟件 Microsoft Word 2000 中文版 版本歷史 版本作者日期備注 V1 012002 09 08詳細(xì)設(shè)計(jì)說明書 V1 0 22003 08 30 詳細(xì)設(shè)計(jì)說明書 編寫目的 本文檔詳細(xì)描述組成系統(tǒng)的各個(gè)軟件組成部分 包括每個(gè)軟件模塊 或類 的屬性 方法 事件 各軟件模塊的外部接口說明 測(cè)試要點(diǎn) 等內(nèi)容 本文檔由項(xiàng)目組維護(hù) 供項(xiàng)目組使用 目目錄錄 第第 1 章章引言引言 1 1 1 項(xiàng)目說明 1 1 2 項(xiàng)目定義 1 1 3 編寫目的 1 1 4 參考資料 1 第第 2 章章程序系統(tǒng)的結(jié)構(gòu)程序系統(tǒng)的結(jié)構(gòu) 2 第第 3 章章系統(tǒng)功能實(shí)現(xiàn)系統(tǒng)功能實(shí)現(xiàn) 3 3 1 系統(tǒng)控制臺(tái)模塊 3 3 2 新生管理子系統(tǒng) 6 3 3 學(xué)生在校管理子模塊 21 3 4 社團(tuán)組織管理子模塊 41 3 5 畢業(yè)生管理子模塊 49 3 6 教學(xué)評(píng)價(jià)打分 63 3 7 學(xué)生成績(jī)網(wǎng)上查詢 65 第第1 1章章 引引言言 1 1 項(xiàng)項(xiàng)目目說說明明 項(xiàng)目名稱 樂山師范學(xué)院學(xué)生管理系統(tǒng) 項(xiàng)目提出單位 樂山師范學(xué)院計(jì)算機(jī)科學(xué)系 項(xiàng)目開發(fā)者 樂山師范學(xué)院計(jì)算機(jī)科學(xué)系A(chǔ)ttract 工作室 項(xiàng)目使用部門 樂山師范學(xué)院各系科 學(xué)院 項(xiàng)目建設(shè)單位 樂山師范學(xué)院計(jì)算機(jī)科學(xué)系 1 2 項(xiàng)項(xiàng)目目定定義義 系科綜合管理信息系統(tǒng)是為了適應(yīng)現(xiàn)代化學(xué)校管理的需要 加快推進(jìn) 我校數(shù)字化校園建設(shè) 充分利用校園網(wǎng) 利用網(wǎng)絡(luò) 多媒體等計(jì)算機(jī)應(yīng) 用技術(shù)和手段 提高辦公效率 改善質(zhì)量的高效管理信息系統(tǒng) 學(xué)生管理系統(tǒng)是系科綜合管理信息系統(tǒng)的重要組成部分 1 3 編編寫寫目目的的 本文檔為 樂山師范學(xué)院系科綜合管理信息系統(tǒng) 學(xué)生管理系統(tǒng) 詳細(xì)設(shè)計(jì)說明書 主要用于為實(shí)現(xiàn)系統(tǒng)的功能而進(jìn)行的系統(tǒng)詳細(xì)設(shè)計(jì) 說明 詳細(xì)系統(tǒng)各軟件組成模塊的實(shí)現(xiàn)流程 功能 接口 編譯 測(cè)試 要點(diǎn)等內(nèi)容 便于對(duì)系統(tǒng)的編碼進(jìn)行指導(dǎo)和約束 本文檔供項(xiàng)目組全體 成員及項(xiàng)目組領(lǐng)導(dǎo) 單元測(cè)試人員閱讀 1 4 參參考考資資料料 學(xué)生管理系統(tǒng) 系統(tǒng)軟件需求說明書 學(xué)生管理系統(tǒng) 系統(tǒng)概要設(shè)計(jì)說明書 學(xué)生管理系統(tǒng) 數(shù)據(jù)庫(kù)設(shè)計(jì)說明書 數(shù)據(jù)庫(kù)字典 2 70 第第2 2章章 程程序序系系統(tǒng)統(tǒng)的的結(jié)結(jié)構(gòu)構(gòu) 整個(gè)學(xué)生管理系統(tǒng)的結(jié)構(gòu)可由以下圖示來表明 學(xué) 生 管 理 系 統(tǒng) 系 科 綜 合 信 息 管 理 系 統(tǒng) 新生報(bào)到管理模塊 在校生日常管理模塊 組織社團(tuán)管理模塊 畢業(yè)生信息管理模塊 學(xué)生成績(jī)查詢模塊 其它管理功能 3 70 第第3 3章章 系系統(tǒng)統(tǒng)功功能能實(shí)實(shí)現(xiàn)現(xiàn) 從前面需求分析可以看出 系統(tǒng)功能龐雜 主要分為前臺(tái)瀏覽器 B S 信息發(fā)布和數(shù)據(jù)查詢 后臺(tái) C S 數(shù)據(jù)管理和處理 學(xué)生管理功 能部分?jǐn)?shù)據(jù)分為5 類 新生相關(guān) 在校生相關(guān) 組織社團(tuán)相關(guān) 畢業(yè)生 相關(guān) 學(xué)生成績(jī)綜合查詢相關(guān) 從使用和操作的功能上分 有三種用戶 普通客戶 瀏覽器瀏覽 查詢 業(yè)務(wù)數(shù)據(jù)管理人員 學(xué)生工作輔導(dǎo)員 教務(wù)干事 系統(tǒng)管理員 為便于整個(gè)系統(tǒng)組織管理 把各個(gè)相對(duì)獨(dú)立的 數(shù)據(jù)或功能組織到整個(gè)大系統(tǒng)中來 我們把各個(gè)相對(duì)獨(dú)立的功能完全獨(dú) 立設(shè)計(jì) 編譯成獨(dú)立的目標(biāo) 功能 模塊 single Executable 各 功能模塊最后被集成到一個(gè)稱為虛擬桌面的控制臺(tái)模塊中 相應(yīng)地將系 統(tǒng)結(jié)構(gòu)分為一個(gè)控制臺(tái)程序和五個(gè)子系統(tǒng) 各子系統(tǒng)又分為若干各子模 塊 對(duì)應(yīng)于每一個(gè)模塊 幾乎都有錄入 查詢 修改 刪除 查看詳細(xì) 資料這幾個(gè)功能 整個(gè)業(yè)務(wù)流程就是由這幾種基本功能實(shí)現(xiàn)的 在這里 每個(gè)模塊都要用到的功能沒必要在每個(gè)子模塊里重復(fù)闡述 在每個(gè)子模 塊里只列出區(qū)別于其它子模塊的功能實(shí)現(xiàn) 3 1 系系統(tǒng)統(tǒng)控控制制臺(tái)臺(tái)模模塊塊 功功能能 各子功能模塊的組織和調(diào)用 統(tǒng)一的登陸界面實(shí)現(xiàn)到數(shù)據(jù)庫(kù)服務(wù)器的登陸 顯示系科主頁(yè)Web 的首頁(yè) 主要是系科重要通知 消息等 學(xué)院 通知頁(yè)面 系科每周工作安排 系統(tǒng)圖標(biāo) 設(shè)設(shè)計(jì)計(jì) 1 登陸數(shù)據(jù)庫(kù) 輸入數(shù)據(jù)庫(kù)服務(wù)器名 ServerIP 用戶賬號(hào) UserID 密碼 PassWord 以賬號(hào) DEP Computer0 密碼 DEP Computer0 登陸數(shù)據(jù) 庫(kù)服務(wù)器 檢索系統(tǒng)權(quán)限表 根據(jù)權(quán)限設(shè)置相應(yīng)功能模塊 4 70 無此用戶或禁止權(quán)限 Enable False 瀏覽權(quán)限 Enable True 修改 UserID Dep Computer1 修改 PassWord 1111111111111 修改權(quán)限 Enable True 修改 UserID Dep Computer2 修改 PassWord 222222222222 2 采用 Win31 下程序組 程序項(xiàng)的原理組織各執(zhí)行模塊 登陸服務(wù)器 新生錄取數(shù)據(jù) 入學(xué)報(bào)道管理 學(xué)生信息 在校 管理 學(xué)生社團(tuán)管理 畢業(yè)生信息管理 學(xué)生成績(jī)綜合查詢與統(tǒng)計(jì) 各程序組 程序項(xiàng)的顯示分別可以是分層 樹狀 大圖標(biāo) 小圖標(biāo) 等方式 各程序項(xiàng)或菜單項(xiàng)的名稱命名為相應(yīng)功能模塊的目標(biāo)代碼文件 名 3 可執(zhí)行功能模塊的調(diào)用執(zhí)行 通過程序項(xiàng)或菜單項(xiàng)名稱獲取可執(zhí)行目 標(biāo)代碼文件名 應(yīng)用API 函數(shù) CreateProcess 開始執(zhí)行 i StartMenu IndexOf MenuItem j StartMenu Items i IndexOf MenuItem case StartMenu Items i Items j Tag of 1 allow 禁止 2 allow 瀏覽 3 allow 修改 end ExecutableFileName Trim StartMenu Items i Items j Name exe 5 70 FillChar StartupInfo Sizeof StartupInfo 0 StartupInfo cb Sizeof StartupInfo StartupInfo dwFlags STARTF USESHOWWINDOW CreateProcess PChar ExecutableFileName nil nil false CREATE NEW CONSOLE or NORMAL PRIORITY CLASS nil StartupInfo ProcessInfo 6 70 3 2 新新生生管管理理子子系系統(tǒng)統(tǒng) 總總體體設(shè)設(shè)計(jì)計(jì) 新生管理子系統(tǒng)包含新生錄取信息的導(dǎo)入 新生預(yù)分學(xué)號(hào) 新生班級(jí)分配 新生寢室安排 新生報(bào)到管理 新生報(bào)到信息統(tǒng)計(jì) 新 生欠費(fèi)統(tǒng)計(jì) 新生分布信息 新生高考成績(jī)分布等 設(shè)設(shè)計(jì)計(jì) 下面給出設(shè)計(jì)方案與實(shí)現(xiàn)方法 模塊名稱模塊名稱 招生數(shù)據(jù)導(dǎo)入 輸入輸入 新生網(wǎng)上 錄取數(shù)據(jù)庫(kù) 處理處理 將招生數(shù)據(jù)按相同格式導(dǎo)入系統(tǒng)數(shù)據(jù)庫(kù)輸出輸出 提示信息 數(shù)據(jù)表數(shù)據(jù)表 T tdd T jhk T tddw 等 25 個(gè)招生數(shù)據(jù) 表 在數(shù)據(jù)庫(kù)中 T mzdm 導(dǎo)入 MZB 中 T zzmmdm 導(dǎo)入 ZZMMB 中 模塊名稱模塊名稱 預(yù)分學(xué)號(hào) 新生基本信息管理 招生數(shù)據(jù)導(dǎo)入報(bào)到預(yù)處理新生報(bào)到新生信息查詢與統(tǒng)計(jì) 預(yù) 分 學(xué) 號(hào) 班 級(jí) 編 排 寢 室 安 排 預(yù) 處 理 查 詢 現(xiàn) 場(chǎng) 報(bào) 到 處 理 欠 費(fèi) 查 詢 統(tǒng) 計(jì) 報(bào) 到 情 況 統(tǒng) 計(jì) 新 生 比 例 分 布 高 考 成 績(jī) 統(tǒng) 計(jì) 7 70 輸入輸入 招生數(shù)據(jù) 導(dǎo)入的表 處理處理 根據(jù)當(dāng)前年份 為當(dāng)前新生預(yù)分臨時(shí)學(xué) 號(hào) 并將新生信息導(dǎo)入在校生表 導(dǎo)入 基本信息 輸出輸出 提示信息 數(shù)據(jù)表數(shù)據(jù)表 JBXX2 學(xué)生基本信息表 簡(jiǎn) XS BASE 學(xué)生基本信息 詳 XS EXPEND 學(xué)生擴(kuò)展信息 模塊名稱模塊名稱 班級(jí)編排 輸入輸入 學(xué)生預(yù)分 學(xué)號(hào)信息 班級(jí) 信息 處理處理 將新生編入指定班級(jí)輸出輸出 班級(jí)名單 數(shù)據(jù)表數(shù)據(jù)表 JBXX2 學(xué)生基本信息 BJXX 班級(jí)信息 模塊名稱模塊名稱 寢室安排 輸入輸入 學(xué)生預(yù)分 學(xué)號(hào)信息 寢室 信息 處理處理 將新生按性別分入指定寢室輸出輸出 寢室名單 數(shù)據(jù)表數(shù)據(jù)表 JBXX2 學(xué)生基本信息 簡(jiǎn) XS BASE 學(xué)生基本信息 詳 QSZY 寢室資源表 8 70 模塊名稱模塊名稱 現(xiàn)場(chǎng)報(bào)到處理 輸入輸入 學(xué)生預(yù)分 學(xué)號(hào) 編班 寢 室安排等信息 處理處理 根據(jù)新生到校情況 完成新生報(bào)到情況 的記載以及欠費(fèi)記載 輸出輸出 表格 數(shù)據(jù)表數(shù)據(jù)表 JBXX2 學(xué)生基本信息 BJXX 班級(jí)信息 XS BASE 學(xué)生基本信息 XS BDQK 學(xué)生報(bào)到情況 XS QFXX 學(xué)生欠費(fèi)信息 模塊名稱模塊名稱 新生欠費(fèi)查詢統(tǒng)計(jì) 輸入輸入 新生欠費(fèi) 信息 處理處理 統(tǒng)計(jì)欠費(fèi)新生信息輸出輸出 欠費(fèi)報(bào)表 數(shù)據(jù)表數(shù)據(jù)表 JBXX2 學(xué)生基本信息 XS QFXX 學(xué)生欠費(fèi)信息 模塊名稱模塊名稱 新生報(bào)到情況統(tǒng)計(jì) 輸入輸入 新生報(bào)到 信息 處理處理 根據(jù)新生報(bào)到信息 進(jìn)行各項(xiàng)分類統(tǒng)計(jì)輸出輸出 柱狀圖與 表格信息 數(shù)據(jù)表數(shù)據(jù)表 JBXX2 學(xué)生基本信息 XS BASE 學(xué)生基本信息 XS EXPEND 學(xué)生擴(kuò)展信息 BJXX 班級(jí)信息 SFB 省份表 MZB 民族表 ZZMMB 政治面貌表 9 70 模塊名稱模塊名稱 新生信息統(tǒng)計(jì) 輸入輸入 新生網(wǎng)上 錄取數(shù)據(jù)庫(kù) 處理處理 按各種分類標(biāo)準(zhǔn) 對(duì)新生的分布情況進(jìn) 行統(tǒng)計(jì) 輸出輸出 餅狀圖與 表格信息 數(shù)據(jù)表數(shù)據(jù)表 JBXX2 學(xué)生基本信息 XS BASE 學(xué)生基本信息 MZB 民族表 ZZMMB 政治面貌表 SFB 省份表 模塊名稱模塊名稱 新生高考成績(jī)統(tǒng)計(jì) 輸入輸入 新生擴(kuò)展 信息 新生成績(jī) 信息 處理處理 按各項(xiàng)成績(jī)分別統(tǒng)計(jì)各分?jǐn)?shù)段人數(shù)比例輸出輸出 柱狀圖與 表格信息 數(shù)據(jù)表數(shù)據(jù)表 JBXX2 學(xué)生基本信息 XS EXPEND 學(xué)生擴(kuò)展信息 T TDD 考生投檔單 功能功能 完成對(duì)新錄取學(xué)生數(shù)據(jù)的導(dǎo)入 完成對(duì)新生數(shù)據(jù)的報(bào)到預(yù)處理 初始化 實(shí)現(xiàn)新生報(bào)到現(xiàn)場(chǎng)完成 并統(tǒng)計(jì)報(bào)到情況 統(tǒng)計(jì)新生的各種分布比例和成績(jī)分布 設(shè)計(jì) 設(shè)計(jì) 總體設(shè)計(jì) 用 Delphi 的 PageCtrl 控件來實(shí)現(xiàn)各項(xiàng)菜單功能 整體界面如下 10 70 招生數(shù)據(jù)導(dǎo)入 可以通過選擇來指定全國(guó)網(wǎng)上錄取系統(tǒng)的導(dǎo)出數(shù)據(jù)所 在路徑 并根據(jù)使用手冊(cè)檢查25 個(gè) dbf 文件是否存在 來決定是否 允許導(dǎo)入 在導(dǎo)入時(shí)采用記錄的查重處理 所以 只能借助記錄集的循 環(huán)來完成 其中 對(duì)政治面貌與民族表要單獨(dú)處理 界面如下 主要實(shí)現(xiàn)文件檢查的代碼 11 70 function CheckDBFile var strRst String boolean var i j integer blFound boolean begin arrstrFileName 0 t tddw arrstrFileName 1 t jhk 此處對(duì)表名賦值 CheckDBFile False blFound True i 0 strRst 數(shù)據(jù)表 while i 25 do begin j DBFileListBox Items IndexOf arrstrFileName i dbf if j 1 then 某個(gè)文件未找到 返回 假 begin blFound False strRst strRst arrstrFileName i dbf end i i 1 end strRst strRst 不存在 if blFound then 全部數(shù)據(jù)文件檢查正確 CheckDBFile True end 學(xué)號(hào)預(yù)處理 將導(dǎo)入的數(shù)據(jù)從信息庫(kù)表到在校生表 并根據(jù)考生的考 號(hào)及其它信息填入其基本信息 如省份 入年年份等 基本處理思 想是 根據(jù)考生年份 報(bào)考號(hào)前兩位 與當(dāng)前系統(tǒng)數(shù)據(jù)庫(kù)的絕對(duì)學(xué)期時(shí) 間 篩選相應(yīng)的考生信息 然后從這些信息中依次在學(xué)生基本信息表 JBXX2 中查詢是否重復(fù) 來決定是否寫入 如果寫入 則根據(jù)報(bào)考號(hào) 第 3 4 位 的信息 寫入考生所在省份代碼 代碼相對(duì)簡(jiǎn)單 界面如下 12 70 新生班級(jí)編排 將分配學(xué)號(hào)的新生編排到指定班級(jí)中 用兩個(gè) DBGrid 可多選 分別將未分班學(xué)生和班級(jí)信息列出來 通過手工選中 一個(gè)或多個(gè)學(xué)生 即可分配班級(jí)或從班級(jí)中取消分班 界面如下 實(shí)現(xiàn) DBGrid 多選并在數(shù)據(jù)庫(kù)中完成添加的代碼 with StuDBGrid DataSource DataSet do begin for i 0 to intSelStuCnt 1 do 13 70 begin GotoBookmark pointer StuDBGrid SelectedRows Items i strStuNo Fields 0 AsString strSql Update jbxx2 set BJID strClasNo strSql strSql Where XH strStuNo database Execute strSql end end 寢室分配與班級(jí)編排可類似處理 新生現(xiàn)場(chǎng)報(bào)到 對(duì)新生的報(bào)到程序進(jìn)行計(jì)算機(jī)管理 自動(dòng)檢查該新生 是否已到校 是否已完成所有報(bào)到手續(xù) 以及新生的欠費(fèi)情況 只記載 欠費(fèi) 不記載繳費(fèi) 并根據(jù)各項(xiàng)手續(xù)的完成 來確認(rèn)新生的報(bào)到狀態(tài) 為下一步查詢提供足夠信息 界面如下 此處關(guān)鍵在于如何把數(shù)據(jù)表中 0 和 1 狀態(tài)標(biāo)志以 CheckBox 的 狀態(tài)輸出 代碼如下 14 70 讀出 if ADORegInfo Active then begin strState ADORegInfo FieldByName SFQD AsString if strState 1 then 是否簽到 Reg1Check Checked true else Reg1Check Checked false strState ADORegInfo FieldByName ZZGX AsString if strState 1 then 組織關(guān)系 Reg2Check Checked true else Reg2Check Checked false strState ADORegInfo FieldByName HKQY AsString if strState 1 then 戶口遷移 Reg3Check Checked true else Reg3Check Checked false strState ADORegInfo FieldByName JCK AsString if strState 1 then 就餐卡 Reg4Check Checked true else Reg4Check Checked false strState ADORegInfo FieldByName TJ AsString if strState 1 then 體檢 Reg5Check Checked true else Reg5Check Checked false end 寫回?cái)?shù)據(jù)庫(kù) ADORegInfo Edit 15 70 if Reg1Check Checked then ADORegInfo FieldByName SFQD AsString 1 else ADORegInfo FieldByName SFQD AsString 0 if Reg2Check Checked then ADORegInfo FieldByName ZZGX AsString 1 else ADORegInfo FieldByName ZZGX AsString 0 if Reg3Check Checked then ADORegInfo FieldByName HKQY AsString 1 else ADORegInfo FieldByName HKQY AsString 0 if Reg4Check Checked then ADORegInfo FieldByName JCK AsString 1 else ADORegInfo FieldByName JCK AsString 0 if Reg5Check Checked then ADORegInfo FieldByName TJ AsString 1 else ADORegInfo FieldByName TJ AsString 0 ADORegInfo Post 欠費(fèi)查詢可相應(yīng)處理 報(bào)到情況統(tǒng)計(jì) 可以按性別 專業(yè) 班級(jí) 省份等統(tǒng)計(jì)學(xué)生的報(bào)到情 況 并以柱狀圖和表格顯示 提供自由控制條件查詢未報(bào)到學(xué)生信息 界面如下 16 70 統(tǒng)計(jì)功能實(shí)現(xiàn)代碼如下 CntBySexDBChar Title Text Clear 清除標(biāo)題 CntBySexDBChar Title Text Add 新生報(bào)到情況 按班級(jí)統(tǒng)計(jì) CntBySexDBChar Series 0 Clear 清除圖形 strSql CntStrGrid RowCount ADOQFCntQuery RecordCount 1 for i 0 to 4 do 設(shè)置 StringGrid 的標(biāo)題 begin CntStrGrid Cols i Clear CntStrGrid Cols i Add titleName i end i 0 RegSexTLbl Lines Clear 清空統(tǒng)計(jì)顯示 while not ADOQFCntQuery Eof do begin intCntRegd i ADOQFCntQuery FieldByName ClassRegdCnt As Integer CntBySexDBChar Series 0 Add intCntTot i inttostr i 應(yīng) 17 70 到 clBlue CntBySexDBChar Series 0 Add intCntRegd i 到 clRed strSql inttostr i trim strClassName i 報(bào)到比例 strSql strSql floattostr trunc intCntRegd i intCnttot i 10000 100 13 RegSexTLbl Lines Add strSql CntStrGrid Rows i 1 Add inttostr i 1 CntStrGrid Rows i 1 Add strClassName i CntStrGrid Rows i 1 Add inttostr intCntTot i CntStrGrid Rows i 1 Add inttostr intCntRegd i CntStrGrid Rows i 1 Add floattostr trunc intCntRegd i int Cnttot i 10000 100 i i 1 ADOQFCntQuery Next 下一個(gè)班 end 新生分布情況統(tǒng)計(jì) 從學(xué)生的擴(kuò)展信息與高考資料中提取信息 統(tǒng)計(jì) 新生的各種分布情況 以餅狀圖和表格信息顯示出來 界面如下 18 70 相應(yīng)地 高考成績(jī)信息也可以按科目繪制出柱狀圖來反映分布情況 對(duì) 新生的整體情況有一個(gè)大概了解 以便有針對(duì)性地開展工作 界面如下 19 70 成績(jī)統(tǒng)計(jì)的代碼如下 strSql Select Max FieldName as MaxScore Min FieldName as MinScore AVG FieldName as AvgScore strSql strSql From t tdd xs base xs expend Where t tdd ksh xs expend bkh and xs expend xh xs base xh strSql strSql and Nj MidStr CurrentXQSJ 1 4 ADOQFCntQuery SQL Clear ADOQFCntQuery SQL Add strSql ADOQFCntQuery Open if ADOQFCntQuery Eof then begin ShowMessage 對(duì)不起 未找到相關(guān)學(xué)生的成績(jī) abort end for i 0 to 2 do begin CntScoreStrGrid Cols i Clear CntScoreStrGrid Cols i Add titleName i 20 70 end CntScoreDBChart Title Text Clear CntScoreDBChart Title Text Add 新生高考成績(jī)統(tǒng)計(jì) itemName CntScoreDBChart Series 0 Clear maxScore ADOQFCntQuery FieldByName MaxScore AsInteger minScore ADOQFCntQuery FieldByName MinScore AsInteger avgScore ADOQFCntQuery FieldByName AvgScore AsInteger itemsCount trunc maxScore minScore 5 1 intCrntScore trunc minScore 5 5 i 0 isWrite true CntScoreStrGrid RowCount itemsCount 4 while i itemsCount and i inttostr intCrntScore strSql strSql and FieldName inttostr intCrntScore 5 intCrntScore intCrntScore 5 ADOQFCntQuery SQL Clear ADOQFCntQuery SQL Add strSql ADOQFCntQuery Open intCrntCnt i ADOQFCntQuery FieldByName CrntCnt AsInteg er strSql if isWrite or itemsCount 12 then strSql inttostr intCrntScore 5 CntScoreDBChart Series 0 Add intCrntCnt i strSql intColor 21 70 i mod 11 CntScoreStrGrid Rows i 1 Add inttostr intCrntScore 5 inttostr intCrntScore CntScoreStrGrid Rows i 1 Add inttostr intCrntCnt i CntScoreStrGrid Rows i 1 Add floattostr trunc intCrntCnt i 59 10000 100 isWrite not isWrite i i 1 end CntScoreStrGrid Rows i 1 Add 最高分 CntScoreStrGrid Rows i 1 Add inttostr maxScore CntScoreStrGrid Rows i 2 Add 最低分 CntScoreStrGrid Rows i 2 Add inttostr minScore CntScoreStrGrid Rows i 3 Add 平均分 CntScoreStrGrid Rows i 3 Add inttostr avgScore 3 3 學(xué)學(xué)生生在在校校管管理理子子模模塊塊 在校生信息管理 基礎(chǔ)編碼基本數(shù)據(jù)日常管理獎(jiǎng)懲信息勤工助學(xué)信息基它信息 班 級(jí) 基 本 信 息 新 生 學(xué) 號(hào) 替 換 日 常 考 勤 管 理 寢 室 清 潔 衛(wèi) 生 在 校 生 獎(jiǎng) 勵(lì) 信 息 在 校 生 處 罰 信 息 在 校 生 異 動(dòng) 信 息 困 難 學(xué) 生 信 息 困 難 補(bǔ) 助 管 理 勤 工 儉 學(xué) 管 理 學(xué) 期 注 冊(cè) 管 理 學(xué) 年 鑒 定 管 理 學(xué) 生 基 本 信 息 在 校 生 欠 費(fèi) 管 理 在 校 生 日 志 信 息 22 70 模塊名稱模塊名稱 基礎(chǔ)編碼 輸入輸入 在校生基礎(chǔ) 編碼信息 處理處理 維護(hù)管理在校生管理基礎(chǔ)編碼信息輸出輸出 在校生基 礎(chǔ)編碼 數(shù)據(jù)表數(shù)據(jù)表 JBXX2 學(xué)生基本信息 BJXX 班級(jí)信息 XS YDLB 異動(dòng)類型信息 XS BZLB 補(bǔ)助類型信息 XS ZXLB 助學(xué)金類型信息 XS JXJLB 獎(jiǎng)學(xué)金類型信息 XS DKLB 貸款類型信息 XS QSZY 寢室資源信息 SFB 省份信息 模塊名稱模塊名稱 學(xué)生基本信息 輸入輸入 在校生基本 信息 處理處理 根據(jù)學(xué)生簡(jiǎn)況信息管理系科學(xué)生基本信 息 輸出輸出 在校生基 本信息 數(shù)據(jù)表數(shù)據(jù)表 JBXX2 學(xué)生基本信息 BJXX 班級(jí)信息 XS BASE 在校生基本信息 XS EXPEND 在校生擴(kuò)充信息 模塊名稱模塊名稱 班級(jí)基本信息 輸入輸入 班級(jí)基本信 息 處理處理 根據(jù)班級(jí)簡(jiǎn)況信息管理班級(jí)詳細(xì)數(shù)據(jù)輸出輸出 班級(jí)詳細(xì) 數(shù)據(jù) 數(shù)據(jù)表數(shù)據(jù)表 BJXX 班級(jí)信息 XS BJXX 班級(jí)基本信息 23 70 模塊名稱模塊名稱 新生學(xué)號(hào)替換 輸入輸入 新生正式學(xué) 號(hào)分配信息 處理處理 用新生正式學(xué)號(hào)替換相關(guān)數(shù)據(jù)表中新生 臨時(shí)學(xué)號(hào) 輸出輸出 在校生正 式學(xué)號(hào)分配信息 數(shù)據(jù)表數(shù)據(jù)表 JBXX2 學(xué)生基本信息 其它相關(guān)使用新生臨時(shí)學(xué)號(hào)數(shù)據(jù) 用于新生臨時(shí)學(xué)號(hào)的導(dǎo)出和正式學(xué)號(hào) 的導(dǎo)入的數(shù)據(jù)表 本地表 模塊名稱模塊名稱 在校生日?？记诠芾?輸入輸入 在校生日常 考勤信息 處理處理 維護(hù)和管理在校生日?？记谛畔⑤敵鲚敵?在校生考 勤信息及相關(guān)統(tǒng) 計(jì)報(bào)表 數(shù)據(jù)表數(shù)據(jù)表 JBXX2 學(xué)生基本信息 BJXX 班級(jí)信息 XS KQXX 學(xué)生考勤信息 模塊名稱模塊名稱 在校生寢室清潔衛(wèi)生管理 輸入輸入 在校生寢室 清潔衛(wèi)生信息 處理處理 維護(hù)管理在校生寢室清潔衛(wèi)生信息輸出輸出 在校生寢 室清潔衛(wèi)生數(shù)據(jù) 及相關(guān)統(tǒng)計(jì)報(bào)表 數(shù)據(jù)表數(shù)據(jù)表 JBXX2 學(xué)生基本信息 BJXX 班級(jí)信息 XS QJWS 異動(dòng)類型信息 24 70 模塊名稱模塊名稱 在校生獎(jiǎng)勵(lì)信息管理 輸入輸入 在校生獎(jiǎng)勵(lì) 信息 處理處理 維護(hù)管理在校生獎(jiǎng)勵(lì)信息輸出輸出 在校生獎(jiǎng) 勵(lì)信息 數(shù)據(jù)表數(shù)據(jù)表 JBXX2 學(xué)生基本信息 BJXX 班級(jí)信息 XS HJXX 獎(jiǎng)勵(lì)信息 模塊名稱模塊名稱 在校生處罰信息管理 輸入輸入 在校生處罰 信息 處理處理 維護(hù)管理在校生處罰信息輸出輸出 在校生處 罰信息 數(shù)據(jù)表數(shù)據(jù)表 JBXX2 學(xué)生基本信息 BJXX 班級(jí)信息 XS CFXX 處罰信息 模塊名稱模塊名稱 在校生異動(dòng)信息管理 輸入輸入 在校生異動(dòng) 信息 處理處理 維護(hù)管理在校生異動(dòng)信息輸出輸出 在校生異 動(dòng)信息 數(shù)據(jù)表數(shù)據(jù)表 JBXX2 學(xué)生基本信息 BJXX 班級(jí)信息 XS YDXX 異動(dòng)信息 模塊名稱模塊名稱 困難學(xué)生基本信息 輸入輸入 困難學(xué)生基 本信息 處理處理 維護(hù)管理困難學(xué)生收入來源及生活情況輸出輸出 困難學(xué)生 基本信息 數(shù)據(jù)表數(shù)據(jù)表 JBXX2 學(xué)生基本信息 BJXX 班級(jí)信息 XS KNXX 困難學(xué)生基本信息 25 70 模塊名稱模塊名稱 困難補(bǔ)助信息管理 輸入輸入 在校生接受 困難補(bǔ)助信息 處理處理 維護(hù)管理在校生困難補(bǔ)助情況輸出輸出 在校生困 難補(bǔ)助信息 數(shù)據(jù)表數(shù)據(jù)表 JBXX2 學(xué)生基本信息 BJXX 班級(jí)信息 XS KNBZ 困難補(bǔ)助信息 模塊名稱模塊名稱 勤工儉學(xué)信息管理 輸入輸入 在校生勤工 儉學(xué)信息 處理處理 維護(hù)管理在校生勤工儉學(xué)情況輸出輸出 在校生勤 工儉學(xué)信息 數(shù)據(jù)表數(shù)據(jù)表 JBXX2 學(xué)生基本信息 BJXX 班級(jí)信息 XS QGZX 勤工儉學(xué)信息 模塊名稱模塊名稱 在校生學(xué)期注冊(cè)信息管理 輸入輸入 在校生學(xué)期 注冊(cè)信息 處理處理 管理在校生學(xué)期報(bào)到注冊(cè)信息 并驗(yàn)證 學(xué)生基本信息以學(xué)生欠費(fèi)信息 輸出輸出 在校生學(xué) 期注冊(cè)信息 數(shù)據(jù)表數(shù)據(jù)表 JBXX2 學(xué)生基本信息 BJXX 班級(jí)信息 XS XQZC 困難補(bǔ)助信息 XS BASE 學(xué)生基本信息信息 XS QFXX 學(xué)生欠費(fèi)信息 模塊名稱模塊名稱 在校生學(xué)年鑒定信息管理 輸入輸入 在校生學(xué)年 鑒定信息 處理處理 管理在校生學(xué)年鑒定信息輸出輸出 在校生學(xué) 年鑒定信息 數(shù)據(jù)表數(shù)據(jù)表 JBXX2 學(xué)生基本信息 BJXX 班級(jí)信息 XS XNJD 學(xué)生學(xué)年鑒定信息 26 70 模塊名稱模塊名稱 在校生欠費(fèi)信息管理 輸入輸入 在校生欠費(fèi) 信息 處理處理 管理在校生欠費(fèi)信息輸出輸出 在校生欠 費(fèi)信息 數(shù)據(jù)表數(shù)據(jù)表 JBXX2 學(xué)生基本信息 BJXX 班級(jí)信息 XS QFXX 學(xué)生欠費(fèi)信息 模塊名稱模塊名稱 在校生日志信息管理 輸入輸入 在校生日志 信息 處理處理 管理在校生日志信息輸出輸出 在校生日 志信息 數(shù)據(jù)表數(shù)據(jù)表 JBXX2 學(xué)生基本信息 BJXX 班級(jí)信息 XS RZXX 學(xué)生日志信息 功功能能 在校生信息管理基礎(chǔ)編碼的維護(hù)和管理 在校生詳細(xì)信息維護(hù)和管理 班級(jí)詳細(xì)信息維護(hù)和管理 新生入校分配正式學(xué)號(hào)后對(duì)數(shù)據(jù)表中相關(guān)使用臨時(shí)學(xué)號(hào)的數(shù)據(jù)進(jìn)行替換 在校生日常缺勤信息的維護(hù)以及制作相關(guān)統(tǒng)計(jì)報(bào)表 在校生寢室清潔衛(wèi)生的維護(hù)和相關(guān)報(bào)表制作 在校生獎(jiǎng)懲信息的維護(hù)和管理 在校生異動(dòng)信息 轉(zhuǎn)系 留級(jí) 退學(xué) 休學(xué) 停學(xué)等 維護(hù)和管理 困難學(xué)生基本信息管理以及困難補(bǔ)助和勤工儉學(xué)信息管理 在校生學(xué)期注冊(cè)信息管理 在校生學(xué)年鑒定信息管理 在校生欠費(fèi)信息管理 在校生其它日志信息管理 設(shè)計(jì) 27 70 本模塊采用多文檔窗體的形式 并提供子窗體排列的兩種不同形式 層 疊和平鋪 基礎(chǔ)編碼管理 采用分頁(yè)結(jié)構(gòu) 完成在校生管理中所需要的基礎(chǔ)字典進(jìn)行編碼 學(xué)生基本信息管理 采用分頁(yè)結(jié)構(gòu) 在學(xué)生簡(jiǎn)況信息的基礎(chǔ)上完成其它詳細(xì)信息的編輯和 查詢功能 需檢驗(yàn)學(xué)生基本信息的唯一性 28 70 case pagecontrol1 ActivePageIndex of 0 jbxxquery Locate xh dbedit1 Text loPartialKey 定位指定學(xué)生記錄 1 begin xsjbxxtable Filtered false xsjbxxtable Filter xh dbedit4 Text xsjbxxtable Filtered true if xsjbxxtable recordcount 0 then dbnavigator1 VisibleButtons nbFirst nbPrior nbNext nbLast n bInsert nbDelete nbEdit nbPost nbCancel 如不存在該學(xué)生基本 信息則允許新建 else dbnavigator1 VisibleButtons nbFirst nbPrior nbNext nbLast n bDelete nbEdit nbPost nbCancel 如存在學(xué)生基本信息則不允許 新建 if zxsglfrm BrowseTB Down then dbnavigator1 VisibleButtons nbFirst nbPrior nbNext nbLast end 班級(jí)基本信息管理 在班級(jí)簡(jiǎn)況信息的基礎(chǔ)上完成班級(jí)其它詳細(xì)信息的維護(hù)和管理 29 70 新生學(xué)號(hào)替換 在新生進(jìn)校后 正式學(xué)號(hào)可能會(huì)延時(shí)分配 因此 在新生的管理為方便 進(jìn)行管理設(shè)置了臨時(shí)學(xué)號(hào) 在正式學(xué)號(hào)分配完成后 應(yīng)將數(shù)據(jù)表中新生 數(shù)據(jù)臨時(shí)學(xué)號(hào)替換為正式學(xué)號(hào) 先選取要進(jìn)行學(xué)號(hào)替換的班級(jí) 生成新生學(xué)號(hào)輸入表 本地?cái)?shù)據(jù)庫(kù) LOCALDB MDB 并以班級(jí)編號(hào)為名建表 adocommand1 CommandText create table 30 70 bjid combo Items Strings bjmc combo itemindex oldxh char 11 xsxm char 8 xb char 2 newxh char 11 adocommand1 Execute 創(chuàng)建本地新生學(xué)號(hào)輸入表 while not bj query Eof do begin adocommand1 CommandText insert into bjid combo Items Strings bjmc combo itemindex oldxh xs xm xb newxh values bj query Fieldbyname xh asstring b j query Fieldbyname xm asstring bj query F ieldbyname xb asstring null adocommand1 Execute 在本地輸入表中添加學(xué)生基本數(shù)據(jù) bj query Next end 再導(dǎo)出新生輸入表 并允許再進(jìn)行編輯 localtable Close localtable TableName bjid combo Items Strings bjmc combo i temindex localtable Active true 導(dǎo)入新生正式學(xué)號(hào)輸入表 localtable FieldByName oldxh DisplayLabel 舊學(xué)號(hào) localtable FieldByName xsxm DisplayLabel 姓名 localtable FieldByName xb DisplayLabel 性別 localtable FieldByName newxh DisplayLabel 新學(xué)號(hào) button5 Enabled true 允許進(jìn)行學(xué)號(hào)替換 最后進(jìn)行學(xué)號(hào)替換 for i 1 to 16 do begin progressbar1 Position j round 100 adotable2 RecordCount 15 label7 Caption 學(xué)號(hào)替換正在進(jìn)行當(dāng)中 th query SQL Clear th query SQL add select from tablename i where 31 70 xh localtable Fieldbyname oldxh asstring th query Open 選取要進(jìn)行替換的數(shù)據(jù)表 while not th query Eof do begin if localtable FieldValues newxh null then begin th query Edit th query FieldValues xh localtable fieldbyname newxh a sstring 進(jìn)行學(xué)號(hào)替換 th query Post end th query Next end 學(xué)生日?？记谛畔⒐芾?主要記載在校生日常缺勤信息 并提供分班分時(shí)間段的查詢和統(tǒng)計(jì) 并 進(jìn)行班級(jí)出勤情況的比較 編輯界面 統(tǒng)計(jì)界面 j 1 bjquery First while not bjquery Eof do begin 32 70 for i 1 to combobox1 ItemIndex 1 do begin rckqquery Close rckqquery SQL clear rckqquery sql add select xs kqxx qqjc jbxx2 xm from xs kqxx join jbxx2 on jbxx2 xh xs kqxx xh join bjxx on bjxx bjid jbxx2 bjid where jbxx2 bjid bjquery FieldValues bjid and xs kqxx xq edit1 Text and xs kqxx week edit2 Text and xs kqxx wday CAST inttostr i AS char 2 生成統(tǒng)計(jì)字符串 rckqquery Open while not rckqquery Eof do begin stringgrid1 Cells i j trim rckqquery fieldbyname xm As String trim rckqquery fieldbyname qqjc asstring rckqquery Next 將統(tǒng)計(jì)結(jié)果寫入數(shù)據(jù)網(wǎng)格 end end bjquery Next j j 1 end 學(xué)生寢室清潔衛(wèi)生信息管理 完成學(xué)生寢室清潔衛(wèi)生信息的管理功能 并提供近幾周內(nèi)清潔衛(wèi)生的對(duì) 比情況 主要分為得分為 和得分為 兩種情況 編輯界面 33 70 統(tǒng)計(jì)界面 分?jǐn)?shù)據(jù)表和圖表兩種統(tǒng)計(jì)形式 for i 1 to strtoint edit2 Text do begin stringgrid1 cells 0 i inttostr i qjwsquery Close 34 70 qjwsquery SQL Clear qjwsquery SQL add SELECT FROM XS QJWS INNER JOIN XS QSZY ON XS QJWS ZH XS QSZY QSZH AND XS QJWS QSH XS QSZY FJH WHERE XS QJWS XQ edit1 Text AND XS QJWS Week CAST inttostr i AS char 2 and xs qszy xkid zxsglfrm CurrentXKID and upper xs qjws df A 生成統(tǒng)計(jì)字符串 統(tǒng)計(jì)得分 為 A 的寢室 qjwsquery Open stringgrid1 Cells 1 i inttostr qjwsquery recordcount chart1 Series 0 Add qjwsquery recordcount 第 inttostr i 周 clred 將統(tǒng)計(jì)結(jié)果寫入圖表 while not qjwsquery Eof do begin stringgrid1 Cells 2 i stringgrid1 Cells 2 i qjwsquery fi eldbyname zh AsString qjwsquery fieldbyname qsh AsString 將統(tǒng)計(jì)結(jié)果寫 入數(shù)據(jù)網(wǎng)格 qjwsquery Next end qjwsquery Close qjwsquery SQL Clear qjwsquery SQL add SELECT FROM XS QJWS INNER JOIN XS QSZY ON XS QJWS ZH XS QSZY QSZH AND XS QJWS QSH XS QSZY FJH WHERE XS QJWS XQ edit1 Text AND XS QJWS WEEK CAST inttostr i AS char 2 and xs qszy xkid zxsglfrm CurrentXKID and upper xs qjws df C 生成統(tǒng)計(jì)字符串 統(tǒng)計(jì)得分 為 C 的寢室 qjwsquery Open stringgrid1 Cells 3 i inttostr qjwsquery recordcount chart1 Series 1 Add qjwsquery recordcount 第 inttostr i 周 clblue 將統(tǒng)計(jì)結(jié)果寫入圖表 35 70 while not qjwsquery Eof do begin stringgrid1 Cells 4 i stringgrid1 Cells 4 i qjwsquery fi eldbyname zh AsString qjwsquery fieldbyname qsh AsString 將統(tǒng)計(jì)結(jié)果寫 入數(shù)據(jù)網(wǎng)格 qjwsquery Next end end 完成在校生獎(jiǎng)勵(lì)信息管理 在進(jìn)行數(shù)據(jù)輸入的過程中采用層層篩選的方式 避免輸入過程中發(fā)生輸 入錯(cuò)誤 先篩選班級(jí) curxq edit Text zxsglfrm CurrentXQSJ bjxs query SQL Clear bjxs query SQL add SELECT bjmc bjid FROM bjxx where xkid zxsglfrm CurrentXKID bjxs query Open 再篩選學(xué)生 bjxs query Close bjxs query SQL clear 36 70 bjxs query SQL add select xh xb from jbxx2 where xm xsxm combo Text and bjid bjid combo Items Strings bjmc combo itemindex bjxs query Open 最后允許編輯 完成在校生處罰信息管理 同在校生獎(jiǎng)勵(lì)信息類似 完成在校生異動(dòng)信息的記載 處理部分在學(xué)生簡(jiǎn)況管理中完成 同在校生獎(jiǎng)勵(lì)信息類似 在校困難學(xué)生基本信息 困難補(bǔ)助信息 勤工儉學(xué)信息維護(hù)和管理 在學(xué)生遞交困難補(bǔ)助或勤工儉學(xué)申請(qǐng)書后 將學(xué)生困難信息存入檔案 進(jìn)行困難補(bǔ)助和勤工儉學(xué)管理時(shí)依據(jù)困難學(xué)生檔案來進(jìn)行 在校生學(xué)期注冊(cè)管理 學(xué)生每期進(jìn)行注冊(cè)時(shí) 記載注冊(cè)時(shí)間 并同時(shí)提供學(xué)生基本信息的完善 和欠費(fèi)信息的查詢 由當(dāng)前班級(jí)和注冊(cè)時(shí)間來確定數(shù)據(jù)表中是否該班已經(jīng)生成注冊(cè)數(shù)據(jù) 在 注冊(cè)過程中實(shí)時(shí)查看當(dāng)前注冊(cè)情況 允許多人同時(shí)注冊(cè) 也可在注冊(cè)時(shí) 查看學(xué)生當(dāng)前基本信息是否完善以及是否存在欠費(fèi) 37 70 驗(yàn)證是否已生成班級(jí)學(xué)期注冊(cè)表 if yzcrs 0 and wzcrs 0 then begin if zxsglfrm EditTB Down then button4 Enabled true 未生成學(xué)期注冊(cè)數(shù)據(jù) 則允許生成 else button4 Enabled false 已生成學(xué)期注冊(cè)數(shù)據(jù) end else begin button4 Enabled false 多人注冊(cè) if DBGrid1 SelectedRows Count 0 then begin with DBGrid1 DataSource DataSet do for i 0 to DBGrid1 SelectedRows Count 1 do begin GotoBookmark pointer DBGrid1 SelectedRows Items i xszctable Locate xh xq term VarArrayOf fields 1 AsStrin g zcxq edit Text inttostr zcterm combo ItemIndex 1 loPartialKey 38 70 xszctable Edit xszctable FieldValues zcsj zcsj edit Text xszctable Post end end 當(dāng)前學(xué)生報(bào)到注冊(cè)情況查看 yzc edit Text inttostr yzcrs 已注冊(cè)人數(shù) wzc edit text inttostr wzcrs 未注冊(cè)人數(shù) chart1 Series 0 Clear chart1 Series 0 Add strtoint wzc edit text 未注冊(cè) clblue chart1 Series 0 Add strtoint yzc edit text 已注冊(cè) clred 圖表查看 在校生學(xué)年鑒定管理 根據(jù)當(dāng)前選定班級(jí)及鑒定學(xué)年生成學(xué)年鑒定表 然后填寫學(xué)生學(xué)年鑒定 數(shù)據(jù) 判定當(dāng)前數(shù)據(jù)表中是否已生成班級(jí)學(xué)年鑒