【文章內(nèi)容簡介】 息表（ shijuan） 列名 數(shù)據(jù)類型 長度 備注 Shijuan_id Int 4 主鍵 /試卷編號 Shijuan_name Nvarchar 255 試卷名稱 Shijuan_shenhe Int 4 試卷是否被審核 Shijuan_time Int 4 試卷所用時間 Shijuan_danxuan Int 4 試卷中的單選 Shijuan_duoxuan Int 4 試卷中的多選 Shijuan_panduan Int 4 試卷中的判斷 Shijuan_addtime Smalldatetime 4 試卷添加時間 第 9 頁 共 26 頁 表 7單選題信息表（ danxuan） 列名 數(shù)據(jù)類型 長度 備注 Danxuan_id Int 4 主鍵 /單選題編號 Danxuan_timu Ntext 16 單選題目 Danxuan_a Ntext 16 單選 a 答案內(nèi)容 Danxuan_b Ntext 16 單選 b 答案內(nèi)容 Danxuan_c Ntext 16 單選 c 答案內(nèi)容 Danxuan_d Ntext 16 單選 d 答案內(nèi)容 Danxuan_daan Int 4 單選正確答案 Danxuan_shijuan Int 4 某單選題所在的試卷 表 8多選題信息表（ duoxuan） 列名 數(shù)據(jù)類型 長度 備注 Duoxuan_id Int 4 主鍵 /多選題編號 Duoxuan_timu Ntext 16 多選題目 Duoxuan_a Ntext 16 多選 a 答案內(nèi)容 Duoxuan_b Ntext 16 多選 b 答案內(nèi)容 Duoxuan_c Ntext 16 多選 c 答案內(nèi)容 Duoxuan_d Ntext 16 多選 d 答案內(nèi)容 Duoxuan_daan Int 4 多選正確答案 Duoxuan_shijuan Int 4 某多選題所在的試卷 表 9判斷題信息表（ panduan） 列名 數(shù)據(jù)類型 長度 備注 Panduan_id Int 4 主鍵 /判斷題編號 Panduan_timu Ntext 16 判斷題目 Panduan_daan Int 4 判斷正確答案 Panduan_shijuan Int 4 某 判斷題所在的試卷 表 10結(jié)果信息表（ jieguo） 列名 數(shù)據(jù)類型 長度 備注 Jieguo_id Int 4 主鍵 /結(jié)果編號 Jieguo_text Ntext 16 結(jié)果試卷信息 Jieguo_shijuan Int 4 某份試卷的結(jié)果 Jieguo_renyuan Int 4 某人做的某份試卷 Jieguo_time Smalldatetime 4 記錄所用的時間 Jieguo_defen Int 4 記錄人員得分 Jieguo_manfen Int 4 記錄試卷滿分 表 11記錄 人員做每道題的結(jié)果信息表（ jieguo2） 列名 數(shù)據(jù)類型 長度 備注 id Int 4 主鍵 /題編號 Tihao Int 4 題號 第 10 頁 共 26 頁 Titype Varchar 50 題型 Shijuan Int 4 某題 屬于某 試卷 Username Varchar 50 做試卷的人員 Jieguo Varchar 50 判斷結(jié)果是對還是錯 Fen Int 4 每題得分 4 系統(tǒng)的實現(xiàn) 數(shù)據(jù)庫的連接 由于整個系統(tǒng)是建立在數(shù)據(jù)庫基礎(chǔ)上的，所以程序部分需要先進(jìn)行數(shù)據(jù)庫的連接，然后才能調(diào)用數(shù)據(jù)庫中的數(shù)據(jù)。 數(shù)據(jù)庫 由 inc/ 文件完成，代碼如下： dim conn dim connstr sqlDatabaseName=data 39。數(shù)據(jù)庫名稱 SqlPassword= 39。數(shù)據(jù)庫登陸密碼 SqlUsername=su 39。數(shù)據(jù)庫管理名稱 SqlLocalName=(local) 39。數(shù)據(jù)庫服務(wù)器，本機(jī)用 (local)或者： strn=driver={SQL Server}。server=amp。SqlLocalNameamp。uid=amp。SqlUsernameamp。pwd=amp。SqlPasswordamp。database=amp。SqlDatabaseNameamp。//數(shù)據(jù)庫驅(qū)動信息 On Error Resume Next//忽略錯誤，繼續(xù)執(zhí)行下去 Set conn = ()//創(chuàng)建數(shù)據(jù)庫連接對像 =20//設(shè)置 在終止嘗試和產(chǎn)生錯誤之前執(zhí)行命令期間需等待的時間 Strn//連接數(shù)據(jù)庫 If Err Then//如有錯誤 Set Conn = Nothing brbrbrbrbrbrbrdiv align=39。center39。數(shù)據(jù)庫連接出錯 !請檢查連接數(shù)據(jù)庫的參數(shù)及字符串設(shè)置是否正確！ /div End If 第 11 頁 共 26 頁 需要連接數(shù)據(jù)的頁面只需在上面加入 !include file=inc/就可使用數(shù)據(jù)庫連接 管理員模塊 首先，管理員 登錄后可分配教師和領(lǐng)導(dǎo) 的帳號， 可對教師和領(lǐng)導(dǎo)的信息 進(jìn)行添加、修改和刪除，還可對班級進(jìn)行同樣的管理。 如圖所示，當(dāng)要添加某個領(lǐng)導(dǎo)時，就填寫登錄名稱、登錄密碼、確認(rèn)密碼和領(lǐng)導(dǎo)姓名，然后點擊添加后就在上面的表格里出現(xiàn)了剛添加的領(lǐng)導(dǎo)，若想編輯某個領(lǐng)導(dǎo)的信息，就可以點擊編輯按鈕進(jìn)行編輯，或是想刪除某個領(lǐng)導(dǎo)，就點擊刪除按鈕即可。管理教師和班級信息的界面和領(lǐng)導(dǎo)相似，這里就以管理領(lǐng)導(dǎo)為例。 管理領(lǐng)導(dǎo)界面如圖 4所示： 圖 4 管理領(lǐng)導(dǎo)信息界面 教師管理模塊 此模塊的主要功能是添加試卷（生成試卷）其中可規(guī)定試題類型的數(shù)量，每道題的分?jǐn)?shù)；試題管理（在 某試 卷中對應(yīng)的單選題、多選題和判斷題可進(jìn)行相應(yīng)的增加、修改和刪除）；查詢成績（查詢某一班級某份試卷所有學(xué)生的成績）；成績統(tǒng)計（統(tǒng)計每個班級的某份試卷的考試人數(shù)和所占比率，及格率）。 下面將主要介紹教師模塊的主要頁面功能介紹及核心代碼、主要界面設(shè)計等。教師在添加試卷的時候需要注意的是三種題型的個數(shù)和每種題型分?jǐn)?shù)的乘積加起來后等于總分時，才能成功的添加一份試卷，否則就有錯誤提示“試卷總分和題目分?jǐn)?shù)有誤”，如果不填或沒填完整就按添加的話，就會提示“參數(shù)錯誤”，頁面如圖 5： 圖 5 教師添加試卷頁面 試卷添加和修 改的代碼如下： 第 12 頁 共 26 頁 % if shijuan_edit=1 and id then//判斷是否為保存修改內(nèi)容狀態(tài) sqlstr=select * from [shijuan] where shijuan_id= amp。 id sqlstr,conn,1,3//查詢某試卷并設(shè)置為可修改狀態(tài) if then call ShowErr(該試卷不存在！ ,1)//調(diào)用錯誤提示函數(shù) ShowErr else ???? .//執(zhí)行修改操作 end if call ShowErr(試卷修改成功！ ,) else//添加試卷 sqlstr=select * from [shijuan] where shijuan_name=39。amp。 shijuan_name amp。39。 sqlstr,conn,1,3//檢測所添加的試卷名是否已存在 if not and not then call ShowErr(該試卷名已經(jīng)存在！ ,1) else danxuan=shijuan_danxuan*shijuan_danxuancount duoxuan=shijuan_duoxuan*shijuan_duoxuancount panduan=shijuan_panduan*shijuan_panduancount //分析添加試卷的條件是否正確：總分 =各題型數(shù)目 *每題得分之和 if danxuan+duoxuan+panduanshijuan_total0 then call ShowErr( 試卷 總分 和題目 分值 有誤！,) else rs(shijuan_name)=shijuan_name rs(shijuan_total)=shijuan_total rs(shijuan_time)=shijuan_time rs(shijuan_danxuan)=shijuan_danxuan 第 13 頁 共 26 頁 rs(shijuan_duoxuan)=shijuan_duoxuan rs(shijuan_panduan)=shijuan_panduan rs(shijuan_danxuancount)=shijuan_danxuancount rs(shijuan_duoxuancount)=shijuan_duoxuancount rs(shijuan_panduancount)=shijuan_panduancount rs(shijuan_shenhe)=0 rs(shijuan_addtime)=now() end if end if call ShowErr(試卷添加成功！ ,) end if % 教師在添加完試卷并規(guī)定了卷面后， 就可在相應(yīng)的試卷中添加題目， 以 添加單選題 為例 ， 輸入題目和四個選項答案，并且把正確選項選上，點擊添加按鈕，就可成功添加單選題，在添加到與設(shè)定個數(shù)相符時，就不能再添加，如果再多添加一道，它就會相應(yīng)的提示：“題目已經(jīng)足夠”。還有多選題和判斷題，都是和單選題類似，就不詳細(xì)說明。單選題添加的 主要頁面如圖 6： 圖 6 單選題添加 單選題的添加和修改代碼如下： % if 0 then//判斷是否為提交表單狀態(tài)（即添加或保存修改單選題） danxuan_timu=HTMLEncode(trim((danxuan_timu)))//HTMLEncode方法對指定的字符串應(yīng)用 HTML 編碼 ,danxuan_timu 為 題目 danxuan_a=HTMLEncode(trim((danxuan_a)))//答案 A danxuan_b=HTMLEncode(trim((danxuan_b)))//答案 B 第 14 頁 共 26 頁 danxuan_c=HTMLEncode(trim((danxuan_c)))//答案 C danxuan_d=HTMLEncode(trim((danxuan_d)))//答案 D danxuan_daan=(danxuan_daan)//正確答案 danxuan_edit=(danxuan_edit)//判斷為編輯狀態(tài)的參數(shù) id=(danxuan_id)//試題 ID call CheckNum(id) if danxuan_edit=1 and id then//保存編輯 sqlstr=select * from [danxuan] where danxuan_id= amp。 id sqlstr,conn,1,3//查詢某單選題并設(shè)為可修改狀態(tài) if then call ShowErr(該單選題不存在！ ,1) else ???? .//執(zhí)行修改操作 end if call ShowErr(單選題修改成功！ ,) else if danxuan=danxuancount then//該試卷目前的單選題數(shù)目已經(jīng)等于所設(shè)定的題目數(shù)了 call ShowErr(題目已經(jīng)足夠！ ,) else sqlstr=select * from [danxuan] sqlstr,conn,1,3 rs(danxuan_timu)=danxuan_timu rs(danxuan_a)=danxuan_a rs(danxuan_b)=danxuan_b rs(danxuan_c)=danxuan_c rs(danxuan_d)=danxuan_d rs(danxuan_daan)=danxuan_daan rs(danxuan_shijuan)=id 第 15 頁 共 26 頁 call ShowErr(單選題添加成功！ ,?id=amp。id) end if end if end if % 另外還有多選題和判斷題的添加和修改，基本上和單選題的類似，也不詳細(xì)介紹了。 教師還具有查詢成績的功能，比如說老師想查看某個班考某