【正文】 該系統(tǒng)采用的是無組件上傳的，圖片上傳成功后，將上傳的圖片通過 ASP 從數(shù)據(jù)庫中取出來，并顯示在 IE瀏覽器上， 如圖 示： 圖 的主要功能 就是顯示圖片，其核心代碼如下： ??????? . %dim rs,sql set rs=() if keytype=all then sql=select classpic.*, from [classpic],[txluser] where = order by picid desc else sql=select classpic.*, from [classpic],[txluser] whe。 如圖 示： 基于 WEB的信息處理系統(tǒng) — 班級同學(xué)錄 ２９ 圖 圖 的框架具體定義如下： html head title班級管理 /title meta equiv=ContentType content=text/html。 如果用戶想在班 級里面發(fā)表自己的心聲，進(jìn)行留言的話就在班級首頁這個位置點(diǎn)擊“在線留言 ”去到“ ”頁面，就可以給班級里的同學(xué)留言，如圖 示： 基于 WEB的信息處理系統(tǒng) 班級同學(xué)錄 ２８ 圖 在線留言采用 VB Script 語言來檢測是否輸入內(nèi)容是否合法，具體 代碼如下： script language=javascript }function form1_onsubmit(){if(JHshRTrim()==) {alert(留言內(nèi)容不能為空！ ) () return false }}/script 后臺管理 后臺管理頁 的主要功能是對前臺信息的管理和維護(hù)，通過后臺管理， 管理員 可以 對 系統(tǒng)進(jìn)行全面的管理，為了 保持界面的統(tǒng)一性，該頁面主要采用的是一個框架。/font/a/liamp。amp。font color=amp。_ lia href=amp。TableContentcoloramp。_ /ul else defaulturl=request(eurl) rmsg=BRulamp。TableContentcoloramp。defaulturlamp。 (sql) (fengyue)(txlusr)=userid (fengyue)(txlpwd)=userpwd (fengyue)(logintime)=now() if instr(request(eurl),)0 or instr(request(eurl),)0 or instr(request(eurl),)0 or trim(request(eurl))= or instr(request(eurl),)0 then defaulturl= rmsg=BRulamp。useridamp。,visitcount=visitcount+1,lastlogin=now() where userid=39。這里有 ASP函數(shù)對用戶名和密碼進(jìn)行判斷，以此來保證用戶的合法性， 登陸系統(tǒng) 基本結(jié)構(gòu)圖如圖 所示： 圖 圖 實(shí)現(xiàn)登陸的核心 ASP 代碼如下： if userid= then Errmsg=Errmsg+br+li請輸入用戶名 ！ /a！ founderr=true elseif isValidstring(userid) then Errmsg=Errmsg+br+li您輸入了非法的用戶名 ！ /a！ founderr=true end if if founderr=true then call top(1,1) call error(Information,errmsg) exit sub end if 開始 登陸界面 錯誤處理 新用戶注冊 登陸成功 密碼找回 具體操作 取回密碼 錯誤處理 注冊成功 錯誤處理 基于 WEB的信息處理系統(tǒng) — 班級同學(xué)錄 ２７ userid=checkstr(userid) userpwd=checkstr(userpwd) chkstat=chkuserlogin(userid,userpwd) if chkstat then call top(1,1) call error(Information,chkstat) exit sub end if sql=update [student] set point=point+amp。iamp。/option next /select 月 select name=day size=1 for i=1 to 31 option value=amp。i if i=6 then selected amp。iamp。_ td nowrapselect name=year size=1 currentyear=cint(year(date())) startyear=currentyear50 for i=startyear to currentyear option value=amp。amp。系統(tǒng)采用 一個腳本語言函數(shù)對用戶提交的信息的要求及信息格式的正確性進(jìn)行判斷，其函數(shù)代碼如下： td width=40%B用 戶 名 /BBR不能少于 4字符或多于 12字符 （ 6個漢字 ） /td td width=60%div align=leftpinput name=userid size=20 maxLength=12 ** INPUT name=testname onclick=javascript:testusername() type=button value=測試用戶名 /div /td /tr tr bgcolor=%=tablebodycolor2% tdB真實(shí)姓名 /BBR請如實(shí)填寫 /td tdinput name=realname size=20 maxLength=4 **/td /tr tr bgcolor=%=tablebodycolor2% tdB密 碼 /Bbr區(qū)分大小寫 ， 不少于 6個字符 基于 WEB的信息處理系統(tǒng) — 班級同學(xué)錄 ２５ /td tddiv align=leftpinput name=userpwd1 size=20 type=password maxLength=10 ** /div /td /tr tr bgcolor=%=tablebodycolor2% tdB密碼確認(rèn) /BBR再輸一遍 ， 以便確定 ！ /td tddiv align=leftpinput name=userpwd2 size=20 type=password maxLength=10 ** /div /td /tr % tr bgcolor=amp。 為了確保用戶資料的正確性，一般要對用戶所填信息進(jìn)行必要的檢查，信息檢查可分為腳本檢查和服務(wù)器檢查 。 具體代碼參見代碼附錄。 (db\) % 128 bit 明文 加密信息 Digest Digest Padded message（ multiple of 512 bits） 基于 WEB的信息處理系統(tǒng) 班級同學(xué)錄 ２０ 第五章 詳細(xì)設(shè)計(jì) 模塊 功能 介紹 在班級同學(xué)錄 系統(tǒng)的各個頁面 中 ， 下面是各個網(wǎng)頁主要實(shí)現(xiàn)的功能如 表 ： 表 文件名 功能 文件名 功能 網(wǎng)站首頁 用戶登陸 用戶注冊 密碼 找回 班級簡介 班級管理 班級相冊 注銷登陸 私人留言 修改 個人資料 同學(xué)名片 班級公告 在線用戶 班級通訊錄 模塊設(shè)計(jì)概述 ◆ 系統(tǒng)原理 班級同學(xué)錄 系統(tǒng) 的開發(fā)是基于現(xiàn)在網(wǎng)站建設(shè)應(yīng)用最廣泛的 B/S（ Brower/Server） 即瀏覽器 /服務(wù)器結(jié)構(gòu)，原理圖示如圖 所示： 圖 圖 HTTP ADO IIS Web server IE ASP Access 基于 WEB的信息處理系統(tǒng) — 班級同學(xué)錄 ２１ 班級 同學(xué)錄系統(tǒng)的主要體系結(jié)構(gòu)包括： ● 數(shù)據(jù)服務(wù)器 ● WEB 服務(wù)器 ● 后臺管理平臺 ● 客戶端 就用戶模塊而言可以做如下劃分，具體如圖 ： 圖 主要功能的實(shí)現(xiàn) 用戶模塊主頁面 用戶只有在使用合法的用戶名和密碼才能進(jìn)入本網(wǎng)站 ,假設(shè) 同學(xué)錄系統(tǒng) 的虛擬目錄別名為 root,則打開 IE 瀏覽器 ,在地址欄 中輸入 網(wǎng)站的主頁面 ,輸入用戶名和密碼 ,按【提交】按鈕 ,如果輸入正確便可以進(jìn)入系統(tǒng) ,并且顯示當(dāng)前用戶的昵稱和登陸次數(shù) . 主頁面如圖 示： 用戶 用戶注冊 私人留言 上傳圖片 班級留言 同學(xué)名片 修改資料 用戶登錄 基于 WEB的信息處理系統(tǒng) 班級同學(xué)錄 ２２ 圖 系統(tǒng)的主界面是一個表格頁面 ,主要用來顯示班級最新公告和最新留言 ,定義如下 : ?? %set rs=() sql=select * from classnotice order by id desc sql,conn,1,1 if then trtd目前還沒公告！ /td/tr else set kcontent=rs(content) set kuserid=rs(userid) set kposttime=rs(posttime) % %=kcontent% /td %=kuserid%|%=kposttime%) %end if%‘ 判斷是否有最新公告 ??? %set rs=() sql=select * from classnote order by posttime desc sql,conn,1,1 for i=1 to 8 if then exit for 基于 WEB的信息處理系統(tǒng) — 班級同學(xué)錄 ２３ end if% %=rs(posttime)% font color=FD890D a title=%=rs(userid)%%=rs(truename)% /a/fontbr / %=rs(content)% /p/td %% % rs=nothing% ‘ 判斷是否有新留言 ,最多顯示 8 條記錄 ,并以時間降序排列 ???? . 在左邊的導(dǎo)航條中有這樣一些信息，登錄、注冊、 修改 資料、 私人留言 、 班級簡介 、班級相冊 、 同學(xué)名片等 。數(shù)據(jù)庫連接文件 Dim conn Set conn=() driver={Microsoft Access Driver (*.mdb)}。眾所周 知， MD5是采用非對稱性算法，單向加密法，只能對數(shù)據(jù)進(jìn)行加密，而沒有辦法對加密后的數(shù)據(jù)進(jìn)行解密，具有不可逆性。該表結(jié)構(gòu)如表 43所示： 表 43 數(shù)據(jù)表“ classnotice”的結(jié)構(gòu) 字段名稱 數(shù)據(jù)類型 說明 ID 自動編號 postiontime 數(shù)字 發(fā)布時間 userid 文本 同學(xué) ID content 文本 信息內(nèi)容 ● private 該表主要用于存儲私人間發(fā)送 留言 的信息，用戶在發(fā)送 留言 時，填寫完收 件人，消基于 WEB的信息處理系統(tǒng) 班級同學(xué)錄 １８ 息的標(biāo)題，內(nèi)容后，提交所填信息，系統(tǒng)會自動生成一個編號和顯示出發(fā)件人以及發(fā)送消息的時間，該表結(jié)構(gòu)如表 44所示： 表 44 數(shù)據(jù)表“ private”的結(jié)構(gòu) 字段名稱 數(shù)據(jù)類型 說明 Id 自動編號 編號 userid 文本 發(fā)件人 ID geter 文本 收件人 ID content 文本 消息內(nèi)容 posttime 日期 /時間 發(fā)送消息時間 writer 文本 寫信人名 truegeter 文本 收信人名 ● Online 該表主要用于存儲用戶在線信息，用戶 通過登錄，就把此次登錄的用戶名，用戶所在計(jì)算機(jī)的 IP 地址，登錄時間，用戶在 系統(tǒng) 中所在的