自考計算機(jī)應(yīng)用畢業(yè)論壇-校園網(wǎng)站設(shè)計
日期:
2014/1/5 8:45:38 來源:
本站原創(chuàng) 訪問量:
次
然后根據(jù)所投的票將對應(yīng)候選人的投票結(jié)果字段加
1,同時將該投票人的已投字段置為1。
sqq="update stud set yitu=1 where password="&"'"&request("passno")&"'"
cn.execute(sqq)
if instr(vo,"1") then
cn.execute("update stud set result=result+1 where name='李寧'")
end if
if instr(vo,"2") then
cn.execute("update stud set result=result+1 where name='楊蘭'")
end if
if instr(vo,"3") then
cn.execute("update stud set result=result+1 where name='江道明'")
end if
if instr(vo,"4") then
cn.execute("update stud set result=result+1 where name='段啟文'")
end if%>
顯示當(dāng)前投票情況show.asp
由于投票處理頁面已經(jīng)完成了絕大部分的工作,所以 顯示結(jié)果頁面就很簡單了,其功能是從 Stud表文件中讀取候選人所得票數(shù),顯示在頁面上。
頁面顯示如圖
值得注意的代碼主要有以下幾處:
該頁面有自動刷新功能,使在線用戶可以盡快的看到最新的選舉情況。我們這里設(shè)定每隔30秒鐘自動刷新一次。
<meta http-equiv="refresh" content="10;URL=show.asp">
顯示投票時,我們采用了while循環(huán),把候選人及其得票數(shù),整齊地顯示在一個表格中,這種技術(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á)級考試在線查分系統(tǒng)與計數(shù)器的制作
3.4.1功能:
它提供了在線查看成績?忌梢栽诰W(wǎng)上使用這一系統(tǒng),通過輸入準(zhǔn)考證編號來查詢達(dá)級考試的結(jié)果。
3.4.2數(shù)據(jù)表的設(shè)計
與評優(yōu)系統(tǒng)共用STUd表,表設(shè)計同上。
3.4.3界面設(shè)計與重點難點代碼的設(shè)計
該模塊需要查詢者輸入準(zhǔn)考證號后來查看結(jié)果。若ID1不為空時,表示有表單輸入,開始查詢數(shù)據(jù)庫。使用 SELECT的SQL指令查詢數(shù)據(jù)庫的數(shù)據(jù)。先設(shè)定SQL指令,查詢ID符合準(zhǔn)考證編號Request.Form("ID1")的數(shù)據(jù),下個“Execute”指令,即可開始執(zhí)行存取、查詢數(shù)據(jù)的動作了。并將查詢結(jié)果儲存到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)
<< 上一頁 [11] [12] [13] [14] [15] [16] 下一頁