畢業(yè)論文---在線考試系統(tǒng)的設(shè)計(jì)與實(shí)現(xiàn)

1、<p><b>　　畢業(yè)論文</b></p><p>　　在線考試系統(tǒng)的設(shè)計(jì)與實(shí)現(xiàn)</p><p><b>　　摘 要</b></p><p>　　在線考試系統(tǒng)是集合現(xiàn)代考試?yán)碚?、方法和現(xiàn)代信息技術(shù)手段的智能化網(wǎng)上考試系統(tǒng)，為學(xué)生個(gè)性化學(xué)習(xí)提供靈活、方便、科學(xué)、公平的個(gè)別化考試服務(wù)，學(xué)生可以隨時(shí)隨地進(jìn)行課程結(jié)業(yè)

2、考試，它可以節(jié)約考試成本，提高考試工作的效率。</p><p>　　本文首先介紹了在線考試系統(tǒng)的發(fā)展趨勢以及面臨的眾多問題，然后從原理上、技術(shù)上介紹了目前使用最廣泛的開發(fā)工具，以及開發(fā)環(huán)境等。本文以在線考試系統(tǒng)為主要研究對象的基礎(chǔ)上，進(jìn)行了系統(tǒng)的需求分析，在技術(shù)、經(jīng)濟(jì)等方面進(jìn)行了可行性分析，以及數(shù)據(jù)庫分析等，同時(shí)，對在線考試系統(tǒng)功能模塊圖、系統(tǒng)流程圖的設(shè)計(jì)，詳細(xì)的設(shè)計(jì)了在線考試系統(tǒng)中的邏輯設(shè)計(jì)和物理設(shè)計(jì)，系統(tǒng)總體

3、設(shè)計(jì)，最后對本設(shè)計(jì)進(jìn)行了測試總結(jié)。</p><p>　　關(guān)鍵字：在線考試，ASP，Access數(shù)據(jù)庫，Web，自動評分</p><p><b>　　Abstract</b></p><p>　　Online examination system is an intelligent web examination system integrati

4、ng modern examination theory, method and modern information technology, which is to provide a individualized, flexible, convenient, scientific and fair examination service. Students can participate in course exam at any

5、time and in any place. It can save exam cost and improve exam efficiency.</p><p>　　This paper first introduces the development trend of the online examination system and face, and then from many of the quest

6、ions of principle, technology introduces the most widely used development tools and the development environment, and so on.In this paper, the on-line examination system as the main research object on the basis of the ana

7、lysis of the demand of the system in technology, economy and feasibility analysis, and database analysis, and so on.At the same time, to on-line examination</p><p>　　Key words: Online examination；，ASP， Acces

8、s database， Web， Automatic grading </p><p><b>　　目 錄</b></p><p><b>　　摘 要2</b></p><p>　　Abstract3</p><p><b>　　目 錄4</b></p>

9、<p><b>　　第一章 前言6</b></p><p>　　第二章 系統(tǒng)設(shè)計(jì)相關(guān)原理7</p><p>　　2.1 ASP技術(shù)介紹7</p><p>　　2.2 SQL語句介紹9</p><p>　　2.3 VB Script介紹11</p><p>　　第三章 需求分

10、析13</p><p>　　3.1用戶需求13</p><p>　　3.2系統(tǒng)需要解決的主要問題13</p><p>　　3.2.1 對于應(yīng)試者13</p><p>　　3.2.2 對于管理者13</p><p>　　3.3系統(tǒng)應(yīng)具備的基本功能13</p><p>　　3.4可行性分

11、析14</p><p>　　3.4.1技術(shù)可行性14</p><p>　　3.4.2軟件可行性14</p><p>　　3.4.3硬件可行性14</p><p>　　第四章 系統(tǒng)總體設(shè)計(jì)15</p><p>　　4.1系統(tǒng)的開發(fā)環(huán)境15</p><p>　　4.2工程框架（結(jié)構(gòu)圖）

12、15</p><p>　　第五章 詳細(xì)設(shè)計(jì)17</p><p>　　5.1功能模塊17</p><p>　　5.1.1功能模塊結(jié)構(gòu)圖17</p><p>　　5.1.1.1學(xué)生功能模塊17</p><p>　　5.1.1.2教師功能模塊17</p><p>　　5.1.2功能模塊概述及

13、核心代碼18</p><p>　　5.1.2.1學(xué)生功能模塊18</p><p>　　5.1.2.2教師功能模塊29</p><p>　　5.2數(shù)據(jù)庫構(gòu)建44</p><p>　　5.2.1數(shù)據(jù)庫構(gòu)建環(huán)境44</p><p>　　5.2.2數(shù)據(jù)表44</p><p>　　5.2.3

14、E—R圖45</p><p>　　5.2.4數(shù)據(jù)流程圖45</p><p>　　5.3主窗體設(shè)計(jì)46</p><p>　　5.3.1首頁46</p><p>　　5.3.2用戶登錄界面46</p><p>　　5.3.3用戶主要操作界面47</p><p><b>　　第六

15、章 測試53</b></p><p>　　6.1測試目的53</p><p>　　6.2功能模塊測試53</p><p>　　6.2.1.學(xué)生功能模塊測試53</p><p>　　6.2.2 教師功能模塊測試54</p><p>　　6.3 兼容性測試54</p><p>

16、;　　6.4數(shù)據(jù)庫測試55</p><p>　　6.5測試結(jié)果55</p><p><b>　　結(jié) 論56</b></p><p><b>　　致 謝57</b></p><p><b>　　參考文獻(xiàn)58</b></p><p><b

