【正文】 代碼如下： % dim user_id,old_password,new_password1,new_password2 user_id=request(user_id) old_password=request(old_password) 重慶郵電 大學 移通學院畢業(yè)設計（論文） 39 new_password1=request(new_password1) % (2)。 提交和重填 按鈕。 密碼框 —— 用來驗證新密碼。密碼框 —— 用來輸入新密碼。密碼框 —— 用來輸入原密碼。 文本框 —— 用來輸入用戶名。 設計修改密碼表單 修改密碼表單由以下幾部分組成。圖 47 為用戶登錄頁面。 rs(user_password).Value If Rtrim(rs(0).Value)=user_password Then Session(logined)=1 在這段程序中，使用 Session對象的 logined變量來記錄用戶是否登錄成功，當 logined 變量為 1,表示登錄成功，變量為 0 則表示登錄失敗。%+user_id+%39。如果相同則表示用戶輸入的密碼正確，否則表示用戶輸入的密碼錯誤。驗證密碼 End If % (4)驗證用戶名密碼是否正確。+user_id+39。要判斷數(shù)據(jù)庫中是否存在 投票選項 投票結果運算 編輯 編輯、添加、 刪除 生成最 終結果 重慶郵電 大學 移通學院畢業(yè)設計（論文） 37 用戶輸入的用戶名，可以在表“ classuser”中統(tǒng)計 user_id 字段的內容與用戶輸入的用戶名相匹配的記錄總數(shù)，如果為 0，表示用戶名錯誤，提示用戶重新輸：如果不為 0，說明用戶名存在，然后進入驗證密碼步驟。 驗證 管理員的用戶和密碼 驗證管理員的用戶和密碼的步驟如下： (1) 使用 Request對象的 Form集合得到用戶輸入的用戶名和密碼 代碼如下： % dim user_id,user_password user_id=request(user_id) user_password=request(user_password) % (2) 建立數(shù)據(jù)庫連接，代碼與前面連接數(shù)據(jù)庫的代碼相同。 訪問的時間 If vRef= Then vRef = 直接輸入或書簽導入 End If % 圖 45重復投票提示框 圖 46投票結果百分比顯示 重慶郵電 大學 移通學院畢業(yè)設計（論文） 36 數(shù)據(jù)導 入 圖 47 投票生成圖 用戶管理模塊的設計 管理員登錄的設計與實現(xiàn) 設計管理員登錄表單 管理員登錄表單由以下 3部分組成 ［ 1］ ： amp。瀏覽器 vOS = System(vSoft) 39。訪問前的網(wǎng)址 39。 (url) vSoft = (HTTP_USER_AGENT) 39。收集需要統(tǒng)計的信息 theurl = amp。取得每個投票項目信息 sql = Select * From VoteItem Order By Id Set voters = (sql) Do While NOT If total=0 Then 重慶郵電 大學 移通學院畢業(yè)設計（論文） 34 itotal=1 Else itotal = total End If 39。 投票數(shù)百分比的計算代碼如下 % Dim imgvote 39。 ()。 return false。id= + strid。 } else 重慶郵電 大學 移通學院畢業(yè)設計（論文） 32 { strid = strid + , + deptid。 deptid = (dept,j).id+。j++) { if ((dept,j).checked) { n = n + 1。 for (j=0。 var strid,strurl。 } } 得到要刪除的項目的編號，然后刪除項目 function SelectChk() { var s=false。j。 } } function sltNull() { var nn = (dept)。j。) (sqldelt) 投票項目已經(jīng)成功刪除 ！ End If % 刪除項目 function sltAll() { var nn = (dept)。刪除項目 sqldelt = Delete from VoteItem Where Id IN(amp。 where Id=amp。newTitleamp。 Set rsInsert = (sql) If NOT Then 已經(jīng)存在此投票項目 ,添加失敗 ! Else (Update VoteItem set Item=39。newTitleamp。判斷數(shù)據(jù)庫中是否存在此類別 sql = Select * from VoteItem where Item=39。修改項目 newTitle = Request(txttitle) Title = Request(sOrgTitle) 39。39。amp。39。amp。添加項目 newTitle = Request(txttitle) 39。操作標記 Operid = (id) 39。單行文本框 —— 用來輸入 投票 名稱 。 選擇按鈕 框 —— 用來選擇 投票選項 名稱。如果 Session 對象的 logined 變量的值不為 1，則跳轉到用戶登錄頁面 （ ） 。 驗證用戶是否登錄 重慶郵電 大學 移通學院畢業(yè)設計（論文） 29 因為只有管理員用戶才有 修改項目 的權利，包括添加、修改、刪除，所以系統(tǒng)需要驗證想要 修改投票項目 的用戶是否為管理員用戶。 /font/td/tr/table Else Do While Not n = n + 1 % 從數(shù)據(jù)庫中提取投票項目信息 投票 項目 模塊的設計 投票項目 模塊的功能是進行 投票選項 的添加，修改，刪除。COLOR:Red39。Database=Vote % 這段代碼使用 Open方法連接數(shù)據(jù)庫。UID=sa。Server對象的 CreateObject方法建立 Connection對象 Set Conn=() =driver={SQL Server}。 return false。 var newwin=(url,newwin,oth)。 } function newwin(url) { var oth=toolbar=no,location=no,directories=no,status=no,menubar=no,scrollbars=yes,resizable=yes,left=200,top=200。 } (strurl,newwin,toolbar=no,location=no,directories=no,status=no,menubar=no,scrollbars=yes,resizable=yes,width=400,height=300)。 if(!s) { alert(請選擇投票項目 !)。 } else { strid = strid + , + deptid。 deptid = (poster,j).id+。j++) { 重慶郵電 大學 移通學院畢業(yè)設計（論文） 26 if ((poster,j).checked) { n = n + 1。 for (j=0。 var nn = (poster)。 var deptid,n=0。39。 name=submit onclick=39。投票按鈕代碼如下： input class=Submit type=submit value=39。 投票 按鈕。 投票選項 列表框 —— 用來 選擇相應項目進行 投票 。以下就是 設計 投票系統(tǒng)步驟 投票 界面 模塊的設計 投票 界面 模塊的功能是面向老師和學生的，因此不需要權限核實，進入系統(tǒng)頁面后，點擊 “投票選項 ”即可進入。使用 Microsoft Office Access 2020創(chuàng)建前面所定義的各個數(shù)據(jù)表。 數(shù)據(jù)庫結構的實現(xiàn) 在需求分析，概念結構設計基礎上得到數(shù)據(jù)庫邏輯結構以后，就可以在數(shù)據(jù)庫系統(tǒng)中實現(xiàn)該邏輯結構。 字段名稱 數(shù)據(jù)類型 大小 是否允許為空 說明 ID Int 4 否 項目 ID號 Item Varchar(50) 8 是 項目名稱 VoteCount int 150 否 投票數(shù)量，缺省為 0 表 31VoteItem的結構 字段名稱 數(shù)據(jù)類型 大小 是否允許為空 說明 IP varchar(20) 4 否 IP地址 表 32VoteIP的結構 參數(shù) Soperate的值 說明 null 無操作 add 添加記錄（單擊“添加”按鈕時產(chǎn)生） update 修改記 錄（單擊記錄后的“修改”鏈接時產(chǎn)生） 重慶郵電 大學 移通學院畢業(yè)設計（論文） 24 edit 修改記錄（單擊“修改” 按鈕時產(chǎn)生 ） delete 刪除記錄（單擊“刪除”按鈕時產(chǎn)生） 表 33 參數(shù) Soperate狀態(tài)值的說明 一般由多個用戶來管理 在線投票 系統(tǒng)，因此需要對每個用戶分配一定的權限，實現(xiàn)信息的共享與安全。各個表格表示數(shù)據(jù)庫中的一個表。記錄中的數(shù)據(jù)隨著每一行記錄的不同而變化。每個項目的名稱為字段名。具體的結構是把數(shù)據(jù)表示成若干二維關系的表，通過建立表之間的關系來定義結構。在上面實體之間的關系的基礎上， 形成數(shù)據(jù)庫中表格以及各個表格之間的關系。 圖 33課程實體 投票結果實體 的屬性包括 各個項目投票結果，各個項目投票人數(shù)，各個項目投票所占百分比 。 根據(jù)上面的設計出的實體有： 投票選項 實體、 投票結果 實體。本系統(tǒng)采用了實體－關系圖中的相應符號來描述系統(tǒng)的概念模型。 對各個選項能在第一時間內更新 。 根據(jù)不同 學生 開設 。主要分為 討論 、 解說 、演講 等。讓投票者根據(jù)網(wǎng)站內容進行投票 (3)開設心理咨詢室 。 讓投票者 根據(jù)網(wǎng)站界面進行投票 。在實際的工作中， 在線投票系統(tǒng) 的項目主要是根據(jù) 學院任務 來制定 展開，因此與 教學有 相關的一些信息，如 開設 新 課程 等，都是 學院需要統(tǒng)計的項目 。 數(shù)據(jù)庫設計 數(shù)據(jù)庫需求分析 在線投票 系統(tǒng)的數(shù)據(jù) 項目是 依據(jù) 學院 開設新課程 制定的。 圖 32 系統(tǒng)功能模塊圖 系統(tǒng)的主要功能設計 在線投票 系統(tǒng)的主要功能： 投票結果 的查詢：主要是實現(xiàn) 投票 人員從數(shù)據(jù)庫對各 投票結果 的查詢。