畢業(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ì)以及面臨的眾多問(wèn)題，然后從原理上、技術(shù)上介紹了目前使用最廣泛的開(kāi)發(fā)工具，以及開(kāi)發(fā)環(huán)境等。本文以在線考試系統(tǒng)為主要研究對(duì)象的基礎(chǔ)上，進(jìn)行了系統(tǒng)的需求分析，在技術(shù)、經(jīng)濟(jì)等方面進(jìn)行了可行性分析，以及數(shù)據(jù)庫(kù)分析等，同時(shí)，對(duì)在線考試系統(tǒng)功能模塊圖、系統(tǒng)流程圖的設(shè)計(jì)，詳細(xì)的設(shè)計(jì)了在線考試系統(tǒng)中的邏輯設(shè)計(jì)和物理設(shè)計(jì)，系統(tǒng)總體

3、設(shè)計(jì)，最后對(duì)本設(shè)計(jì)進(jìn)行了測(cè)試總結(jié)。</p><p>　　關(guān)鍵字：在線考試，ASP，Access數(shù)據(jù)庫(kù)，Web，自動(dòng)評(píng)分</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語(yǔ)句介紹9</p><p>　　2.3 VB Script介紹11</p><p>　　第三章 需求分

10、析13</p><p>　　3.1用戶需求13</p><p>　　3.2系統(tǒng)需要解決的主要問(wèn)題13</p><p>　　3.2.1 對(duì)于應(yīng)試者13</p><p>　　3.2.2 對(duì)于管理者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)的開(kāi)發(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ù)庫(kù)構(gòu)建44</p><p>　　5.2.1數(shù)據(jù)庫(kù)構(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首頁(yè)46</p><p>　　5.3.2用戶登錄界面46</p><p>　　5.3.3用戶主要操作界面47</p><p><b>　　第六

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

37、L，應(yīng)用可以獲得可觀的性能提升。</p><p><b>　　SQL語(yǔ)言的使用</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(*¦字段名)對(duì)數(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(長(zhǎng)度),字段2類型2(長(zhǎng)度)……)DROPTABLE數(shù)據(jù)表名稱(永久性刪除一個(gè)數(shù)據(jù)表)</p><p>　　(6)記錄集對(duì)象的方法：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頁(yè)的第一行rs.pagesize=N設(shè)置每頁(yè)為N條記錄rs.pagecount根據(jù)pagesize的設(shè)置返回總頁(yè)數(shù)rs.recordcount返回記錄總數(shù)rs.bof返回記錄指針是否超出數(shù)據(jù)表首端，true表示是，f

43、alse為否rs.eof返回記錄指針是否超出數(shù)據(jù)表末端，true表示是，false為否rs.delete刪除當(dāng)前記錄，但記錄指針不會(huì)向下移動(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ù)類型。最簡(jiǎn)單的Variant可以包含數(shù)字或字符串信息。Variant用于數(shù)字上下文中時(shí)作為數(shù)字處理，用于字符串上下文中時(shí)作為字符串處理。這就是說(shuō)，如果使用看起來(lái)象是數(shù)字的數(shù)據(jù)，則VBScript會(huì)假定其為數(shù)字并以適用于數(shù)字的方式處理。與此類似，如果使用的數(shù)據(jù)只可能是字符串，則VBScript將按字符串處理

45、。當(dāng)然，也可以將數(shù)字包含在引號(hào)("")中使其成為字符串。除簡(jiǎn)單數(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也會(huì)按照最適用于其包含的

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

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

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

49、　　3.1用戶需求</b></p><p>　?。?）針對(duì)應(yīng)試者的考試平臺(tái)</p><p>　　（2）針對(duì)管理者得管理平臺(tái)</p><p>　　3.2系統(tǒng)需要解決的主要問(wèn)題</p><p>　　3.2.1 對(duì)于應(yīng)試者</p><p>　?。?） 應(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ù)庫(kù)隨機(jī)抽取試題后動(dòng)態(tài)生成的。</p><p>　　（3） 系統(tǒng)應(yīng)該對(duì)考試時(shí)間進(jìn)行控制，時(shí)間到了會(huì)要求考試者交卷。</p><p>　?。?）考試者選擇答案提交后，應(yīng)該由計(jì)算機(jī)自動(dòng)判卷，得到成績(jī)后顯示出來(lái)。</p><p>　?。?） 考試完畢后，可以返回登錄界面或繼續(xù)考試。</p>

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

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

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

54、gt;<b>　　3.4可行性分析</b></p><p>　　可行性分析是委托開(kāi)發(fā)一個(gè)系統(tǒng)之前首先要做的事情。分析需求可行性在允許的成本、性能要求下，分析每一項(xiàng)需求實(shí)施的可能性，明確與每一項(xiàng)需求實(shí)現(xiàn)相聯(lián)系的風(fēng)險(xiǎn)，包括與其它需求的沖突，對(duì)外界因素的依賴和技術(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為主要開(kāi)發(fā)語(yǔ)言，在局部輔助以JScript語(yǔ)言。所以在技術(shù)上是可行的。</p><p>　　3.4.2軟件可行性</p><p>　　它以access為數(shù)據(jù)庫(kù)搭建平臺(tái)。在網(wǎng)頁(yè)設(shè)計(jì)

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

57、4.1系統(tǒng)的開(kāi)發(fā)環(huán)境</p><p>　　開(kāi)發(fā)平臺(tái)：Windows vista</p><p>　　應(yīng)用軟件：dreamweaver、access、IIS5.0</p><p>　　應(yīng)用語(yǔ)言：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ù)庫(kù)用戶信息比較判斷該學(xué)員是否存在。</p>

61、<p>　?。?）為用戶建立Session對(duì)象</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">注冊(cè)</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")&"您的成績(jī)?yōu)?")</p><p><b>　　else</b></p><p>　　response.Write(rsc("username"

77、;)&"您的成績(jī)?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("對(duì)不起，用戶名或密碼錯(cuò)誤！")</p><p><b>　　end if</b></p

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

81、　　兩次輸入的密碼是否相同；</p><p><b>　　是否注冊(cè)成功；</b></p><p><b>　　相應(yīng)代碼：</b></p><p>　　Reg.asp //注冊(cè)界面</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>用戶注冊(cè)</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>用戶注冊(cè)</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//注冊(cè)處理</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="注冊(cè)錯(cuò)誤信息" </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,"注冊(cè)錯(cuò)誤信息")>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>"&"用戶名被人注冊(cè)" </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">注冊(cè)成功,點(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í)若已參加過(guò)考試則顯示分?jǐn)?shù)）</p><p><b>　　模塊概述：</b></p><p><b>　　數(shù)據(jù)庫(kù)查詢。</b></p><p><b>　　考試模塊</b></p><p><b&g

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

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

113、t;</p><p>　　考試模塊及提交&評(píng)分模塊代碼：</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>*請(qǐng)注意時(shí)間！</font></p></p><p>　　<p><font>考試時(shí)間為45分鐘，45分鐘內(nèi)沒(mé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