17、>　　前言</b></p><p>　　一直以來的傳統(tǒng)考試方式要求老師出試卷、印試卷、安排考試、監(jiān)考、收集試卷、評改試卷、講評試卷和分析試卷，這是一個(gè)漫長而復(fù)雜的過程。在這個(gè)飛速發(fā)展的時(shí)代，這樣的考試方式已經(jīng)越來越不適應(yīng)現(xiàn)代教學(xué)的需要，于是產(chǎn)生了大量的在線考試系統(tǒng)。它應(yīng)用ASP等網(wǎng)絡(luò)軟件開發(fā)工具進(jìn)行研發(fā)，并充分利用了B/S結(jié)構(gòu)的特點(diǎn)，其功能目標(biāo)是實(shí)現(xiàn)將現(xiàn)有的紙張答題式考試向基于Internet的

18、無紙化考試系統(tǒng)的轉(zhuǎn)變，具有良好的開放性，允許系統(tǒng)管理員對試題庫進(jìn)行管理與開發(fā)，有效地保證了題庫的時(shí)效性。</p><p>　　這樣的應(yīng)用系統(tǒng)不止在傳統(tǒng)應(yīng)試方面有其一席之地，在其它方面亦得到了廣泛的應(yīng)用。</p><p>　　隨著經(jīng)濟(jì)的發(fā)展和對人才需求的不斷加大，人才的劃分和任用成為勞動力市場的一大難題。不管是國內(nèi)還是國外的各大機(jī)構(gòu)，都不斷的推出一系列大型的認(rèn)證考試，如微軟的MCSE、Cis

19、co的CCNA以及我們國家的自學(xué)考試和各省市的各種考試等。這些考試都無一例外的在朝著網(wǎng)絡(luò)化的方向發(fā)展，因?yàn)橹挥羞@樣才符合大規(guī)?？荚囀r(shí)省力以及公正公開的要求。由此可見，網(wǎng)上考試系統(tǒng)的研制是當(dāng)今教育信息化建設(shè)的一項(xiàng)重要課題，目的是充分利用學(xué)?，F(xiàn)有的計(jì)算機(jī)軟、硬件資源和網(wǎng)絡(luò)資源實(shí)現(xiàn)無紙化考試以彌補(bǔ)傳統(tǒng)手工考試費(fèi)時(shí)、費(fèi)力的不足?；赪eb的網(wǎng)絡(luò)考試已成為大勢所趨，與傳統(tǒng)考試模式相比，網(wǎng)上考試滲入了更多的技術(shù)環(huán)節(jié)，對實(shí)現(xiàn)安全性的途徑、方法也提出

20、了更高的技術(shù)要求，它在教育現(xiàn)代化的進(jìn)程中具有很重要的現(xiàn)實(shí)意義。</p><p>　　利用ASP技術(shù)開發(fā)的基于WEB的多用戶在線考試系統(tǒng)初步應(yīng)該具有用戶注冊、多用戶同時(shí)在線考試、考試時(shí)間控制、對客觀題自動判卷、題庫維護(hù)、考卷制定、用戶管理、成績管理等功能。</p><p>　　通過Internet/Intranet來實(shí)現(xiàn)網(wǎng)上考試，可以實(shí)現(xiàn)教考分離以及考務(wù)工作的全自動化管理，可以有效利用校園網(wǎng)

21、的軟硬件資源，使其發(fā)揮最大效力，更好的為學(xué)校的教學(xué)、科研、管理服務(wù)，它可以將傳統(tǒng)考試過程中的試卷組織、審定印制、傳送收集、登記發(fā)放、評判歸檔各個(gè)環(huán)節(jié)縮小到一至兩個(gè)環(huán)節(jié)，幾乎屏蔽了所有人工直接干預(yù)考試活動的可能性，不但能夠節(jié)約大量的時(shí)間、人力、物力與財(cái)力，而且還可以大幅度提高考試成績的客觀性和公正性。</p><p>　　第二章 系統(tǒng)設(shè)計(jì)相關(guān)原理</p><p>　　2.1 ASP技術(shù)介紹&

22、lt;/p><p>　　Microsoft Active Server Pages 即我們所稱的ASP，其實(shí)是一套微軟開發(fā)的服務(wù)器端腳本環(huán)境。Active Server Page 是創(chuàng)建動態(tài)網(wǎng)頁的一個(gè)很好的工具，它起一種編程語言的作用，可以利用它編寫動態(tài)產(chǎn)生HTML的程序代碼。因此，只要用戶瀏覽Web站點(diǎn)并請求一個(gè)ASP 頁，Web服務(wù)器就可以處理相應(yīng)的ASP代碼，生成HTML代碼，然后將它傳遞到用戶瀏覽器并顯示出網(wǎng)

23、頁。通過ASP我們可以結(jié)合HTML網(wǎng)頁、ASP指令和ActiveX元件建立動態(tài)、交互且高效的WEB服務(wù)器應(yīng)用程序。有了ASP就不必?fù)?dān)心客戶的瀏覽器是否能運(yùn)行所編寫的代碼，因?yàn)樗械某绦蚨紝⒃诜?wù)器端執(zhí)行，包括所有嵌在普通HTML中的腳本程序。當(dāng)程序執(zhí)行完畢后，服務(wù)器僅將執(zhí)行的結(jié)果返回給客戶瀏覽器，這樣也就減輕了客戶端瀏覽器的負(fù)擔(dān)，大大提高了交互的速度。</p><p>　　與一般的程序不同，ASP程序無須編譯。A

