基于j2ee的oa系統(tǒng)設(shè)計(jì)與數(shù)據(jù)加密分析碩士論文(編輯修改稿)

　

【文章內(nèi)容簡(jiǎn)介】 onmouseout==39。FFFFFF39。verifycode text 驗(yàn)證碼onFocus=()。 onmouseover==39。EAEAEA39。 onmouseout==39。FFFFFF39。 size=6 maxlength=4verifycode2 hidden 隱藏域 value=%=session(verifycode)%submit submit 【登錄】按鈕 class=input value= 登 錄 submit2 reset 【重填】按鈕 value= 重 填 class=input系統(tǒng)登錄頁(yè)面所涉及到的程序代碼如下：% dim verifycode,verifycode2 verifycode=trim((verifycode)) 39。獲取輸入驗(yàn)證碼的值verifycode2=trim((verifycode2)) 39。應(yīng)用Trim函數(shù)替換字符串左右空格符if verifycodeverifycode2 then 39。判斷輸入的驗(yàn)證碼與隨機(jī)產(chǎn)生的驗(yàn)證碼是否一致SCRIPT language=JavaScriptalert(39。您輸入的驗(yàn)證碼不正確。39。)。=39。39。/SCRIPTelsesession(verifycode)= 39。清空驗(yàn)證碼%% if request(action)=login then 39。判斷表單是否接收到值admin_name=request(admin_name) 39。接收用戶名admin_pass=request(admin_pass) 39。接收用戶密碼– 7 –username=trim(request(admin_name)) 39。應(yīng)用 Trim函數(shù)去掉左右空格符password=trim(request(admin_pass))for i=1 to len(username) 39。應(yīng)用len 函數(shù)計(jì)算出用戶名的長(zhǎng)度 user=mid(username,i,1) 39。判斷用戶名中是否含有非法字符if user=39。 or user=% or user= or user= or user=amp。 or user=| then script language=JavaScriptamp。alert(39。您的用戶名含有非法字符,請(qǐng)重新輸入！39。)。 amp。 () amp。 /scriptend ifnext for i=1 to len(password) 39。判斷用戶密碼中是否含有非法字符 pass=mid(password,i,1) if pass=39。 or pass=% or pass= or pass= or upass=amp。 or pass=| then script language=JavaScript amp。 alert(39。您的密碼含有非法字符,請(qǐng)重新輸入！39。)。 amp。 () amp。 /script end if next%%set rs=()sql=select * from users where username=39。amp。admin_nameamp。39。 and userpwd=39。amp。admin_passamp。39。 sql,conn,1,3if then 39。判斷輸入的用戶名、密碼或驗(yàn)證碼是否正確 brbrbrbrfont size=2center對(duì)不起，您輸入的用戶名、密碼或驗(yàn)證碼有誤，從重新輸入，謝謝！brbr，分辨率：1024*768brbr否則一切后果與本軟件無(wú)關(guān)，特此聲明！/fontelsesession(admin_name)=request(admin_name) 39。創(chuàng)建session階段變量() 39。跳轉(zhuǎn)到指定的動(dòng)態(tài)頁(yè)end if set rs=nothing 39。關(guān)閉已打開(kāi)的記錄集set conn=nothing 39。將不用的對(duì)象釋放掉end ifend if%系統(tǒng)登錄頁(yè)面的運(yùn)行結(jié)果如圖 5 所示。 – 8 –圖 5 系統(tǒng)登錄頁(yè)面的運(yùn)行結(jié)果6 日常管理模塊設(shè)計(jì)日常管理模塊主要包括收文管理、發(fā)文管理、批示管理、會(huì)議管理、個(gè)人辦公管理 5 部分。 收文管理模塊設(shè)計(jì)收文管理主要用于顯示發(fā)文人、審批人、發(fā)文日期、發(fā)文標(biāo)題，通過(guò)單擊“發(fā)文標(biāo)題”超鏈接，可以打開(kāi)收文的詳細(xì)信息頁(yè)面。收文信息以分頁(yè)形式進(jìn)行顯示。收文管理頁(yè)面的設(shè)計(jì)效果如圖 6 所示。圖 6 收文管理頁(yè)面的設(shè)計(jì)效果收文管理頁(yè)面所涉及到的程序代碼如下：%set rs=()sql=select * from fajian where shen=1 order by time desc sql,conn,1,1%% if not then tel= 39。獲取記錄集的總數(shù) shum=15 =shum maxpage= 39。獲取最大頁(yè)面碼值 requestpage=clng(request(p)) if requestpage= or requestpage=0 then requestpage=1 39。設(shè)置默認(rèn)值– 9 – end if if requestpagemaxpage then requestpage=maxpage end if if not requestpage=1 then (requestpage1)* end if for i=1 to and not % tr td height=26 bgcolor=FFFFFFspan class=style3→/span a href= onClick=(39。?id=%=rs(id)%39。,39。39。,39。scrollbars=yes,width=510,height=50039。)%=rs(title)%/a/td td height=26 bgcolor=FFFFFF div align=center%=rs(name)%/div/td td height=26 bgcolor=FFFFFF div align=center%=rs(sname)%/div/td td bgcolor=FFFFFF div align=center%=rs(time)%/div/td/tr% if then exit for 39。如果記錄集為空，跳出循環(huán) next else (暫無(wú)信息) end if % 發(fā)文管理模塊設(shè)計(jì)發(fā)文管理主要包括發(fā)布發(fā)文、發(fā)文刪除兩部分。發(fā)布發(fā)文管理的相關(guān)程序代碼如下：%if request(post)=true then 39。判斷表單是否提交call wri 39。調(diào)用wri自定義函數(shù)end if function wriif request(title) and request(content) then 39。判斷發(fā)文的標(biāo)題、內(nèi)容是否為空set rs=()sql=select * from fajian sql,conn,1,3 39。打開(kāi)記錄集rs(title)=request(title)rs(content)=request(content)rs(name)=session(admin_name)rs(shen)=0 39。添加發(fā)文屬于未審核rs(time)=now() 39。根據(jù)計(jì)算機(jī)系統(tǒng)設(shè)定的日期和時(shí)間返回當(dāng)前的日期和時(shí)間值 – 10 –() 39。跳轉(zhuǎn)到指定的動(dòng)態(tài)頁(yè)else()end if end function%除了發(fā)布發(fā)文功能同時(shí)也設(shè)置了刪除發(fā)文的功能，單擊“刪除”超鏈接將刪除指定的發(fā)文信息。發(fā)文刪除的程序代碼如下：%if request(del) then 39。判斷接收的del值不能等于空call delend iffunction del sql2=delete from fajian where id=amp。request(del)(sql2) 39。執(zhí)行sql2語(yǔ)句end function%%set rs=() sql=select * from fajian where name=39。amp。session(admin_name)amp。39。 and shen=0 order by time desc sql,conn,1,1 39。打開(kāi)記錄集%a href=?del=%=rs(id)%amp。p=%=requestpage%刪除/a發(fā)文刪除頁(yè)面的運(yùn)行結(jié)果如圖 7 所示。圖 7 發(fā)文刪除頁(yè)面的運(yùn)行結(jié)果 批示管理模塊設(shè)計(jì)批示管理主要包括發(fā)文批示、發(fā)文修改、發(fā)文刪除，只有當(dāng)用戶是超級(jí)用戶才有權(quán)限進(jìn)行批示管理，普通用戶沒(méi)有此權(quán)限。當(dāng)審批之后，發(fā)文在收文管理頁(yè)面中才能夠顯示出來(lái)。批示管理頁(yè)面的設(shè)計(jì)效果如圖 8 所示。– 11 –圖 8 批示管理頁(yè)面設(shè)計(jì)效果批示管理頁(yè)面所涉及到的程序代碼如下：%call case1if request(del) and (ps(shenhe)=1 or ps(chaoji)=1) then 39。判斷用戶是否有權(quán)限刪除發(fā)文call delend iffunction delsql2=delete from fajian where id=amp。request(del)(sql2) 39。執(zhí)行sql2 語(yǔ)句end functionif request(shen) and (ps(shenhe)=1 or ps(chaoji)=1) then 39。判斷用戶是否有權(quán)限進(jìn)行審核call upend iffunction upset rs1=()sql1=select * from fajian where id=amp。request(id) sql1,conn,1,3rs1(shen)=request(shen) 39。是否審核rs1(sname)=session(admin_name) 39。獲取操作用戶名end function%%set rs=()sql=select * from fajian order by time desc 39。將所有記錄進(jìn)行降序排列 sql,conn,1,1%%if rs(shen)=1 then% 已審核% End If %%if rs(shen)=0 then% a href=?shen=1amp。id=%=rs(id)% onClick=return confirm(39。確定審核嗎？39。)審核/a 39。通過(guò)鼠標(biāo)單擊事件實(shí)現(xiàn)彈出提示框 – 12 –% End If %修改發(fā)文進(jìn)行修改所涉及到的程序代碼如下%call case1 39。驗(yàn)證用戶身份,此時(shí)調(diào)用inc/,select case1set rs1=()sql1=select * from fajian where id=amp。request(id) sql1,conn,1,1session(id)=rs1(id)if rs1(shen)1 then 39。判斷是否已審核if request(post)=true then 39。判斷是否已接收表單的值call wriend if function wriif request(title) and request(content) then 39。判斷是否接收到值set rs=()sql=select * from fajian where id=amp。session(id) 39。通過(guò)session(id) 查找相關(guān)記錄 sql,conn,1,3 39。打開(kāi)記錄集rs(title)=request(title) 39。接收添加的標(biāo)題rs(content)=request(content) 39。接收添加的內(nèi)容rs(time)=now() 39。獲取當(dāng)前系統(tǒng)日期和時(shí)間() 39。跳轉(zhuǎn)到發(fā)文修改成功頁(yè)面else()end if end functionif request(id)= then ()