【正文】
鏈接。 % If Session(Manager) = 1 then %A HREF=../html/?title=% RSBooks(Title) %amp。BOOKID=% RSBooks(BOOKID) %管理員菜單/A% end if % : 能實(shí)現(xiàn)全校性的評(píng)選,快捷、公平,且有效,不允許做票。 這個(gè)系統(tǒng)由3個(gè)部分組成—— ,處理投票結(jié)果的腳本,顯示投票頁(yè)面 。 3.3.3數(shù)據(jù)表的設(shè)計(jì): 3.3.4界面設(shè)計(jì)與重點(diǎn)、難點(diǎn)代碼設(shè)計(jì) 投票頁(yè)面 該頁(yè)面是一個(gè)純HTML文件,它讓用戶選擇自己想選舉的候選人,并填寫自己的詳細(xì)資料,以確認(rèn)投票的有效性。頁(yè)面顯示如圖所示。 表單處理腳本 ,單擊確定投票按鈕,表單的數(shù)據(jù)就被提交, 本次評(píng)優(yōu)共有4個(gè)候選人,但只能選兩個(gè)。故用復(fù)選框。 投票的有效性通過是否是本校學(xué)生,且是否投過票來判斷。 if request(passno) then sql=select * from stud where password=amp?!痑mp。request(passno)amp?!?amp。and yitu=0 set rs=(sql) if then% h2 align=center%你無權(quán)投票%/h2 本設(shè)計(jì)允許少選,不允許多選。通過判斷Vote投票界面?zhèn)鬟f過來的復(fù)選按紐值的長(zhǎng)度看是否多選。 vo=request(cand) if len(vo)4 then% h2 align=center% 多選了,無效%/h2 然后根據(jù)所投的票將對(duì)應(yīng)候選人的投票結(jié)果字段加1,同時(shí)將該投票人的已投字段置為1。 sqq=update stud set yitu=1 where password=amp?!痑mp。request(passno)amp。’ (sqq) if instr(vo,1) then (update stud set result=result+1 where name=’李寧’) end if if instr(vo,2) then (update stud set result=result+1 where name=’楊蘭’) end if if instr(vo,3) then (update stud set result=result+1 where name=’江道明’) end if if instr(vo,4) then (update stud set result=result+1 where name=’段啟文’) end if% 由于投票處理頁(yè)面已經(jīng)完成了絕大部分的工作,所以 顯示結(jié)果頁(yè)面就很簡(jiǎn)單了,其功能是從 Stud表文件中讀取候選人所得票數(shù),顯示在頁(yè)面上。 頁(yè)面顯示如圖 值得注意的代碼主要有以下幾處: 該頁(yè)面有自動(dòng)刷新功能,使在線用戶可以盡快的看到最新的選舉情況。我們這里設(shè)定每隔30秒鐘自動(dòng)刷新一次。 meta equiv=refresh content=10。URL= 顯示投票時(shí),我們采用了while循環(huán),把候選人及其得票數(shù),整齊地顯示在一個(gè)表格中,這種技術(shù)在數(shù)據(jù)庫(kù)查詢結(jié)果的顯示中也經(jīng)常用到。代碼如下: %while not % tr td width=100%center font color=8000ffbig %=hs(name)amp。 amp。hs(result)amp。票% /big /font /center /td /tr %% %wend% 3.4達(dá)級(jí)考試在線查分系統(tǒng)與計(jì)數(shù)器的制作 3.4.1功能: 它提供了在線查看成績(jī)??忌梢栽诰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ù)庫(kù)。使用 SELECT的SQL指令查詢數(shù)據(jù)庫(kù)的數(shù)據(jù)。先設(shè)定SQL指令,(ID1)的數(shù)據(jù),下個(gè)“Execute”指令,即可開始執(zhí)行存取、查詢數(shù)據(jù)的動(dòng)作了。并將查詢結(jié)果儲(chǔ)存到Recordsets組件RS中。 IF (ID1) THEN Set Conn = () (FILEDSN=c:\Program Files\Common Files\ODBC\Data Sources\ms access ) SQL = SELECT name,id,score FROM stud WHERE id=’ amp。 (ID1) amp。 ’ Set RS = (SQL) 若考試通過,則顯示考試的結(jié)果,包括姓名、準(zhǔn)考證編號(hào)、總分和考試結(jié)果,分別由RecordSets 組件的RS(0)、RS(1)、RS(2)、RS(3)得到。,由“for I=0 to ”,取得RS(I)各域的數(shù)據(jù)。配合 Table 表格的HTML語(yǔ)法,將結(jié)果填入表格的各單元格中。 若還有下一個(gè)數(shù)據(jù), 移到下一個(gè)位置。 利用文件處理組件FILESYSTEM的強(qiáng)大功能來制作,比用Application對(duì)象計(jì)數(shù)器要好,Application計(jì)數(shù)器當(dāng)有20分鐘沒有人連上該網(wǎng)頁(yè)或關(guān)機(jī)時(shí),計(jì)數(shù)器會(huì)被歸零。而文件計(jì)數(shù)器卻不會(huì)因時(shí)間而消失。代碼如下: whichfile=(pic\) set myfile=() 創(chuàng)建一個(gè) set thisfile=(whichfile) 組件對(duì)象 visit= visit=visit+1 記錄自加一次 length=len(visit) for i=1 to length img src=amp。mid(visit,i,1)amp。.jpg/img 將記錄的數(shù)據(jù)用圖片顯示出來 next set thisfile=(whichfile,1) (visit) set myfile=nothing 數(shù)字圖片我利用PHOTOSHOP中的文字特效制作了9個(gè)立方數(shù)字: 等 四.系統(tǒng)的使用說明與安裝 4.1運(yùn)行環(huán)境要求 Windows98 Personal Web Server (PWS) Microsoft? Access 2000 () 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)文檔為: 致謝 通過這次畢業(yè)設(shè)計(jì),使我感到高科技、新知識(shí)的力量。這次畢業(yè)設(shè)計(jì)過程中,得到了長(zhǎng)沙市工商職業(yè)中專學(xué)校的大力支持,給我提供了舒適的工作學(xué)習(xí)環(huán)境,也得到了科大老師、教授的精心指導(dǎo),在此表示衷心的感謝!23 /