自考“計(jì)算機(jī)及應(yīng)用”專業(yè)論文參考范文（29） -自考串講筆記

　　值得注意的代碼主要有以下幾處：

　　該頁面有自動(dòng)刷新功能，使在線用戶可以盡快的看到最新的選舉情況。我們這里設(shè)定每隔30秒鐘自動(dòng)刷新一次。

　　<meta http-equiv=“refresh” content=“10；URL=show.asp”>

　　顯示投票時(shí)，我們采用了while循環(huán)，把候選人及其得票數(shù)，整齊地顯示在一個(gè)表格中，這種技術(shù)在數(shù)據(jù)庫查詢結(jié)果的顯示中也經(jīng)常用到。代碼如下：

　　<%while not hs.eof %>

　　<tr>

　　<td width=“100%”><center>

　　<font color=“#8000ff”><big>

　　<%=hs（“name”）&“ ”&hs（“result”）&“票”%>

　　</big> </font>

　　</center>

　　</td>

　　</tr>

　　<%hs.movenext%>

　　<%wend%>

　　3.4達(dá)級(jí)考試在線查分系統(tǒng)與計(jì)數(shù)器的制作

　　3.4.1功能：

　　它提供了在線查看成績?？忌梢栽诰W(wǎng)上使用這一系統(tǒng)，通過輸入準(zhǔn)考證編號(hào)來查詢達(dá)級(jí)考試的結(jié)果。

　　3.4.2數(shù)據(jù)表的設(shè)計(jì)

　　與評(píng)優(yōu)系統(tǒng)共用STUd表，表設(shè)計(jì)同上。

　　3.4.3界面設(shè)計(jì)與重點(diǎn)難點(diǎn)代碼的設(shè)計(jì)

　　該模塊需要查詢者輸入準(zhǔn)考證號(hào)后來查看結(jié)果。若ID1不為空時(shí)，表示有表單輸入，開始查詢數(shù)據(jù)庫。使用 SELECT的SQL指令查詢數(shù)據(jù)庫的數(shù)據(jù)。先設(shè)定SQL指令，查詢ID符合準(zhǔn)考證編號(hào)Request.Form（“ID1”）的數(shù)據(jù)，下個(gè)“Execute”指令，即可開始執(zhí)行存取、查詢數(shù)據(jù)的動(dòng)作了。并將查詢結(jié)果儲(chǔ)存到Recordsets組件RS中。

　　IF Request.Form（“ID1”）<>“” THEN

　　Set Conn = Server.CreateObject（“ADODB.Connection”）

　　Conn.Open（“FILEDSN=c：\Program Files\Common Files\ODBC\Data Sources\ms access database.dsn”）

　　SQL = “SELECT name，id，score FROM stud WHERE id='” & Request.Form（“ID1”） & “'”

　　Set RS = Conn.Execute（SQL）

　　若考試通過，則顯示考試的結(jié)果，包括姓名、準(zhǔn)考證編號(hào)、總分和考試結(jié)果，分別由RecordSets 組件的RS（0）、RS（1）、RS（2）、RS（3）得到。FS.Field.Count表示RecordSets組件的域的總數(shù)，由“for I=0 to RS.Fields.count-1”，取得RS（I）各域的數(shù)據(jù)。配合 <Table> 表格的HTML語法，將結(jié)果填入表格的各單元格中。 若還有下一個(gè)數(shù)據(jù)，就使用RS.MoveNext 移到下一個(gè)位置。

　　3.4.4頁面訪問計(jì)數(shù)器的制作

　　利用文件處理組件FILESYSTEM的強(qiáng)大功能來制作，比用Application對(duì)象計(jì)數(shù)器要好，Application計(jì)數(shù)器當(dāng)有20分鐘沒有人連上該網(wǎng)頁或關(guān)機(jī)時(shí)，計(jì)數(shù)器會(huì)被歸零。而文件計(jì)數(shù)器卻不會(huì)因時(shí)間而消失。我用Count.txt存放訪問人次。代碼如下：

　　whichfile=server.mappath（“pic\count.txt”）

　　set myfile=server.createobject（“scripting.filesystemobject”） 創(chuàng)建一個(gè)

　　set thisfile=myfile.opentextfile（whichfile） 組件對(duì)象

　　visit=thisfile.readline

　　thisfile.close 讀取計(jì)數(shù)器數(shù)據(jù)文件Count.txt中的計(jì)數(shù)數(shù)據(jù)

　　visit=visit+1 記錄自加一次

　　length=len（visit）

　　for i=1 to length

　　response.write “<img src=”&mid（visit，i，1）&“。jpg></img>” 將記錄的數(shù)據(jù)用圖片顯示出來

　　next

　　set thisfile=myfile.createtextfile（whichfile，1） 將新計(jì)數(shù)數(shù)據(jù)寫入文件thisfile.writeline（visit）

　　set myfile=nothing

　　數(shù)字圖片我利用PHOTOSHOP中的文字特效制作了9個(gè)立方數(shù)字：

　　等

　　四、系統(tǒng)的使用說明與安裝

　　4.1運(yùn)行環(huán)境要求

　　Windows98

　　Personal Web Server 3.0（PWS）

　　Microsoft？ Access 2000 （9.0.2812）

　　4.2安裝設(shè)置

　　A. 將本網(wǎng)站拷貝到硬盤上的某一目錄下，如：拷貝至c：\y1下。

　　B. 運(yùn)行PWS，將默認(rèn)的Web站點(diǎn)主目錄設(shè)置為該目錄，如上例應(yīng)為c：\y1；

　　具體步驟：

　　a. 選擇“高級(jí)”項(xiàng)；

　　b. 單擊“編輯屬性”按鈕，在出現(xiàn)的“編輯屬性”對(duì)話框中的“目錄”項(xiàng)中填入“c：\y1”，其他不變，確定；

　　C. 設(shè)置啟動(dòng)默認(rèn)文檔為：yy.asp

　　致謝

　　通過這次畢業(yè)設(shè)計(jì)，使我感到高科技、新知識(shí)的力量。這次畢業(yè)設(shè)計(jì)過程中，得到了長沙市工商職業(yè)中專學(xué)校的大力支持，給我提供了舒適的工作學(xué)習(xí)環(huán)境，也得到了科大老師、教授的精心指導(dǎo)，在此表示衷心的感謝！

　　五、參考文獻(xiàn)

　　[1]李世杰 Active Server Pages（ASP）3.0 網(wǎng)頁設(shè)計(jì)手冊 北京：清華大學(xué)出版社 1999

　　[2]前沿電腦圖像工作室 巧學(xué)巧用Dreamweaver、Fireworks、Flash制作網(wǎng)頁 北京：人民郵電出版社

　　[3]ASP入門與實(shí)例演練薄 小志編著 中國青年出版社