師生在線交流平臺的設(shè)計與實現(xiàn)畢業(yè)設(shè)計

第第#頁共36頁adminid=checkstr(Request.Form("adminid"))elseadminid=0endifsex=checknum(request.form("sex"))‘獲取性別burn1=checkstr(Request.Form("burn1"))burn2=checkstr(Request.Form("burn2"))burn3=checkstr(Request.Form("burn3"))home=checkstr(Request.Form("home"))home=ubbg(home)qq=checkstr(Request.Form("qq"))‘獲取QQ號gxqm=Request.Form("gxqm")gxqm=checkstr(left(gxqm,255))gxqm=replace(gxqm,"l","|")gxqm=checkbad(gxqm)picw=checkstr(Request.Form("picw"))‘獲取圖片信息pich=checkstr(Request.Form("pich"))mypic=checkstr(Request.Form("mypic"))mypic=ubbg(mypic)bbspic=checkstr(Request.Form("bbspic"))canreg=trueifname=""oruserpwd=""orrepassword=""oremail=""oradminid=""orsex=""thencanreg=false‘必填資料沒填全mes="?請?zhí)顚懲暾靥畹馁Y料。<br>"elsemes=""ifstrlength(name)>16then‘密碼不能超過16位canreg=falsemes="?你的用戶名長度超過了16。<br>"endififnotpass_name(name)thencanreg=falsemes=mes&"?你的用戶名含有非法字符。<br>"endifbadwords=application(Cachename&"badword")&"1自動送信系統(tǒng)I社區(qū)銀行I管理員I版主I總版主|超級版主"badwords=split(badwords,"I")‘屏蔽一些語言forz=0toubound(badwords)ifinstr(name,badwords(z))>0thencanreg=falsemes=mes&"?你的用戶名含有論壇禁止使用的字詞。<br>"exitforendifnextifcanreg=truethenifnotconn.execute("selecttop1useridfrom[DunkUser]wherename='"&name&"'").eofthencanreg=false:mes=mes&"?該用戶名已經(jīng)被注冊了。<br>"endif‘用戶名必須是沒被注冊過的iflen(userpwd)>16thencanreg=false:mes=mes&"?你填寫的密碼長度超過了16。<br>"ifpassc(userpwd)=falsethencanreg=false:mes=mes&"?你的密碼含有非法字符。<br>"sickpass=split("123$$1234$$12345$$123456$$1234567$$12345678$$aaa$$111","$$")fori=0toubound(sickpass)‘密碼不能過于簡單iflen(userpwd)<3oruserpwd=sickpass(i)thencanreg=falsemes=mes&"?你的密碼屬于弱口令，請更換密碼。<br>"exitforendifnextifrepasswordouserpwdthencanreg=false:mes=mes&"?你兩次輸入的密碼不一樣。<br>"email=server.HTMLEncode(email)ifnotIsValidEmail(email)thencanreg=false:mes=mes&"?你的E-mail填寫錯誤。vbr>"ifbbscon(7)=1thenifsession("adminid")<>adminidornotisnumeric(session("adminid"))thencanreg=false:mes=mes&"?你輸入的驗證碼錯誤。<br>"endifendifburn=burn1&"-"&burn2&"-"&burn3ifnotisdate(burn)thenburn="--"ifqq<>""and(notisnumeric(qq)or(len(qq)<5orlen(qq)>12))thencanreg=false:mes=mes&"?你的QQ號碼填寫錯誤。<br>"ifmypic=""thentoupic="images/headpic/"&bbspic&".gif|"&checknum(bbscon(13))&"|"&checknum(bbscon(14))elseifpicw<>""andchecknum(picw)<=checknum(bbscon(11))andpich<>""andchecknum(pich)<=checknum(bbscon(12))thentoupic=mypic&"|"&picw&"|"&pichelsecanreg=falsemes=mes&"?你的頭像大小設(shè)置錯誤。<br>"endifendififchecknum(bbscon(15))<>1andinstr(toupic,"://")>0thencanreg=falsemes=mes&"?本論壇不允許使用外部頭像。<br>"endififcanreg=falsethenmes="<b>對不起！你不能成功地注冊用戶,可能存在以下問題。v/bxbr>"&mes&"?<ahref='javascript:history.go(-1)'><imgborder=0src=images/common/re.gifalign=absmiddle>返回重新填寫。</a>"elseifcanreg=truethentl="1"mes="恭喜你！vb>"&htmlcoder(name)&"v/b>注冊成功。<br>?<ahref=login.asp>現(xiàn)在登陸論壇。</a><br>?<ahref=index.asp>進入論壇首頁。</a>"%><!--#includefile="inc/md5.asp"--><%regtime=FormatDateTime(now+timezone/24,2)‘獲取注冊時間userinfo=email&"|"&home&"|"&burn&"|"&qq&"|"&sex&"|"&toupic&"|"&gxqm&"|"®time&"|"setrs=Server.CreateObject("ADODB.Recordset")sql="selecttop1userid,name,pswd,userinfo,lasttimefrom[DunkUser]"rs.opensql,conn,0,2rs.addnew'添加一條記錄rs("name")=name‘添加用戶名rs("pswd")=userpwd‘添加密碼rs("userinfo")=userinfo‘添加用戶信息rs("lasttime")=regtime'添加注冊時間rs.update‘執(zhí)行添加操作userid=rs("userid")rs.close‘關(guān)閉記錄集setrs=nothing‘釋放記錄集測試先注冊一個ID為USER的用戶(先前數(shù)據(jù)庫中無此用戶名的)，注冊成功后，再注冊一個ID為USER的用戶！預(yù)期結(jié)果應(yīng)該是系統(tǒng)提示該用戶名已經(jīng)存在。填寫完整的資料后點擊注冊，此時系統(tǒng)按照預(yù)期結(jié)果提示該用戶名已經(jīng)被注冊了。測試結(jié)果，系統(tǒng)正常按照設(shè)計模式運行?？偨Y(jié)BBS（BulletinBoardService,公告牌服務(wù)）是Internet上的一種信息服務(wù)系統(tǒng)。它提供一塊公共電子白板，每個用戶都可以在上面書寫，可發(fā)布信息或提出看法。隨著網(wǎng)絡(luò)技術(shù)的飛速發(fā)展，論壇已經(jīng)成為網(wǎng)絡(luò)上不可缺少的交流方式之一，深受網(wǎng)民的喜愛。整個論壇系統(tǒng)使用Browser/Web模式來設(shè)計，服務(wù)器端采用Access數(shù)據(jù)庫系統(tǒng)和ASP組件來構(gòu)成論壇系統(tǒng)；客戶端采用瀏覽器來完成系統(tǒng)維護和管理。1、該論壇所實現(xiàn)的功能：用戶注冊、發(fā)帖、回復(fù)、發(fā)短消息、圖片上傳、帖子加精華。2、論壇待完善問題：管理員發(fā)貼審核系統(tǒng)、郵件發(fā)送等。經(jīng)過這二個多月的畢業(yè)設(shè)計和對相關(guān)資料的收集，讓我清楚的感到隨著網(wǎng)絡(luò)科技的不斷發(fā)展和網(wǎng)絡(luò)的廣泛應(yīng)用，使我們的生活離不開它了。網(wǎng)絡(luò)它以自己的獨特的優(yōu)點征服了我們。在教育越來越受重視的21世紀，隨著學(xué)生學(xué)習(xí)類型的不斷增加和交流方式的不斷提高，技術(shù)方面的工作量將會越來越大，在這樣的情況下有一個實用的平臺讓老師和學(xué)生從中受益是有其必然性的，如果能做出一個完善的論壇交流系統(tǒng)就會使學(xué)生能更好的去學(xué)習(xí)。在這次的畢業(yè)設(shè)計中雖然時間緊迫但我學(xué)會了很多，也感到自身知識的貧乏，希望在日后的努力中能做出更完善的系統(tǒng)。參考文獻：[1]前沿電腦圖像工作室巧學(xué)巧用Dreamweaver、Fireworks、Flash制作網(wǎng)頁北京：人民郵電出版社2001李世杰ActiveServerPages(ASP)3.0網(wǎng)頁設(shè)計手冊北京：清華大學(xué)出版社1999小志編著ASP入門與實例演練薄中國青年出版社1998毛一心等Access2003應(yīng)用及實例集錦北京：人民郵電出版社2000教育部考試中心數(shù)據(jù)庫(Access2003)教程北京：清華大學(xué)出版社2000⑹李禹生蔣利華等Access2003應(yīng)用技術(shù)北京：中國水利水電出版社2000廖疆星Access2003數(shù)據(jù)庫開發(fā)指南北京：冶金工業(yè)出版社2001李存珠李宣東軟件工程概論.南京大學(xué)計算機系出版2001年⑼汪曉平張宏林等ASP網(wǎng)絡(luò)開發(fā)技術(shù)北京：人民郵電出版社2000宋顏浩，費文華ASP與相關(guān)數(shù)據(jù)庫技術(shù)高級指南北京：中國水利水電出版社2002丁貴廣，閆允一，孟繁杰ASP及ASP.NET編程基礎(chǔ)與實例第2版北京：機械工業(yè)出版社2004毛璟駿編著Macromedia中國授權(quán)認證培訓(xùn)(ATC)專用教程MacromediaDreamweaverMX動態(tài)網(wǎng)站開發(fā)標(biāo)準(zhǔn)教程科學(xué)出版社2001李海兵，楊曉亮DreamweaverUltraDev動態(tài)網(wǎng)頁設(shè)計第2版人民郵電出版社2003龍馬工作室編著DreamweaverMXASP網(wǎng)頁編程入門與范例制作機械工業(yè)出版社2001Denning，D.E..CryptographandDateSecurityAddison-Wesley2001致謝從十月份接受課題到現(xiàn)在完成畢業(yè)設(shè)計論文，衷心的感謝我的指導(dǎo)趙海俠老師給予了精心的指導(dǎo)和熱