24、SP程序的控制部份，是使用VBScript、JScript等腳本語言來設(shè)計(jì)的，當(dāng)執(zhí)行ASP程序時(shí)，腳本程序?qū)⒁徽酌畎l(fā)送給腳本解釋器(即腳本引擎)，由腳本解釋器進(jìn)行翻譯并將其轉(zhuǎn)換成服務(wù)器所能執(zhí)行的命令。當(dāng)然，同其他編程語言一樣，ASP程序的編寫也遵循一定的規(guī)則，如果你想使用你所喜愛的腳本語言編寫ASP程序，那么你的服務(wù)器上必須要有能解釋這種腳本語言的腳本解釋器。當(dāng)你安裝ASP時(shí)，系統(tǒng)提供了兩種腳本語言：VBSrcipt和JScript

25、，而VBScript則被作為系統(tǒng)默認(rèn)的腳本語言。</p><p>　　ASP程序其實(shí)是以擴(kuò)展名為.asp的純文本形式存在于WEB服務(wù)器上的，可以用任何文本編輯器打開它，ASP程序中可以包含純文本、HTML標(biāo)記以及腳本命令。只需將.asp程序放在Web服務(wù)器的虛擬目錄下（該目錄必須要有可執(zhí)行權(quán)限），就可以通過WWW的方式訪問ASP程序了。</p><p>　　ASP所獨(dú)具的一些特點(diǎn)有：

26、 1.使用VBScript 、JScript等簡單易懂的腳本語言，結(jié)合HTML代碼，即可快速地完成網(wǎng)站的應(yīng)用程序。 2.無須編譯，容易編寫，可在服務(wù)器端直接執(zhí)行。 3.使用普通的文本編輯器，如Windows的記事本，即可進(jìn)行編輯設(shè)計(jì)。</p><p>　　與瀏覽器無關(guān),用戶端只要使用可執(zhí)行HTML碼的瀏覽器，即可瀏覽ASP所設(shè)計(jì)的網(wǎng)頁內(nèi)容。ASP所使用的腳本語言(VBScript 、Jscrip

27、t)均在WEB服務(wù)器端執(zhí)行，用戶端的瀏覽器不需要能夠執(zhí)行這些腳本語言。</p><p>　　ASP 能與任何ActiveX scripting語言相容。除了可使用VBScript或JScript語言來設(shè)計(jì)外，還通過plug-in的方式，使用由第三方所提供的其他腳本語言，譬如REXX、Perl、Tcl等。腳本引擎是處理腳本程序的COM(Component Object Model)物件。 6.ASP的源程序

28、，不會被傳到客戶瀏覽器，因而可以避免所寫的源程序被他人剽竊，也提高了程序的安全性。 7.可使用服務(wù)器端的腳本來產(chǎn)生客戶端的腳本。 8.物件導(dǎo)向（Object-oriented）。 9.ActiveX Server Components(ActiveX服務(wù)器元件)具有無限可擴(kuò)充性?？梢允褂肰isual Basic 、Java 、Visual C++ 、COBOL等編程語言來編寫你所需要的ActiveX Server

29、 Component。 10.另外，ASP技術(shù)的處理速度相當(dāng)快，并且其安全性也很高。ASP最重要的優(yōu)點(diǎn)是能夠建立對諸如時(shí)間、地點(diǎn)、用戶標(biāo)志、以前的選擇和活動等因素敏感的頁面。換句話說，可針對每個(gè)用戶的個(gè)別需求，用ASP定制網(wǎng)頁，</p><p>　　ASP有7個(gè)固有對象</p><p>　　Request對象用來處理用戶做出的請求，就是處理用戶要求瀏覽器查看特定的網(wǎng)頁或Web應(yīng)用時(shí)

30、做出的請求。此請求可以HTML的形式輸入或僅以URL的形式作出。Response對象用來處理從Web服務(wù)器向用戶發(fā)送信息并對此信息進(jìn)行控制。</p><p>　　Serve對象用來代表服務(wù)器自身。因此它提供幾個(gè)與Web服務(wù)器可能要完成的任務(wù)相關(guān)的常用功能，諸如建立新對象和設(shè)置腳本的超時(shí)特性等。還有通過將不合法字符轉(zhuǎn)化為合法字符，把字符串轉(zhuǎn)換為URL和HTML正確的使用格式的方法。</p><p

31、>　　Application對象用來代表應(yīng)用，可用它來管理諸如應(yīng)用目錄這一類的東西。</p><p>　　Session對象用來代表用戶會話，并存儲該會話的信息?？衫肧ession對象來管理如Web服務(wù)器在用戶“請求”之間等待的時(shí)間等。</p><p>　　ObjectContext對象用來管理事務(wù)處理。它目前已經(jīng)集成到Windows2000操作系統(tǒng)中了。它包含了所有ASP其他對象

32、，可通過ObjectContext引用ASP的每個(gè)對象。</p><p>　　ASPError對象包含ASP腳本或asp.dll本身產(chǎn)生的任何錯誤的詳細(xì)內(nèi)容。</p><p>　　7.ObjectContext。</p><p>　　總之，ASP包含三方面含義： 1.Active：ASP 使用了微軟的ActiveX技術(shù)。ActiveX（COM）技術(shù)是現(xiàn)在Mi

33、crosoft軟件的重要基礎(chǔ)。它采用封裝對象，程序調(diào)用對象的技術(shù)，簡化編程，加強(qiáng)程序間合作。ASP本身封裝了一些基本組件和常用組件，有很多公司也開發(fā)了很多實(shí)用組件。只要你可以在服務(wù)器上安裝這些組件，通過訪問組件，你就可以快速、簡易地建立自己的WEB應(yīng)用。 2.Server：ASP運(yùn)行在服務(wù)器端。這樣就不必?fù)?dān)心瀏覽器是否支持ASP所使用的編程語言。ASP 的編程語言可以是VBSCRIPT和JSCRIPT。VBSCRIPT是VB的一

