【正文】 公司也開發(fā)了很多實(shí)用組件。 （ 2） Server： ASP 運(yùn)行在服務(wù)器端。 ASP 的編程語言可以是 VBSCRIPT 和 JSCRIPT。然而 Netscape 瀏覽器不支持客戶端的 VBSCRIPT，所以最好不要在客戶端使用 VBSCRIPT。 Netscape 瀏覽器也可以正常顯示 ASP 頁面。瀏覽者查看頁面源文件時(shí)，看到的是 ASP 生成的 HTML 代碼，而不是 ASP 程序代碼。 由此可以看出， ASP 是在 IIS 下開發(fā) WEB 應(yīng)用的一種簡單、方便的編程工具。 ACCESS Access 是 Office 系列軟件中用來專門管理數(shù)據(jù)庫的應(yīng)用軟件。數(shù)據(jù)庫管理系統(tǒng)分為兩類：文件管理系統(tǒng)和關(guān)系型管理系統(tǒng)。它可 運(yùn)行于各種Microsoft Windows 系統(tǒng)環(huán)境中，由于它繼承了 Windows 的特性，不僅易于使用，而且界面友好，如今在世界各地廣泛流行。本章將專門介紹 Access 2021（下面簡稱為 Access）的基本功能及其常用的操作，主要內(nèi)容包括創(chuàng)建和使用數(shù)據(jù)表，建立和使用查詢、窗體，以及數(shù)據(jù)表與其他數(shù)據(jù)文件之間的轉(zhuǎn)換等。 一個(gè) Access 數(shù)據(jù)庫中可以包含表、查詢、窗體、報(bào)表、宏、模塊以及數(shù)據(jù)訪問頁。 此外， Access 2021 還利用 Office 套件共享的編程語言 VBA（ Visual Basic for Application）進(jìn)行高級(jí)操作控制和復(fù)雜的數(shù)據(jù)操作。 Adminpurview :c 此字段的作用是存放普通管理員的權(quán)限，它的取值可以第 4 頁 共 24 頁 為以下幾種之一； 0 代表擁有所有權(quán)限； 1 代表維護(hù)試題的權(quán)限； 2 代表維護(hù)考生檔案； 4 代表維護(hù)考試計(jì)劃 8 代表維護(hù)課程檔案 這里權(quán)限值使用 的原因是它們分別代表二進(jìn)制餓 .所以方便于多種權(quán)限的組合判斷，在賦予管理員多種權(quán)限時(shí)，只需要把這些權(quán)限值相加即可，在判斷時(shí)只需要把權(quán)限值進(jìn)行相應(yīng)的“與”運(yùn)算就可判斷是否擁有某種權(quán)限。 表 2 course 表 字段名 字段類型 字段長度 簡要說明 courseid 自動(dòng)編號(hào) 課程 ID coursname 字符串型 128 登陸名稱 表 3 prj_student 字段名 字段類型 字段長度 簡要說明 id 自動(dòng)編號(hào) 主鍵 prjid 整型 考試計(jì)劃 ID studentid 整型 考生 ID mark 整型 考生成績 state 整型 考試狀態(tài) starttime 日期 /時(shí)間型 開始考試時(shí)間 endtime 日期 /時(shí)間型 考試結(jié)束時(shí)間 本表用來存儲(chǔ)每個(gè)考生每次考試的成績，開始時(shí)間，結(jié)束時(shí)間等信息。 State:類型為整型，為考試進(jìn)行的狀態(tài) 0 為沒有考試， 1 為已經(jīng)參加過考試，2 為正在進(jìn)行考試。 表 表 4 student 字段名 字段類型 字段長度 簡要說明 studentid 自動(dòng)編號(hào) 考生 ID號(hào) username 字符串型 登陸名稱 studentname 字符串型 真實(shí)姓名 第 5 頁 共 24 頁 studentpwd 字符串型 登陸密碼 sex 布爾型 性別 birthday 日期 /時(shí)間型 出生生日 字符串型 考生的 EMAIL tel 字符串型 電話號(hào)碼 studenttype 整型 考生類型 考生檔案表用來存放考生的個(gè)人信息 ，姓名，登錄名稱，密碼，性別，生日等數(shù)據(jù) Studenttype:類型為整型，用來表示考生的類型，當(dāng)值為 0 時(shí)表示此考生已經(jīng)進(jìn)行報(bào)名申請(qǐng)但還沒有審批；當(dāng)值為 1 時(shí)表示此考生是已報(bào)名考生 。 Answer 字段：類型為整型，用于存放本題的正確答案，此字段表示答案的方法是 ：當(dāng)題目類型為選擇題時(shí)，從低位二進(jìn)制到高位二進(jìn)制位分別代表 16個(gè)選項(xiàng)的選擇情況。如考試本次考試計(jì)劃的名稱，考試題型，數(shù)量，開始時(shí)間，結(jié)束時(shí)間等信息 。 4 網(wǎng)上報(bào)名及考試系統(tǒng)的設(shè)計(jì)與實(shí)現(xiàn) 系統(tǒng)實(shí)現(xiàn)了網(wǎng)上報(bào)名，前臺(tái)操作原理，后臺(tái)操作管理三大功能 。 前臺(tái)操作管理 前臺(tái)操作管理包括：在線考試、成績查詢、考試信息查詢、個(gè)人信息及密碼修改。 （ 2）成績查詢： 學(xué)生可以在線查詢以前參加過的每門課程的考試相關(guān)信息。 后臺(tái)管理 后臺(tái)管理模塊，主要功能有操作遠(yuǎn)管理、課程檔案管理、試題檔案管理、考試計(jì)劃管理、考生管理等 （ 1） 操作員 管理： 操作員的類型包括超級(jí)管理員與普通管理員 ， 操作員管理包括對(duì)管理員 信息 的添加，刪除，修改等操作。 （ 3） 考試計(jì)劃管理 ： 考試計(jì)劃實(shí)際上相當(dāng)于考試試卷，管理員如果將要組織一次考 試的話，就需要填寫一條考試計(jì)劃，考試計(jì)劃管理模塊的主要功能有：添加，修改，刪除考試計(jì)劃。 （ 5） 考 生 檔案管理：分為兩部分，一部分是在后臺(tái)管理員進(jìn)行管理，后臺(tái)管理員管理的功能有：考生檔案的添加，修改，刪除；對(duì)已提交注冊(cè)申請(qǐng)的考生進(jìn)行審批。 新生報(bào)名 如果沒有參加報(bào)名的考生想要參加考試，可以進(jìn)入在線報(bào)名與考試系統(tǒng)進(jìn)行在線報(bào)名，在線提交相應(yīng)信息，然后等待管理員的資格審批。 完 成 此 功 能 的 主 要 頁 面 有 ， 效果圖如圖 42 所示。 考生登錄后，可以選擇 相應(yīng)的試題進(jìn)行在線考試。 自動(dòng)生成試卷函數(shù)根據(jù)考試計(jì)劃中的設(shè)置，從試題庫中隨機(jī)按要求組成試卷并存入考試過程控制表（ prj_process）中。系統(tǒng)根據(jù)管理員制定好的答案進(jìn)行判斷，自動(dòng)給出考生的考試成績。生成試卷 function makePaper(intPrjID,intStudentID) dim rsPaper,strSqlPaper,rsNew,strSqlNew,intCourseID,intCount,arrTemp,intSSCount,arrSS,intMSCount,arrMS,intBCount,arrB,intCurType,I,J,intPos,blnPass delete from prj_process where prjid= amp。 and studentid= amp。 intPrjID strSqlPaper,G_CONN,1,1 if not and not then intCourseID = rsPaper(courseid) intSSCount = rsPaper(ss_count) intMSCount = rsPaper(ms_count) intBCount = rsPaper(b_count) else set rsPaper = nothing makePaper = false exit function end if for intCurType = 1 to 3 select case intCurType case 1 intCount = intSSCount case 2 intCount = intMSCount case 3 intCount = intBCount end select if intCount 0 then redim arrTemp(intCount) strSqlPaper = select id from subject where type= amp。 and courseid= amp。判斷當(dāng)前題庫內(nèi)試題是否足夠 set rsPaper = nothing makePaper = false exit function end if 第 10 頁 共 24 頁 randomize timer intPos = int(rnd() * ) arrTemp(1) = intPos for I = 2 to intCount intPos = int(rnd() * ) blnPass = false while blnPass = false for J = 1 to I 1 if intPos = arrTemp(J) then exit for end if next if J = I then blnPass = true else 39?？忌鸢?,動(dòng)作(主要用于多選題 ,決定是選中 還是取消 ),試題 ID intAnswer = CLng(trim((answer)))‘取得考試信息和答案 strAction = (action) intID = (id) set rsSaveAnswer = ()‘取得詳細(xì)的題目，考生及考生答題狀況信息。 intID strSqlSaveAnswer,G_CONN,1,3 if rsSaveAnswer(state) = 2 and DateDiff(n,rsSaveAnswer(starttime),now()) rsSaveAnswer(limittime) then 39。根據(jù)題目類 型不同以不同方式保存答案 if strAction = selected then if rsSaveAnswer(answer) 0 then rsSaveAnswer(answer) = intAnswer else rsSaveAnswer(answer) = rsSaveAnswer(answer) or 第 12 頁 共 24 頁 intAnswer end if elseif strAction = selectcancel then rsSaveAnswer(answer) = rsSaveAnswer(answer) and not intAnswer else rsSaveAnswer(answer) = intAnsw