基于j2ee的oa系统设计与数据加密分析硕士论文(编辑修改稿)

基于j2ee的oa系统设计与数据加密分析硕士论文(编辑修改稿)内容摘要：

onmouseout==39。 FFFFFF39。 verifycode text 验证码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系统登录页面所涉及到的程序代码如下：% dim verifycode,verifycode2 verifycode=trim((verifycode)) 39。 获取输入验证码的值verifycode2=trim((verifycode2)) 39。 应用Trim函数替换字符串左右空格符if verifycodeverifycode2 then 39。 判断输入的验证码与随机产生的验证码是否一致SCRIPT language=JavaScriptalert(39。 您输入的验证码不正确。 39。 )。 =39。 39。 /SCRIPTelsesession(verifycode)= 39。 清空验证码%% 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。 应用 Trim函数去掉左右空格符password=trim(request(admin_pass))for i=1 to len(username) 39。 应用len 函数计算出用户名的长度 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。 您的用户名含有非法字符,请重新输入。 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。 您的密码含有非法字符,请重新输入。 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。 判断输入的用户名、密码或验证码是否正确 brbrbrbrfont size=2center对不起，您输入的用户名、密码或验证码有误，从重新输入，谢谢。 brbr，分辨率：1024*768brbr否则一切后果与本软件无关，特此声明。 /fontelsesession(admin_name)=request(admin_name) 39。 创建session阶段变量() 39。 跳转到指定的动态页end if set rs=nothing 39。 关闭已打开的记录集set conn=nothing 39。 将不用的对象释放掉end ifend if%系统登录页面的运行结果如图 5 所示。 – 8 –图 5 系统登录页面的运行结果6 日常管理模块设计日常管理模块主要包括收文管理、发文管理、批示管理、会议管理、个人办公管理 5 部分。 收文管理模块设计收文管理主要用于显示发文人、审批人、发文日期、发文标题，通过单击“发文标题”超链接，可以打开收文的详细信息页面。 收文信息以分页形式进行显示。 收文管理页面的设计效果如图 6 所示。 图 6 收文管理页面的设计效果收文管理页面所涉及到的程序代码如下：%set rs=()sql=select * from fajian where shen=1 order by time desc sql,conn,1,1%% if not then tel= 39。 获取记录集的总数 shum=15 =shum maxpage= 39。 获取最大页面码值 requestpage=clng(request(p)) if requestpage= or requestpage=0 then requestpage=1 39。 设置默认值– 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。 如果记录集为空，跳出循环 next else (暂无信息) end if % 发文管理模块设计发文管理主要包括发布发文、发文删除两部分。 发布发文管理的相关程序代码如下：%if request(post)=true then 39。 判断表单是否提交call wri 39。 调用wri自定义函数end if function wriif request(title) and request(content) then 39。 判断发文的标题、内容是否为空set rs=()sql=select * from fajian sql,conn,1,3 39。 打开记录集rs(title)=request(title)rs(content)=request(content)rs(name)=session(admin_name)rs(shen)=0 39。 添加发文属于未审核rs(time)=now() 39。 根据计算机系统设定的日期和时间返回当前的日期和时间值 – 10 –() 39。 跳转到指定的动态页else()end if end function%除了发布发文功能同时也设置了删除发文的功能，单击“删除”超链接将删除指定的发文信息。 发文删除的程序代码如下：%if request(del) then 39。 判断接收的del值不能等于空call delend iffunction del sql2=delete from fajian where id=amp。 request(del)(sql2) 39。 执行sql2语句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。 打开记录集%a href=?del=%=rs(id)%amp。 p=%=requestpage%删除/a发文删除页面的运行结果如图 7 所示。 图 7 发文删除页面的运行结果 批示管理模块设计批示管理主要包括发文批示、发文修改、发文删除，只有当用户是超级用户才有权限进行批示管理，普通用户没有此权限。 当审批之后，发文在收文管理页面中才能够显示出来。 批示管理页面的设计效果如图 8 所示。 – 11 –图 8 批示管理页面设计效果批示管理页面所涉及到的程序代码如下：%call case1if request(del) and (ps(shenhe)=1 or ps(chaoji)=1) then 39。 判断用户是否有权限删除发文call delend iffunction delsql2=delete from fajian where id=amp。 request(del)(sql2) 39。 执行sql2 语句end functionif request(shen) and (ps(shenhe)=1 or ps(chaoji)=1) then 39。 判断用户是否有权限进行审核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。 将所有记录进行降序排列 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。 通过鼠标单击事件实现弹出提示框 – 12 –% End If %修改发文进行修改所涉及到的程序代码如下%call case1 39。 验证用户身份,此时调用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。 通过session(id) 查找相关记录 sql,conn,1,3 39。 打开记录集rs(title)=request(title) 39。 接收添加的标题rs(content)=request(content) 39。 接收添加的内容rs(time)=now() 39。 获取当前系统日期和时间() 39。 跳转到发文修改成功页面else()end if end functionif request(id)= then ()。