34、個(gè)簡集，會VB的人可以很方便的快速上手。然而Netscape瀏覽器不支持客戶端的VBSCRIPT，所以最好不要在客戶端使用VBSCRIPT。而在服務(wù)器端，則無需考慮瀏覽器的支持問題。Netscape瀏覽器也可以正常顯示ASP頁面。 3.Pages：ASP返回標(biāo)準(zhǔn)的HTML頁面，可以正常地在常用的瀏覽器中顯示。瀏覽者查看頁面源文件時(shí)，看到的是ASP生成的HTML代碼，而不是ASP程序代碼。這樣就可以防止別人抄襲程序。</p&

35、gt;<p>　　2.2 SQL語句介紹</p><p>　　SQL語言是所有關(guān)系數(shù)據(jù)庫的公共語言 由于所有主要的關(guān)系數(shù)據(jù)庫管理系統(tǒng)都支持SQL語言，用戶可將使用SQL的技能從一個(gè)RDBMS轉(zhuǎn)到另一個(gè)。所有用SQL編寫的程序都是可以移植的。SQL 是PostgreSQL(和大多數(shù)其它關(guān)系型數(shù)據(jù)庫)用做查詢語言的語言。它是可以移植的，并且容易學(xué)習(xí)使用。但是所有SQL語句都必須由數(shù)據(jù)庫服務(wù)器獨(dú)立

36、地執(zhí)行。這就意味著客戶端應(yīng)用必須把每條查詢發(fā)送到數(shù)據(jù)庫服務(wù)器，等待它處理這個(gè)查詢，接收結(jié)果，做一些運(yùn)算，然后給服務(wù)器發(fā)送另外一條查詢。所有這些東西都會產(chǎn)生進(jìn)程間通訊，并且如果客戶端在另外一臺機(jī)器上甚至還會導(dǎo)致網(wǎng)絡(luò)開銷。如果使用了 PL/pgSQL，那么可以把一塊運(yùn)算和一系列查詢在數(shù)據(jù)庫服務(wù)器里面組成一個(gè)塊，這樣就擁有了過程語言的力量并且簡化SQL的使用，因而節(jié)約了大量的時(shí)間，因?yàn)橛貌恢冻隹蛻舳?服務(wù)器通訊的過熱。通過使用PL/pgSQ

37、L，應(yīng)用可以獲得可觀的性能提升。</p><p><b>　　SQL語言的使用</b></p><p>　　數(shù)據(jù)記錄篩選：sql="select*from數(shù)據(jù)表where字段名=字段值orderby字段名[desc]"sql="select*from數(shù)據(jù)表where字段名like'%字段值%'orderby字段名[de

38、sc]"sql="selecttop10*from數(shù)據(jù)表where字段名orderby字段名[desc]"sql="select*from數(shù)據(jù)表where字段名in('值1','值2','值 3')"sql="select*from數(shù)據(jù)表where字段名between值1and值2"(2)更新數(shù)據(jù)記錄：sql=

39、"update數(shù)據(jù)表set字段名=字段值where條件表達(dá)式"sql="update數(shù)據(jù)表set字段1=值1,字段2=值2……字段n=值nwhere條件表達(dá)式(3)刪除數(shù)據(jù)記錄：sql="deletefrom數(shù)據(jù)表where條件表達(dá)式"sql="deletefrom數(shù)據(jù)表"(將數(shù)據(jù)表所有記錄刪除)(4)添加數(shù)據(jù)記錄：sql="insertinto

40、數(shù)據(jù)表(字段1,字段2,字段3…)values(值1,值2,值3…)"</p><p>　　sql="insertinto目標(biāo)數(shù)據(jù)表select*from源數(shù)據(jù)表"(把源數(shù)據(jù)表的記錄添加到目標(biāo)數(shù)據(jù)表)(5)數(shù)據(jù)記錄統(tǒng)計(jì)函數(shù)：AVG(字段名)得出一個(gè)表格欄平均值COUNT(*¦字段名)對數(shù)據(jù)行數(shù)的統(tǒng)計(jì)或?qū)δ骋粰谟兄档臄?shù)據(jù)行數(shù)統(tǒng)計(jì)MAX(字段名)取得一個(gè)表格欄最大的值

41、MIN(字段名)取得一個(gè)表格欄最小的值SUM(字段名)把數(shù)據(jù)欄的值相加(5)數(shù)據(jù)表的建立和刪除：CREATETABLE數(shù)據(jù)表名稱(字段1類型1(長度),字段2類型2(長度)……)DROPTABLE數(shù)據(jù)表名稱(永久性刪除一個(gè)數(shù)據(jù)表)</p><p>　　(6)記錄集對象的方法：rs.movenext將記錄指針從當(dāng)前的位置向下移一行rs.moveprevious將記錄指針從當(dāng)前的位置向上移一行rs.mo

42、vefirst將記錄指針移到數(shù)據(jù)表第一行rs.movelast將記錄指針移到數(shù)據(jù)表最后一行rs.absoluteposition=N將記錄指針移到數(shù)據(jù)表第N行rs.absolutepage=N將記錄指針移到第N頁的第一行rs.pagesize=N設(shè)置每頁為N條記錄rs.pagecount根據(jù)pagesize的設(shè)置返回總頁數(shù)rs.recordcount返回記錄總數(shù)rs.bof返回記錄指針是否超出數(shù)據(jù)表首端，true表示是，f

43、alse為否rs.eof返回記錄指針是否超出數(shù)據(jù)表末端，true表示是，false為否rs.delete刪除當(dāng)前記錄，但記錄指針不會向下移動rs.addnew添加記錄到數(shù)據(jù)表末端rs.update更新數(shù)據(jù)表記錄</p><p>　　2.3 VB Script介紹</p><p>　　VBScript只有一種數(shù)據(jù)類型，稱為Variant。Variant是一種特殊的數(shù)據(jù)類型，根據(jù)使用的

