网站导航网学 原创论文 网站设计 最新系统 最新研究 原创论文 获取论文 论文降重 发表论文 论文发表 UI设计定制 论文答辩PPT格式排版 期刊发表 论文专题
返回网学首页
网学原创论文
最新论文 推荐专题 热门论文 论文专题
当前位置: 网学 > 设计下载 > ASP类作品 > 正文

基于ASP教学评估系统的设计与实现

来源:http://myeducs.cn 联系QQ:点击这里给我发消息 作者: 用户投稿 来源: 网络 发布时间: 13/05/07

鉴于大家对ASP类作品十分关注,我们编辑小组在此为大家搜集整理了“基于ASP教学评估系统的设计与实现”一文,供大家参考学习!

QQ交谈客服咨询,网学网竭诚为您服务,本站永久域名:myeducs.cn

 

4.2具体功能模块的设计与实现
4.2.1用户管理模块的设计与实现
LunWen.mdf数据库中建立了一个 Users表,它存储着用户的基本资料,其中主键为User表中的ID,每一个用户只有唯一的一个ID,来标识用户。用Users数据表来实现网站最基本的用户信息管理功能:注册新用户、已注册用户的后台管理。
新用户注册的设计与实现:
 新用户必须注册后才能在留言板发贴,所以新用户必须在注册页面填写新用户的基本资料,然后由程序判断是否按要求填写,用户名是否重复等,有效性可用JavaScipt来判断,这样可以减轻服务器的负荷量。
