計算機畢業(yè)論文ASP完整版.doc

計算機畢業(yè)論文(ASP)完整版.txt不怕偷兒帶工具，就怕偷兒懂科技！ 1品味生活，完善人性。存在就是機會，思考才能提高。人需要不斷打碎自己，更應該重新組裝自己。 本文由anwas915貢獻 doc文檔可能在WAP端瀏覽體驗不佳。建議您優(yōu)先選擇TXT，或下載源文件到本機查看。 計算機畢業(yè)論文 目 錄 第一章：諸論.1 11 設計思 想1 12 開發(fā)工具的選用及介 紹.1 第二章：網站總體分析與設計 2 21 網站系統(tǒng)分 析 .2 22、主頁設計 3 23、數據庫設計 4 第三章：詳細設計 4 31 家長學校聯絡簿4 32 網上圖書館 11 3.3 網上評優(yōu)投票系統(tǒng) 20 34 達級考試在線查分系統(tǒng)與計數器的制作22. 第四部分：系統(tǒng)的使用說明與安裝 25 第五部分：參考文獻： 26 附錄：源文件代碼 27 第一章 諸論 在 Internet 飛速發(fā)展的今天，互聯網成為人們快速獲取、發(fā)布和傳遞信息的重 要渠道，它在人們政治、經濟、生活等各個方面發(fā)揮著重要的作用。Internet 上發(fā)布信息主要是通過網站來實現的，獲取信息也是要在 Internet“海洋”中 按照一定的檢索方式將所需要的信息從網站上下載下來。因此網站建設在 Inter net 應用上的地位顯而易見，它已成為政府、企事業(yè)單位信息化建設中的重要組 成部分，從而倍受人們的重視。為了更好的辦學，提高學校知名度，特構建長沙 市工商職業(yè)中專學校網站。 1 1 設計思想 通過網站，全面宣傳，展示學校風采、優(yōu)點與特色，發(fā)布學校的重大活動安排與 招生政策，增強家長與學校之間的聯系，在 Internet 上實現完成部分校務，提 高辦事效率。 1.2 開發(fā)工具的選用及介紹 ASP 的優(yōu)勢： Active Server Pages：“動態(tài)服務器網頁”，一般簡稱為“ASP”，ASP 之所以 能受到大家的重視與使用的原因，主要在于所產生的執(zhí)行結果都是標準的 HTML 格式，而且這些程序是在網絡服務端中執(zhí)行，使用一般的瀏覽器（如 IE 或 Net scape）都可以正確地獲得 ASP 的“執(zhí)行”結果，并且將這 ASP 執(zhí)行的結果直接 在瀏覽器中“瀏覽”，不像 VBScript 或 JavaScript 是在客戶端（Client）的 瀏覽器上執(zhí)行，若使用 VBScript 來設計程序，客戶端（lient）在瀏覽器 中可以顯示程序執(zhí)行的結果，可是，客戶端（lient）若使用 Netscape 瀏覽器 就無法顯示 VBScript 的執(zhí)行結果。 的特點： 任何開發(fā)工具皆可發(fā)展 只要使用一般的文書編輯程序，如 Windows 記事本，就可以編輯。當然，其他網 頁發(fā)展工具，例如，FrontPage Express、 rontPage 等也都可以；不過還是 建議你用記事本來寫，既省錢又方便，若是使用那些所見即所得的網頁編輯來寫 ，可能會發(fā)生一些意想不到的離奇狀態(tài)。 通吃各家瀏覽由于 ASP 程序是在網絡服務器端中執(zhí)行，執(zhí)行結果所產生的 HTML 文件適用于不同的瀏覽器。 語言相容性高 ASP 與所有的 ActiveX Script 語言都相容，除了可結合 HTML，VBScript、Java Script、Active X 服務器組件來設計外，并可經由“plug-In（外掛組件模組） 的方式，使用其他廠商（Third Party）所提供的語言。 隱密安全性高 如果我們在瀏覽器中直接查看網頁的原始代碼，就只能看到文件，原始 的程序代碼是看不到的！這是因杰程序先于網站服務（eb Serv er）端執(zhí)行后，將結果轉換成標準文件，再傳送到客戶端（Client）的 瀏覽器上， 因此， 我們所辛苦撰寫的程序并不會輕易地被看見進而被盜用。 易于操控數據庫 可以輕易地通過DBC(Open Database Connectivity)驅動程序連接各種 不同的數據庫，例如：Acess、Foxpro、dBase、Oracle 等等，另外，亦 可將“文本文件”或是”Excel” 文件當成數據庫用。 面向對象學習容易 具備有面向對象（bject-Oriented）功能，學習容易，提供了五 種方便能力強大的內建對象：Request、Response、Sever、Application 以及 S ession，同時，若使用內建的“Application”對象或”Session”對象所 撰寫出來的程序可以在多個網頁之間暫時保存必要的信息。 ASP 的六大內部對象 對象名稱 功能描述 RequestResponseServerSessionApplicationObjectContext 從客戶端取得信息 將信息送給客戶端提供一些 Web 服務器工具儲存在一個 Session 內的用戶信息， 該信息僅可被該用戶訪問在一個 ASP-Application 中讓不同的客戶端共享信息 可以用來配合 Microsoft Transaction 服務器進行分布式事務處理 所以我選擇了 ASP 結合 Frontpage 架構長沙市工商職業(yè)中專學校網站 第二章 網站總體分析與設計 21 網站系統(tǒng)分析 根據前面的設計思想進行分析，按照系統(tǒng)開發(fā)的基本觀點對網站進行分解，從內 容上可對網站作如下劃分： l 學校風采 通過學校概括、教師風采、校園之星及部分圖片等內容來展現。 l 優(yōu)點特色 通過新聞、生動活潑的教育教學欄目來展現。 l 信息發(fā)布 通過公告欄、信息查詢等欄目來實現，內容有招生政策、 活動安排等。 l 部分校務 根據校務的公開程度與參與人數的多少，特選擇圖書管 理、評優(yōu)、考試查分、家校聯系四大校務在網上實現。 2.2 主頁設計 網站主頁采用靜、動相結合的方式，即靜態(tài)的主畫面和動態(tài)的圖片相結合，體現 學校的勃勃生氣，靜態(tài)主頁方式介紹學校風采、優(yōu)點特色、信息發(fā)布，對于四大 校務，就得利用與數據庫結合的技術建立數據庫查詢管理系統(tǒng)，采用交互 式的動態(tài)的 web 畫面來實現。 主頁結構圖 注：帶下劃線的表示是鏈接方式 23 數據庫設計 采用的數據庫是 Microsoft Access ，擬建立 teach.mdb 庫文件，包含如下幾個 表文件： allmessage 留言信息表 Libbooks 圖書信息表 Libcategories 圖書類別信息表 Libemps 圖書館用戶信息 表； stud 學生信息表 第三章 詳細設計 31 家長學校聯絡簿 311 功能： 利用 SQL 語法過濾特定的家長留言意見，讓老師可以針對某位特定學生家長所發(fā)表的意見 作出獨立的回答，同時，家長在發(fā)表個人意見時，若認為意見內容涉及敏感的話題或是意見 內容涉及私人隱私，都可用“悄悄話”的方式發(fā)言，這些“悄悄話”將不會被顯示出來讓大 家看到，當然，老師擁有管理的能力，只要以密碼登錄管理模式，就可以進行各個學生家長 的單獨意見回復，而且還能看到家長們所留下的“悄悄話” 。 312 組成構造 共分成六大部分： 1， 意見留言結果網頁 guest.asp：用來顯示家長發(fā)言與老師回復內容，同時還具備一般模式 與管理模式兩種顯示方法。 2， 家長發(fā)言表單網頁 addmsg.asp：讓學生家長填寫發(fā)言內容并選擇發(fā)言性質。 3， 家長發(fā)言數據處理 ASP 程序 add.asp：處理家長發(fā)表的意見數據，同時將這些意見數據 記錄起來并將網頁顯示轉向至意見留言結果網頁。 4， 老師回復表單網頁 teachans.asp：讓老師針對某位特定學生家長所發(fā)表的意見作出獨立 的回答。 5， 老師回復數據處理 ASP 程序 anssave.asp：處理老師回復的數據內容，同時將這些意見 數據起來并將網頁顯示轉向至意見留言結果網頁。 6， 數據表文件 allmessage： 用來儲存家長發(fā)言數據與老師回復數據的 Access 類型數據庫文 件。 “數據表文件”負責存放家長發(fā)言數據與老師回復內容的數據記錄，為 Access 類型的庫文 件，將它定名為： “message.mdb” 。 下圖為家庭聯絡簿的組成與流程圖： 老師回復 家長留言 讀入 寫入 寫入 313 數據庫結構設計 數據庫文件”teach.mdb“中的數據表” allmessage“的欄目設置，如下圖： 字段名 字段類型 314 界面設計與重點、難點代碼的設計 數據庫與留言顯示程序網頁 家長發(fā)言與老師回復的內容數據全部儲存在數據庫中， 要在網頁中顯示目前的家長發(fā)言與老 師回復數據，必須先進行數據庫的鏈接與打開，要鏈接數據庫我們必須使用 ADO 對象群的 Connection 對象；而要打開數據庫則必須使用 ADO 對象群的 Recordset 對象，程序： set cn=server.createobject(adodb.connection) cn.open filedsn=c:program filescommon filesodbcdata sourcesms access database.dsn set rs=server.createobject(adodb.recordset) sql=select * from allmessage order by 留言時間 desc rs.open sql,cn,1,1 Recordset 對象是負責瀏覽與操作從數據庫取出來的數據，Connection 對象只負責與數據庫 進行鏈接的動作，并不能使用數據庫內的數據，因此必須建立一個可以存取數據庫數據的 Recordset 對象， 使用 RS.Open 方法存取”teach.mdb”數據庫 RS.Open SQL,CN,1,1 使用 open 方法來打開數據表或執(zhí)行 Select 指令參數設置如下： 1， 參數一（SOURCE）:為欲打開的數據表或 SQL 指令。 2， 參數二（ActionConnection）:指定一個已打開的數據庫對象，將此參數設為鏈接我們已 經建立好的 Connection 對象“CN” 。 3， 參數三（ CursorType） ：指定 Recordset 的打開類型，1 為可讀寫且可自由移動。 4， 參數四（LockType）:指定鎖定類型，1 為只讀。 數據排序與 SQL 指令 1 Select 指令的篩選語句： 格式： SelectFrom 在 SQL 語言中： “Select”數據表“中選取某些“欄位”的數據. 2.如果要選取的數據表數據包含了一個以上的欄位，則我們可以利用“， ”逗號來欄位名稱 隔開。 3 如果要選取的數據表數據包含了全部的欄位，則可以利用萬用字符“*”來代表全部的 欄位。 可排序數據的 Select 指令 1 當我們希望被選取出來的數據記錄數據能夠依據某個或某幾個欄位的內容來排序時， 只 要將這些排序依據的欄位擺放在“Order By“保留字之后，然后將這處排序的語句連接在” SelectFrom“后面就行了。 2 “Order By“默認的排序方式是“由小排到大” ，但若是希望排序方式是“由大排到小” ， 則我們可在欄位名稱后再加上“Desc“保留字！將排序方式改為”由大排到小“。 在“顯示留言意見”網頁中的打開數據庫 ASP 程序中的語句： SELECT*From allmessage order by 留言日期 Desc 功能為：從數據表“allmessage“中取出所有欄位的數據，并將取出的數據記錄內容依照” 留言日期“欄位使用的”由大排到小“排序方式進行排序。 留言顯示網頁的管理模式 “顯示留言意見” 的網頁就必須具備顯示模式選擇的功能， 當顯示模式在一般情況時要能顯 示家長們的一般性發(fā)言，同時還得將“悄悄話“的發(fā)言隱藏起來。當老師以密碼登錄成為管 理模式時， 則必須將一般性發(fā)言與悄悄話發(fā)言的數據全部顯示出來， 同時還得讓老師們可以 針對某位特定學生家長所發(fā)表的意見作出獨立的回答。 這兩個情況是通過密碼登錄管理模式的 ASP 程序實現的： 密 碼 ： maxlength=4 (count10) then totalpage=(count10)+1 else totalpage=(count10) end if “/”為浮點數除法， “”為整數除法。 跳頁選擇的 ASP 程序語句 所有的發(fā)言數據采用固定筆數分頁瀏覽的方式來顯示后，還要提供一個跳頁鏈接顯示的功 能，讓瀏覽者可以選擇希望瀏覽的頁次進得瀏覽，ASP 程序語句： pagecount=0 rs.movefirst if request.querystring(topage) then pagecount=cint(request.querystring(topage) if pagecounttotalpage then pagecount=totalpage rs.move(pagecount-1)*10 發(fā)言表單網頁制作 inse tu3 表單的參數 表單的 Action 參數：Action 參數是用來指定 Server 端處理此一表單數據內容的程序，此處 表單處理 ASP 程序為“add.asp“， 表單的 Mothed 參數： 要將表單傳送至 Server 端的方式有兩種， 設置值分別為 GET 及 POST， 若設置為 POST，則瀏覽器會等 Server 端來讀取數據，若設置為 GET，則當我們按下送出按 鈕時，瀏覽器會立即將表單中的數據內傳送出去。利用 POST 方法，在傳送的數據上將不受 限制，利用 GET 方法傳送的數據量則大約只有 2K 左右。 留言處理程序 要將家長發(fā)言數據作后續(xù)處理及將這些數據內容存入數據庫，須利用添加數據記錄的 Insert Into 指令，然后再寫入數據庫文件中： Inset into 指令語句格式： Insert into 數據表名 （欄目名） values（欄目值） sql=insert into allmessage(家長姓名,留言主題,聯絡信箱,留言內容,私人公開,留言時間,班級) values( sql=sql& & parent& , sql=sql& &subject& , sql=sql& &email& , sql=sql& &memo& , sql=sql& &personal& , sql=sql& &now& , sql=sql& &bj& ) cn.execute sql 回復表單程序網頁 必須讓老師們可以針對某位特定學生家長所發(fā)表的意見作出獨立的回答, 使用 SelectFromWhere 篩選語句 sql=select * from allmessage where(編號=&ID&) rs.open sql,cn,1,3 然后將特定的家長發(fā)言數據放在表單， 方法是將數據庫中的數據取出來， 然后放在表單欄位 中： “家長姓名“欄位網頁語句標簽 “留言主題“欄位網頁語句標簽 “留言內容“欄位網頁語句標簽 老師在回復欄位中所填入的數據，必須送給處理老師回復數據的 ASP 程序”anssave.asp”來 記錄以及處理這些回復數據。當老師填寫好回復發(fā)言的數據后按下“送出回復”按鈕后，表 單中的數據內容就會以“POST”的方式由 SEVER 端讀取，然后將數據內容交由處理老師 回復數據的 ASP 程序“anssave.asp”來將數據內容寫入數據庫。 32 網上圖書館 網上圖書館將學校圖書館圖書放到網絡上供人借閱， 這樣不僅方便了校內的學生與教職員工 使用圖書館的資源,還為圖書館管理員提供了一種簡便地管理圖書館的方法. 321 功能 網上圖書館系統(tǒng)可以進行圖書的出借和歸還.還可以在系統(tǒng)中按照多種字段對圖書進行查找, 還可以瀏覽某個種類的所有圖書.該應用程序也為圖書館管理員提供了一些功能,如添加、編 輯以及刪除圖書等，或者在分類層次結構中添加新的種類。 322 系統(tǒng)的層次結構 下圖的每個方框代表校園圖書館網站中的一個頁面。除了只包含的 Search 頁面外， 其他的均為頁面。 因為每個圖書的頁面都不同， 所以大多數的頁面實際上都是多頁面。 3.2.3 數據庫設計 本系統(tǒng)共使用個數據表： LibBooks 表包含與圖書有關的所有數據。該表中的字段內容的圖書的通用信息。另外，對 于已經出借的圖書，該表中還包含借閱該圖書的用戶的號，以及圖書的狀態(tài)。 表視圖如下： 字段名 意義 字段類型 字段名 意義 字段類型 bookid 書號(主鍵) 數字 (no null) status 狀態(tài) 文本 title 書名 文本 checkedoutto 用戶 id 數字 author 著者 文本 reservedby 用戶學號 數字 Subject 主題 文本 description 描述 文本 Isbn Isbn 號 文本 keywords 關鍵字 文本 LibCategories 表包含 Library 中的所有類別，在訪問者瀏覽圖書列表時將會用到這些類別。 每個類別都可以作為另外類別的父類別。有一個特殊的類別，Top-Level,沒有出現在類別列 表中，但是可以作為其他任何類別的父類別。 字段名 意義 字段類型 Categoryname 類別 文本(noll) parentcategory 父類別 文本(noll) LibEmps 表包含可以訪問圖書館網站的用戶信息。該表包含一些通用的信息字段，比如用 于進入圖書館的用戶密碼等。 字段名 意義 字段類型 字段名 意義 字段類型 empid 用戶 id (主鍵 no null) 數字 password 用戶密碼 文本 Empname 用戶姓名 文本 manager 管理員代號 數字 emailaddress 用戶郵箱 文本 圖書館數據庫的數據關系如圖 9-22 所示。 其中表 LibEmps 和表 Lib Categories 與表 LibBooks 之間都是一對多的關系。每個雇員都可以借閱多本圖書，每個類別都可以包含多本圖書。 3.2.3 界面設計與重點代碼的設計 網上圖書館系統(tǒng)有兩種用戶，一是管理員。另一種是只允許使用圖書館系統(tǒng)，而沒有 管理功能的一般用戶。 訪問者進入網站， 首先要進行登錄， 如下圖所示。 登錄頁面 （index.asp） 訪問者輸入mail 地址和密碼來登錄，然后單擊“登錄”按鈕。輸入的數據提交后與數據 庫中的用戶表進行匹配。 須創(chuàng)建一個記錄來保存基于訪問者登錄的用戶信息 set RSFindEmp = conn.Execute(select EmpID, Manager from LibEmps where _ & EmailAddress = & Request.Form(EmailAddress) & and _ & Password = & Request.Form(Password) & ) if RSFindEmp.EOF then TheMessage = 密碼或 email 地址不對. else Session(EmpID) = RSFindEmp(EmpID) Session(Manager) = RSFindEmp(Manager) Response.Redirect ./yk.htm end if 表單域 EmailAddress 和 Password 用于 Where 了句中來獲取一個記錄。 如果訪問者輸入了一 個無效的用戶名，則記錄集中將不會返回匹配的記錄。我們可以通過查看 EOF 標記來判斷 一個記錄集是否為空。為空，則訪問者將被拒絕進入該系統(tǒng)。不為空，則訪問者的 EmpID 值和 Manager 值將從記錄集中返回。寫入 Session 變量， 變量將在整個網站的所有網頁中 都是有效的。 這些變量的存在與否及其取值將用于確定是否允許進入一個特定的網頁， 同時 也用于訪問者進行書目的歸還和借閱操作。 圖書館菜單頁面 圖書館菜單頁面包含指向其他 4 個頁面的鏈接：管理頁面、搜索頁面、圖書列表頁面和主頁 面。還有一個可顯示用戶所借書籍的按紐。如果訪問者是圖書館管理員，則菜單界面如圖所 示。如果訪問者不是圖書館管理員，則看到如圖所示的界面。非管理員的訪問者的界面上沒 有指向管理員菜單頁面的鏈接。 實現辦法：訪問者登錄時在登錄頁面上的創(chuàng)建的會話變量 Session 用于從數據庫中獲取 訪問者的有關信息，表示它是否是管理員。如果值為 1，就表明訪問者是一個管理員，則用 如下代碼寫入一個指向管理員頁面的鏈接： 管理員菜單 通過按紐 B1 是否為空來判斷要不要顯示用戶所借圖書，利用一個記錄集來獲取訪問者已經 借出了的所有圖書的列表。 if NOT isempty(Request.Form(B1) then set RSBooks = conn.Execute (select BookID, Title from LibBooks where _ & CheckedOutTo = & Session(EmpID) end if 再用循環(huán)語句將所借書以表格形式顯示出來。 循環(huán)將遍歷 Rsbooks 記錄集中的每個記錄，直到該記錄集結束： 該網站中的所有頁面都會在訪問者訪問之前對其進行登錄檢查。 這樣就可以避免訪問 者通過輸入某個頁面地址然后在沒有登錄的情況下直接進入該頁面的情況發(fā)生。 此外， 每個 管理頁面都要確認訪問者是管理員。 管理菜單頁面 管理菜單頁面有一個 HTML 表單，根據選擇的按鈕的不同，可以進行 5 種不同的操作：圖 書的歸還、圖書的編輯、圖書的刪除、圖書的添加和類別的添加。不管選擇了哪一個按鈕， 該表單都提交人其自身進行處理。 要進行圖書的歸還、圖書的編輯、圖書的刪除三種操作，須先進行搜索，找到該書后，由圖 書 Book.asp 返回一個鏈接： &BOOKID=管理員菜單 而管理者頁面通過下列語句 這樣就將所找到的書的書號 BookID、書名 Title 傳遞管理者頁面。再進行所須操作。共有 3 個不同的銨紐，可以進行 3 種操作。若單擊“修改”鈕： 則重定向到編輯圖書頁面，同時把 Bookid 傳遞給該頁面。 Response.Redirect ./edit_book.asp?BOOKID=&request(BOOKID1) 將其他的情況需要建立到數據庫的連接： set conn = server.createobject (adodb.connection) Conn.Open(FILEDSN=c:Program FilesCommon FilesODBCData Sourcesms access database.dsn) if NOT isempty(Request.Form(Delete) and request(BOOKID1) then conn.Execute delete from LibBooks where BOOKID =&request(BOOKID1) end if if (NOT isempty(Request.Form(checkin) and request(BOOKID1) then conn.Execute update LibBooks set checkedoutto= 0, status= Available where BookID=&Request(BOOKID1) end if 頁面中的添加新的種類部分包含一個文本控件和一個選擇控件。 其中選擇控件是用所有已經 存在的類別列表進行填充的，包括特殊類別 Top level ，該類別表明當前類別是處于類別層 次結構中的最頂層。代碼如下： 先用一個記錄集來填充父類別選擇控件： set RSCategories = conn.Execute(select CategoryName from LibCategories order by CategoryName) 再用下列循環(huán)語句： 遍歷 RSCategories 記錄集中的每個記錄，并作為一個選項添加到列表中，而記錄集中 CategoryName 同時作為顯示值和傳遞值： 本頁面還包含一個指向添加圖書頁面的鏈接。 搜索結果頁面 搜索頁面的代碼獲取與訪問者查找規(guī)則相匹配的圖書，然后將這些圖書顯示給訪問者。 搜索頁面上的表單包含一個選擇控件和一個文本控件。選擇控件中的選項是用可搜索 的字 段填充的： 需要用一個記錄集來保存與訪問者的查找規(guī)則相匹配的記錄： set RSBooks = conn.Execute(select BookID, Author, Title, Subject from LibBooks where _ & Request.Form(SearchField) & Like % & Request.Form(SearchCriteria) & % ) 注意： ，符號%表示的是一個廣義搜索。這一點類似于 ACCESS 中的符號*。 然后將所找到的書以表格形式顯示出來。代碼如下： 書 名 : 著者: ;主題: 圖書頁面 圖書頁面的代碼顯示圖書的有關信息，以及管理圖書的出借操作。 該頁面通過 Querystring 傳遞 BookID if isempty(Request.QueryString(BookID) then Response.Redirect ./search.html end if 如果其中不存在，則訪問者將被重定向到搜索頁面： 如果同時傳遞表單中包含的變量 Action 不為空，則表明訪問者正借閱該圖書： if Not isempty(Request.QueryString(Action) then 在這種情況下，需要將圖書狀態(tài)改為 Checkout, 同時需要將 Checkedoutto 字段修改為該訪 問者： conn.Execute update LibBooks set Status = Checked Out , _ & CheckedOutTo = & Session(EmpID) & where BookID = _ & Request.QueryString(BookID) Response.Redirect ./library_menu.asp end if 然后將該訪問者重定到圖書館菜單頁面： 下一步，利用圖書的狀態(tài)來確定不同的鏈接 未借出時鏈接如下： if RSBooks(status) = Available then LinkText = 借這本書 如果圖書已經借出，就創(chuàng)建一個不同的消息，并將鏈接設置為指向 Library menu 頁面： LinkText = 圖書已出借，返回主菜單。 最后根據是否是管理員，顯示管理員菜單鏈接。 &BOOKID= 管理員菜單 3.3 網上評優(yōu)投票系統(tǒng) 3.3.1 功能： 能實現全校性的評選，快捷、公平，且有效，不允許做票。 3.3.2 組成構造 這個系統(tǒng)由 3 個部分組成投票頁面 vote.htm ，處理投票結果的腳本，顯示投票頁面 。 333 數據表的設計： 334 界面設計與重點、難點代碼設計 投票頁面 該頁面是一個純 HTML 文件，它讓用戶選擇自己想選舉的候選人，并填寫自己的詳細資料， 以確認投票的有效性。頁面顯示如圖所示。 表單處理腳本 在 vote.htm 中各項數據都填寫完畢后，單擊確定投票按鈕，表單的數據就被提交， 本次評優(yōu)共有 4 個候選人，但只能選兩個。故用復選框。 投票的有效性通過是否是本校學生，且是否投過票來判斷。 if request(passno) then sql=select * from stud where password=& &request(passno)& &and yitu=0 set rs=cn.execute(sql) if rs.eof then% 本設計允許少選，不允許多選。通過判斷 Vote 投票界面?zhèn)鬟f過來的復選按紐值的長度看是 否多選。 vo=request(cand) if len(vo)4 then% 然后根據所投的票將對應候選人的投票結果字段加 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% 顯示當前投票情況 show.asp 由于投票處理頁面已經完成了絕大部分的工作，所以 顯示結果頁面就很簡單了，其功能是 從 Stud 表文件中讀取候選人所得票數，顯示在頁面上。 頁面顯示如圖 值得注意的代碼主要有以下幾處： 該頁面有自動刷新功能，使在線用戶可以盡快的看到最新的選舉情況。我們這里設定每隔 30 秒鐘自動刷新一次。 顯示投票時，我們采用了 while 循環(huán)，把候選人及其得票數，整齊地顯示在一個表格中，這 種技術在數據庫查詢結果的顯示中也經常用到。代碼如下： 34 達級考試在線查分系統(tǒng)與計數器的制作 341 功能： 它提供了在線查看成績。 考生可以在網上使用這一系統(tǒng)， 通過輸入準考證編號來查詢達級考 試的結果。 342 數據表的設計 與評優(yōu)系統(tǒng)共用 STUd 表，表設計同上。 343 界面設計與重點難點代碼的設計 該模塊需要查詢者輸入準考證號后來查看結果。若 ID1 不為空時，表示有表單輸入，開始 查詢數據庫。使用 SELECT 的 SQL 指令查詢數據庫的數據。先設定 SQL 指令，查詢 ID 符 合準考證編號 Request.Form(ID1)的數據，下個“Execute”指令，即可開始執(zhí)行存取、查 詢數據的動作了。并將查詢結果儲存到 Recordsets 組件 RS 中。 IF Request.Form(ID1) THEN Set Conn = Server.CreateObject(ADODB.Connection) Conn.Open(FILEDSN=c:Program FilesCommon FilesODBCData Sourcesms access database.dsn) SQL = SELECT name,id,score FROM stud WHERE i