44、方式，它可以包含不同類別的信息。因?yàn)閂ariant是VBScript中唯一的數(shù)據(jù)類型，所以它也VBScript中所有函數(shù)的返回值的數(shù)據(jù)類型。最簡單的Variant可以包含數(shù)字或字符串信息。Variant用于數(shù)字上下文中時(shí)作為數(shù)字處理，用于字符串上下文中時(shí)作為字符串處理。這就是說，如果使用看起來象是數(shù)字的數(shù)據(jù)，則VBScript會假定其為數(shù)字并以適用于數(shù)字的方式處理。與此類似，如果使用的數(shù)據(jù)只可能是字符串，則VBScript將按字符串處理

45、。當(dāng)然，也可以將數(shù)字包含在引號("")中使其成為字符串。除簡單數(shù)字或字符串以外，Variant可以進(jìn)一步區(qū)分?jǐn)?shù)值信息的特定含義。例如使用數(shù)值信息表示日期或時(shí)間。此類數(shù)據(jù)在與其他日期或時(shí)間數(shù)據(jù)一起使用時(shí)，結(jié)果也總是表示為日期或時(shí)間。當(dāng)然，從Boolean值到浮點(diǎn)數(shù)，數(shù)值信息是多種多樣的。Variant包含的數(shù)值信息類型稱為子類型。大多數(shù)情況下，可將所需的數(shù)據(jù)放進(jìn)Variant中，而Variant也會按照最適用于其包含的

46、數(shù)據(jù)的方式進(jìn)行操作。聲明變量的一種方式是</p><p>　　另一種方式是通過直接在Script中使用變量名這一簡單方式隱式聲明變量。這通常不是一個(gè)好習(xí)慣，因?yàn)檫@樣有時(shí)會由于變量名被拼錯而導(dǎo)致在運(yùn)行Script時(shí)出現(xiàn)意外的結(jié)果。因此，最好使用Option Explicit語句顯式聲明所有變量。</p><p>　　在VBScript中，過程被分為兩類：Sub過程和Function過程:&l

47、t;/p><p>　　Sub過程 Sub過程是包含在Sub和End Sub語句之間的一組VBScript語句，執(zhí)行操作但不返回值。Sub過程可以使用參數(shù)（由調(diào)用過程傳遞的常數(shù)、變量或表達(dá)式）。(2)Function過程 Function過程是包含在Function和End Function語句之間的一組VBScript語句。Function過程與Sub過程類似，但是Function過程可以返回值。Fu

48、nction過程可以使用參數(shù)（由調(diào)用過程傳遞的常數(shù)、變量或表達(dá)式）。如果Function過程無任何參數(shù)，則Function語句必須包含空括號()。 Function過程通過函數(shù)名返回一個(gè)值，這個(gè)值是在過程的語句中賦給函數(shù)名的。Function 返回值的數(shù)據(jù)類型總是Variant。</p><p><b>　　第三章 需求分析</b></p><p><b>

49、　　3.1用戶需求</b></p><p>　?。?）針對應(yīng)試者的考試平臺</p><p>　　（2）針對管理者得管理平臺</p><p>　　3.2系統(tǒng)需要解決的主要問題</p><p>　　3.2.1 對于應(yīng)試者</p><p>　　（1） 應(yīng)試者進(jìn)入考試系統(tǒng)應(yīng)該進(jìn)行身份驗(yàn)證。</p>&

50、lt;p>　?。?） 在線考試基于網(wǎng)絡(luò)環(huán)境，試卷應(yīng)該從服務(wù)器的數(shù)據(jù)庫隨機(jī)抽取試題后動態(tài)生成的。</p><p>　?。?） 系統(tǒng)應(yīng)該對考試時(shí)間進(jìn)行控制，時(shí)間到了會要求考試者交卷。</p><p>　?。?）考試者選擇答案提交后，應(yīng)該由計(jì)算機(jī)自動判卷，得到成績后顯示出來。</p><p>　?。?） 考試完畢后，可以返回登錄界面或繼續(xù)考試。</p>

51、<p>　　3.2.2 對于管理者</p><p>　?。?） 管理者進(jìn)入管理系統(tǒng)應(yīng)該進(jìn)行身份驗(yàn)證。</p><p>　?。?） 應(yīng)該可以對題庫進(jìn)行增、刪、查、改等操作。</p><p>　?。?） 可以對考生信息進(jìn)行查看和修改。</p><p>　　（4） 可以修改考生信息包括成績。</p><p>　　

52、3.3系統(tǒng)應(yīng)具備的基本功能</p><p>　　用戶注冊：用戶可以進(jìn)行注冊，然后登錄。</p><p>　　用戶信息的管理：管理員可以增刪用戶試題庫管理：對試題的增、刪、查、改。</p><p>　　試卷生成：自動生成試卷。</p><p>　　在線考試：系統(tǒng)嚴(yán)格控制整個(gè)考試過程，實(shí)行時(shí)間的監(jiān)控與權(quán)限的控制，考生需要在限定的考試時(shí)間內(nèi)交卷。

53、</p><p>　　計(jì)算機(jī)自動閱卷：本系統(tǒng)只考慮客觀題，要求計(jì)算機(jī)能自動閱卷，然后馬上顯示出考生分?jǐn)?shù)。</p><p>　　成績查閱：考生考完以后，管理員應(yīng)該能對所有紀(jì)錄進(jìn)行查詢，并應(yīng)該可以刪除指定紀(jì)錄。</p><p>　　在線考試系統(tǒng)還應(yīng)該具有友好、簡潔的界面，安全性要高，穩(wěn)定性要強(qiáng)，能夠滿足１００人以上同時(shí)及進(jìn)行在線考試。</p><p&