主要代码实现如下:
<script Language="JavaScript">
function ChkFields() {
    if (document.myform.UserName.value=='''') {
       window.alert ("请输入用户名!");
       myform.UserName.focus();
       return false
    }
    if (document.myform.UserName.value.Length<=2) {
       window.alert ("请用户名长度必须大于2!");
       myform.UserName.focus();
       return false
    }
    if (document.myform.Pwd.value.length<6) {    
       window.alert ("新密码长度大于等于6!");
       myform.Pwd.focus();
       return false
    }
    if (document.myform.Pwd.value=='''') {     
       window.alert ("请输入新密码!");
       myform.Pwd.focus();
       return false
    }
    if (document.myform.Pwd1.value=='''') {    
       window.alert ("请确认新密码!");
       myform.Pwd1.focus();
       return false
    }
    if (document.myform.Pwd.value!=document.myform.Pwd1.value) {              window.alert ("两次输入的新密码必须相同!");
       return false
    }
    return true
}
</script>
<form method="POST" action="UserSave.asp" name="myform" onsubmit="return ChkFields()">
以上程序创建了名myform的表单,其中表单的信息传送方式为POST,表单提交给UserSave.asp文件执行,单击表单中的Submit控件,将触发表单的onSubmit事件,在表单中实现用户资料基本输入,当用户资料按正确格式输入后就要将用户的基本资料插入到数据库表中,以便进行其它的一些管理工作。
用户管理的设计与实现:
本系统的用户管理功能比较简单,在系统初始化时,有一个默认的“系统管理员”用户Admin,由程序设计人员手动地添加到数据库中。Admin用户可以修改自身信息,用户信息以及删除注册用户,普通用户只能修改自身的用户信息和密码。功能管理模块关系如图4.2:

Admin用户
系统用信息管理
修改Admin用户密码
修改、删除普通用户信息
修改自身的用户名和密码

   管理员登录后进入用户管理模块,在这里管理员可以进入用户管理界面删除用户列表中的用户,也可进入修改用户信息对自身的信息进行修改。用户管理界面如4.3:
 
普通用户进入可查看和修改自身的信息,修改时为保证安全性必须输入原密码,在这里用到一个flag隐藏域用来标识用户是新用户还是修改用户信息。
4.2.2留言板模块的设计与实现:
本系统留言板主要是用来方便注册用户对我系本科评估工作提出宝贵意见,或咨询本科评估的有关事宜,管理员可利用回帖对用户解释,同时吸取用户意见中的有用部分,促进我系的本科评估工作,未注册用户进入留言板可以浏览留言,但不能进行发贴和其他操作。要使留言板达到更好的利用,留言板模块只有与数据库连接才能实现有效的管理,因此本系统设计普通用户留言模块和管理员留言模块。
普通用户登录后,可以根据自己的需要发布新贴或删除自己的发贴,只要点击自己的发贴进入发贴页面点击删除就可以删除了,要发贴点击发新贴即可进入。发贴页面如图4.4:
 
 
 
 
 
 


 

 
4.4 发贴页面图
在这里仍调用JavaScript来检查输入是否合乎规范,创建了名formadd的表单,其中表单的信息传送方式为POST,表单提交给artSave.asp文件执行,单击表单中的Submit控件,将触发表单的onSubmit事件,在表单中实现了资料基本输入,在这里UpprerId=0 用来表示不是回帖。
管理员留言模块
管理员登录进入留言板后不仅可以删除自己的留言,还可以删除注册用户的留言和将留言置顶和取消置顶的权限。
凡是涉及到管理员权限的都要进行身份验证,置顶和取消置顶是管理员才有的权限,所以要在开始代码前添加如下代码:<!-- #include file="IsAdmin.asp" -->,
   其原代码为:
<%
 If Session("UserName") <> "Admin" Then
    Response.Write("不是Admin用户,没有此权限")
    Response.End
 End If %>
4.2.3最新公告模块
该模块是为了让教师和学生登录主页后,更快更直接的了解评估动态和评估安排,该模块与后台数据库中的News表连接,在最新公告栏中依次滚动按发布时间最近的新闻,用户只要点击新闻标题即可迅速浏览新闻。
4.2.4新闻管理模块
此模块属于后台管理模块,用来发布本科评估的相关信息,这要求真实性很高,所以只有管理员才有权限访问。管理员登录成功后,点新闻管理即可进入,普通用户访问将显示没有权限。该模块包括新闻添加、修改、删除三个功能。
    添加新闻:主要方便管理员对本科评估新闻或部分系务新闻及时的发布出去。
修改新闻:主要是为了对发现发布出去的新闻内容或标题有误,而提供修改功能。
删除新闻:删除新闻也是对新闻进行管理,是对时间已久、失去意义的新闻进行删除,节省数据库新闻表的空间。删除新闻实现主要代码如下:
<%
Dim id, sql
id = Request.QueryString("id")
sql = "Delete From News Where id IN(" & id & ")"
Conn.Execute(sql)
Response.Redirect("NewsList.asp")
%>
4.3模块结合
以上介绍的功能模块,都是与数据库连接,都需要用户登录才能实现,本系统用户分为普通用户和管理员用户,不同的用户权限不同,进入的网页就不同。由于本系统留言板也需要管理,管理就要登录,为了方便管理,本系统将用户管理和留言管理合在一起,所以从主页登录和留言板主页的登录后的留言板界面应一致。
实现办法:
访问者登录时在登录页面上的创建的会话变量session 用于从数据库中获取访问者的有关信息,判断用户的身份,写入session 变量,变量将在整个网站的所有网页中都是有效的。这些变量的存在与否及其取值将用于确定是否允许进入一个特定的网页。
<!--#include file="conndb.asp"-->
<%
   name=trim(request("username"))
   mima=trim(request("pwd"))
   exec="select * from Users where Username=''"&name&"'' and Userpwd=''"&mima&"'' "set rs=conn.execute (exec)
 if rs.eof then ''不存在那个用户名的时候,返回错误信息
   response.write "<script language=JavaScript>" & "alert(''此用户名不存在!'');" & "history.back()" & "</script>"
   response.end
 end if
 if rs("Userpwd")<> mima then   ''如果密码错误,则返回
   response.write "<script language=JavaScript>" & "alert(''用户名或密码错误!'');" & "history.back()" & "</script>"
   response.end
    else
         Session("Passed") = True
         Session("UserName") = rs.Fields("UserName")
         Session("UserId") = rs.Fields("UserId")
         Session("Errmsg") = ""
         response.redirect("index.asp")
 end if
本站发布的计算机毕业设计均是完整无错的全套作品,包含开题报告+程序+论文+源代码+翻译+答辩稿PPT

本文选自计算机毕业设计http://myeducs.cn
论文文章部分只是部分简介,如需了解更多详情请咨询本站客服!QQ交谈QQ3710167

原创论文

设为首页 | 加入收藏 | 论文首页 |原创论文 |
版权所有 QQ:3710167 邮箱:3710167@qq.com 网学网 [Myeducs.cn] 您电脑的分辨率是 像素
Copyright 2008-2020 myeducs.Cn www.myeducs.Cn All Rights Reserved 湘ICP备09003080号 常年法律顾问:王律师