54、gt;<b>　　3.4可行性分析</b></p><p>　　可行性分析是委托開發(fā)一個(gè)系統(tǒng)之前首先要做的事情。分析需求可行性在允許的成本、性能要求下，分析每一項(xiàng)需求實(shí)施的可能性，明確與每一項(xiàng)需求實(shí)現(xiàn)相聯(lián)系的風(fēng)險(xiǎn)，包括與其它需求的沖突，對外界因素的依賴和技術(shù)障礙。</p><p>　　3.4.1技術(shù)可行性</p><p>　　本考試系統(tǒng)是以Wi

55、ndows、Internet Explorer為客戶端，以Windows、Internet Information Server IIS 5.0及以上版本為服務(wù)器，以C/S為運(yùn)行模式的應(yīng)用系統(tǒng)。它以VBScript為主要開發(fā)語言，在局部輔助以JScript語言。所以在技術(shù)上是可行的。</p><p>　　3.4.2軟件可行性</p><p>　　它以access為數(shù)據(jù)庫搭建平臺。在網(wǎng)頁設(shè)計(jì)

56、方面則主要使用dreamweaver為開發(fā)工具。在支持軟件方面是可行的。</p><p>　　3.4.3硬件可行性</p><p>　　服務(wù)器：CPU:PIII 500以上,內(nèi)存:256M以上?？蛻魴C(jī)：CPU:P200MMX以上，內(nèi)存：32M以上即可運(yùn)行。所以在硬件方面是可行的。</p><p>　　第四章 系統(tǒng)總體設(shè)計(jì)</p><p>　　

57、4.1系統(tǒng)的開發(fā)環(huán)境</p><p>　　開發(fā)平臺：Windows vista</p><p>　　應(yīng)用軟件：dreamweaver、access、IIS5.0</p><p>　　應(yīng)用語言：VBScript、JScript</p><p>　　4.2工程框架（結(jié)構(gòu)圖）</p><p><b>　　1.總體框

58、架</b></p><p><b>　　圖4—1總體框架圖</b></p><p><b>　　2.模塊框架</b></p><p><b>　　圖4—2模塊框架圖</b></p><p><b>　　第五章 詳細(xì)設(shè)計(jì)</b></p>

59、;<p><b>　　5.1功能模塊</b></p><p>　　5.1.1功能模塊結(jié)構(gòu)圖</p><p>　　5.1.1.1學(xué)生功能模塊</p><p>　　圖5—1學(xué)生功能模塊結(jié)構(gòu)圖</p><p>　　5.1.1.2教師功能模塊</p><p>　　圖5—2教師功能模塊結(jié)構(gòu)圖&

60、lt;/p><p>　　5.1.2功能模塊概述及核心代碼</p><p>　　5.1.2.1學(xué)生功能模塊</p><p>　　判斷學(xué)員是否存在模塊&登陸模塊</p><p><b>　　模塊概述：</b></p><p>　?。?）與數(shù)據(jù)庫用戶信息比較判斷該學(xué)員是否存在。</p>

61、<p>　?。?）為用戶建立Session對象</p><p><b>　　相應(yīng)代碼：</b></p><p>　　Index1.asp //登陸界面</p><p>　　<%@LANGUAGE="VBSCRIPT" CODEPAGE="936"%></p><

62、p>　　<!-- #include file="conn.asp" --> </p><p><b>　　<html> </b></p><p><b>　　<head> </b></p><p>　　<meta http-equiv="Cont

63、ent-Type" content="text/html; charset=gb2312"> </p><p>　　<title>學(xué)生登陸</title> </p><p><b>　　</head> </b></p><p><b>　　<body>

64、 </b></p><p><b>　　<center></b></p><p>　　<p>學(xué)生登陸</p></p><p>　　<form name="form2" method="post" action="login1.asp"

65、;></p><p>　　<table width="39%" border="0"></p><p><b>　　<tr></b></p><p>　　<td width="22%" height="40">用戶名:<

66、;/td></p><p>　　<td width="78%" height="40"><input name="username" type="text" id="username3" size="20"></td></p><p&

67、gt;<b>　　</tr></b></p><p><b>　　<tr></b></p><p>　　<td height="43">密 碼:</td></p><p>　　<td height="43"><inpu

68、t name="password" type="password" id="password" size="20"></td></p><p><b>　　</tr></b></p><p><b>　　<tr></b><

69、;/p><p>　　<td height="37" colspan="2" align="center"><input type="submit" name="Submit" value="確定"></p><p>　　<input type=&

70、quot;reset" name="Submit" value="重置"></td></p><p><b>　　</tr></b></p><p><b>　　<tr></b></p><p>　　<td height=&q

71、uot;20" colspan="2"><a href="reg.asp" target="_self">注冊</a></td></p><p><b>　　</tr></b></p><p><b>　　</table>

72、</b></p><p><b>　　</form></b></p><p><b>　　</center></b></p><p><b>　　</body> </b></p><p><b>　　</html&

73、gt; </b></p><p>　　Login1.asp //登陸處理</p><p>　　<!-- #include file="conn.asp" --> </p><p><b>　　<% </b></p><p>　　set rsc=server.createo

74、bject("adodb.recordset") </p><p>　　sqlc="select * from student where username='"&request.Form("username")&"' and password='"&request.Form("

75、;password")&"'" </p><p>　　rsc.open sqlc,conn,1,1 </p><p>　　if not(rsc.eof) then</p><p>　　if rsc("score")<>0 then</p><p>　　if rsc(

76、"score")=-1 then</p><p>　　response.Write(rsc("username")&"您的成績?yōu)?")</p><p><b>　　else</b></p><p>　　response.Write(rsc("username"

77、;)&"您的成績?yōu)?quot;&rsc("score"))</p><p><b>　　end if</b></p><p><b>　　else</b></p><p>　　session("username")=rsc("username&qu

78、ot;) </p><p>　　session("password")=rsc("password") </p><p>　　session.Timeout=300</p><p>　　set rsc=nothing </p><p>　　response.Redirect("text.asp

79、")</p><p><b>　　end if </b></p><p><b>　　else</b></p><p>　　response.Write("對不起，用戶名或密碼錯誤！")</p><p><b>　　end if</b></p

80、><p><b>　　%> </b></p><p>　　注冊模塊：用戶注冊。</p><p><b>　　模塊概述：</b></p><p>　　用戶名與密碼是否為空，是否符合標(biāo)準(zhǔn)；</p><p>　　用戶名是否可用，是否重復(fù)；</p><p>

81、　　兩次輸入的密碼是否相同；</p><p><b>　　是否注冊成功；</b></p><p><b>　　相應(yīng)代碼：</b></p><p>　　Reg.asp //注冊界面</p><p>　　<%@LANGUAGE="VBSCRIPT" CODEPAGE="

82、;936"%></p><p><b>　　<html></b></p><p><b>　　<head></b></p><p>　　<meta http-equiv="Content-Type" content="text/html; char

83、set=gb2312"></p><p>　　<title>用戶注冊</title> </p><p><b>　　</head> </b></p><p><b>　　<body> </b></p><p><b>　　&l

84、t;center></b></p><p><b>　　<pre></b></p><p>　　<span>用戶注冊</span></p><p><b>　　<% </b></p><p>　　=request.QueryString(&

85、quot;msg") </p><p><b>　　%></b></p><p><b>　　</pre></b></p><p><b>　　</center></b></p><p><b>　　<center>

86、</b></p><p>　　<form name="form1" method="post" action="addnewdata.asp?ac=adduser"> </p><p>　　<table width="53%" height="123" bord

87、er="0" > </p><p><b>　　<tr> </b></p><p>　　<td width="19%" height="30">用戶名：</td> </p><p>　　<td width="81%"

88、height="30"><div align="left"></p><p>　　<input name="username" type="text" id="username" size="40"> </p><p>　　*</div

89、></td> </p><p><b>　　</tr> </b></p><p><b>　　<tr> </b></p><p>　　<td height="30">密碼：</td> </p><p>　　<

90、td height="30"><div align="left"></p><p>　　<input name="password" type="password" id="password" size="40"> </p><p>　　*&

91、lt;/div></td> </p><p><b>　　</tr> </b></p><p><b>　　<tr> </b></p><p>　　<td height="30">確定密碼：</td> </p><p&

92、gt;　　<td height="30"><div align="left"></p><p>　　<input name="password2" type="password" id="password2" size="40"> </p>&l

93、t;p>　　*</div></td> </p><p><b>　　</tr> </b></p><p><b>　　<tr> </b></p><p>　　<input type="submit" name="Submit&quo

94、t; value="提交"></p><p>　　</div></td> </p><p><b>　　</tr> </b></p><p><b>　　</table> </b></p><p><b>　　<

95、;/form></b></p><p><b>　　</center></b></p><p><b>　　</body> </b></p><p><b>　　</html> </b></p><p>　　Addnewda

96、ta.asp//注冊處理</p><p>　　<%@LANGUAGE="VBSCRIPT" CODEPAGE="936"%></p><p>　　<!-- #include file="conn.asp" --> </p><p><b>　　<html><

97、;/b></p><p><b>　　<head></b></p><p>　　<meta http-equiv="Content-Type" content="text/html; charset=gb2312"></p><p>　　<title>成功<

98、/title> </p><p><b>　　</head> </b></p><p><b>　　<body> </b></p><p><b>　　<% </b></p><p>　　ac=request.QueryString(&quo

99、t;ac") </p><p>　　msg="注冊錯誤信息" </p><p>　　if request.Form("username")="" then </p><p>　　msg=msg&"<br>"&"用戶名不能為空" &

100、lt;/p><p><b>　　end if </b></p><p>　　if strcomp(cstr(request.Form("password")),cstr(request.Form("password2")))<>0 then </p><p>　　msg=msg&"

101、;<br>"&"兩次密碼輸入不同" </p><p><b>　　end if </b></p><p>　　if strcomp(msg,"注冊錯誤信息")>0 then </p><p>　　response.Redirect("reg.asp?msg=

102、"&msg) </p><p><b>　　end if </b></p><p>　　if ac="adduser" then </p><p>　　set rsc=server.createobject("adodb.recordset") </p><p>

103、　　sql="select * from student where username='"&request.Form("username")&"'" </p><p>　　rsc.open sql,conn,1,1 </p><p>　　ck=rsc("username") &

104、lt;/p><p>　　set rsc=nothing </p><p>　　if ck<>"" then </p><p>　　msg=msg&"<br>"&"用戶名被人注冊" </p><p>　　response.Redirect("

105、;reg.asp?msg="&msg) </p><p><b>　　end if </b></p><p>　　dsql="select * from student where id is null" </p><p>　　set rs=server.createobject("adodb.r

106、ecordset") </p><p>　　rs.open dsql,conn,1,3 </p><p>　　rs.addnew </p><p>　　rs("username")=request.Form("username") </p><p>　　rs("password&qu

107、ot;)=request.Form("password")</p><p>　　rs("score")=0 </p><p>　　rs.update </p><p>　　set rs=nothing </p><p><b>　　%> </b></p>&

108、lt;p><b>　　<center> </b></p><p>　　<a href="index1.asp" target="_self">注冊成功,點(diǎn)擊登陸</a> </p><p>　　</center> </p><p><b>　　

109、<% </b></p><p><b>　　end if </b></p><p><b>　　%> </b></p><p><b>　　</body> </b></p><p><b>　　</html></b

110、></p><p>　　3.查分模塊：（登陸時(shí)若已參加過考試則顯示分?jǐn)?shù)）</p><p><b>　　模塊概述：</b></p><p><b>　　數(shù)據(jù)庫查詢。</b></p><p><b>　　考試模塊</b></p><p><b&g

111、t;　　模塊概述：</b></p><p><b>　　限定考試時(shí)間</b></p><p><b>　　提供考題</b></p><p><b>　　提交&評分模塊</b></p><p><b>　　模塊概述：</b></p&

112、gt;<p><b>　　提交學(xué)員所做答案</b></p><p>　　與數(shù)據(jù)庫中正確答案對比評分：未在規(guī)定時(shí)間內(nèi)答完的記零分，在規(guī)定內(nèi)答完的安如下公式換算（right/all=得分/100）</p><p><b>　　得分記錄入數(shù)據(jù)庫</b></p><p><b>　　顯示成績</b&g

113、t;</p><p>　　考試模塊及提交&評分模塊代碼：</p><p>　　Text.asp//考試界面&時(shí)間顯示</p><p>　　<%@LANGUAGE="VBSCRIPT" CODEPAGE="936"%></p><p>　　<!-- #include fi

114、le="conn.asp" --></p><p><b>　　<%</b></p><p>　　sql="select * from test"</p><p>　　set rs=conn.Execute(sql)</p><p><b>　　%>&l

115、t;/b></p><p>　　<script LANGUAGE="Javascript"></p><p>　　var isn1=null;</p><p>　　var isn2=false;</p><p>　　today=new Date();</p><p>　　funct

116、ion stopit(){</p><p><b>　　if(isn2){</b></p><p>　　clearTimeout(isn1);</p><p><b>　　}</b></p><p>　　isn2=false;</p><p><b>　　}<

117、/b></p><p>　　function startit(){</p><p><b>　　stopit();</b></p><p>　　isnclock();</p><p><b>　　}</b></p><p>　　function isnclock(){&

118、lt;/p><p>　　var now=new Date();</p><p>　　var hrs=now.getHours();</p><p>　　var min=now.getMinutes();</p><p>　　var sec=now.getSeconds();</p><p>　　document.clckh

119、.disp.value=""+((hrs>12) ? hrs-12:hrs);</p><p>　　document.clckm.disp.value=((min<10) ? "0" : "")+min;</p><p>　　document.clcks.disp.value=((sec<10) ? "

120、0" : "")+sec;</p><p>　　document.clck.disp.value=(hrs>=12) ? "p.m." : "a.m.";</p><p>　　is1=setTimeout("isnclock()",1000);</p><p>　　isn

121、2=true;</p><p><b>　　}</b></p><p><b>　　</script></b></p><p><b>　　<html></b></p><p><b>　　<head></b></

122、p><p>　　<meta http-equiv="Content-Type" content="text/html; charset=gb2312"></p><p>　　<meta http-equiv="refresh" content="30;URL=lose.asp"></p

123、><p>　　<meta name="Microsoft Visual Studio 6.0"></p><p><b>　　</head></b></p><p>　　<body onLoad="startit()"></p><p><b&

124、gt;　　<center></b></p><p>　　<table border="2"></p><p><b>　　<tr></b></p><p>　　<td>Time</td><td>Hour</td><td>

125、;Min</td><td>Sec</td><td></td></p><p><b>　　</tr></b></p><p><b>　　<tr></b></p><p><b>　　<td></td>&l

126、t;/b></p><p>　　<td valign="top"><form name="clckh" onSubmit="0"></p><p>　　<input type="text" name="disp" size="2" va

127、lue=""></p><p>　　</form></td></p><p>　　<td valign="top"><form name="clckm" onSubmit="0"></p><p>　　<input type=&

128、quot;text" name="disp" size="2" value=""></p><p>　　</form></td></p><p>　　<td valign="top"><form name="clcks" onSubm

129、it="0"></p><p>　　<input type="text" name="disp" size="2" value=""></p><p>　　</form></td></p><p>　　<td valig

130、n="top"><form name="clck" onSubmit="0"></p><p>　　<input type="text" name="disp" size="4" value=""></p><p>　　&

131、lt;/form></td></tr></p><p><b>　　</table></b></p><p><b>　　</center></b></p><p><b>　　<p></p></b></p>

132、<p>　　<p><font>*請注意時(shí)間！</font></p></p><p>　　<p><font>考試時(shí)間為45分鐘，45分鐘內(nèi)沒有交卷者將被記為零分！</font></p></p><p>　　<form action="result.asp" id

133、="form1" method="post" name="form1"></p><p><b>　　<p></b></p><p><b>　　<%</b></p><p><b>　　i=1</b></p&g

134、t;<p>　　rs.movefirst</p><p>　　do while not rs.eof</p><p><b>　　%></b></p><p>　　<p align="left"><%=rs("question")%></p><

135、/p><p>　　<table align="center" border="1" cellpadding="1" cellspacing="1" width="80%"></p><p><b>　　<tr></b></p><

136、p>　　<td style="width:50% " width="50%"></p><p>　　<input name="ans<% =i%>" type="radio" value="A"></p><p>　　<%=rs("a

137、")%></td></p><p><b>　　<td></b></p><p>　　<input name="ans<%=i%>" type="radio" value="B"></p><p>　　<% =rs(

138、"b") %></td></tr></p><p><b>　　<tr></b></p><p><b>　　<td></b></p><p>　　<input name="ans<%=i%>" type=&qu

139、ot;radio" value="C"></p><p>　　<%=rs("c")%></td></p><p><b>　　<td></b></p><p>　　<input name="ans<%=i%>" ty