#asp课程设计(学生信息管理系统)

一、课程设计题目………………………………………

二、课程设计目的………………………………………

三、设计概述……………………………………………

四、设计思想……………………………………………

五、设计任务……………………………………………

六、设计要求……………………………………………

七、设计步骤……………………………………………

八、设计代码……………………………………………

八、参考文献……………………………………………

十、设计体会…………………………………………….

一、课程设计题目

学生信息管理系统

二、课程设计目的

本课程的课程设计实际是学习完《ASP网络程序设计》课程后，进行的一次全面的综合训练，其目的在于使学生对于网络信息及网络信息发布有更加深入的理解，提高学生在实际操作中收集信息、对信息进行价值判断、进行信息整理、信息加工的能力，提高学生的网页设计与制作能力，使学生进一步掌握网络信息发布的原理及网络信息发布所需要的软件、硬件条件，使学生掌握利用软硬件资源发布一个具体网站的操作过程。

三、设计概述

学生信息管理系统是一个典型的信息管理系统。作为计算机应用的一部分,使用计算机对学生档案进行管理,具有手工管理所无法比拟的优点.例如:检索迅速、查找方便、可靠性高、存储量大、保密性好、寿命长、成本低等。这些优点能够极大地提高的效率,也是学校科学化、正规化管理的重要条件。现代人事工作的信息量越来越大，而且信息的密度不断提高，靠传统的管理方法和人工操作手段已经无法搞好人事管理工作。而计算机作为数据处理系统，已逐渐成为人事管理现代化的重要手段，在人事管理中正在发挥着重要的作用。并能使学校学生信息管理更加方便。一方面对学校的众多学生的信息进行动态地管理、修改、添加、删除等操作十分方便快捷，不必再像原来一样准备一个巨大的档案库，节约了成本，提高了实效性，并减少了出错率。

四、设计思想

学生信息的管理是学校经常遇到的问题。高校招生规模的逐步扩大和认识制度的改革，在校学生认识将不断增加，而学生管理人员则相对减少。加上我国高等学校基层学生管理工作的头绪多，内容杂，管理细，要求高，传统管理办法已基本不适应新形势的要求。在计算机飞速发展的今天，应用数据库技术实现

学生信息的管理是可行而必要的工作，实现高校学生管理信息系统，既能够提高

工作效率，又可以提高工作水平。

。

五、设计任务

系统功能划分

“学生信息管理系统”共分三大的模块：档案管理系统模块、成绩管理系统模块、考试管理系统模块。下面我将分别阐述各个模块的功能：

1.档案管理系统模块：

(1) 学生信息录入模块.对新增的学生信息进行录入操作。

(2) 学生信息查询模块.为使用者提供各种不同的查询途径,可根据个人需要进行查询。

(3) 学生信息删除和修改模块.先对需要进行操作的学生信息进行查询,然后对已存的学生信息进行删除或者修改操作。

（4）学生信息打印模块。实现打印和打印预览功能，可以将查询结果以我们常见的形式打印出来，并可以自定义打印格式。

（5）班级管理模块。对班级进行添加和删除操作。

2.成绩管理模块：

（1）录入成绩模块。

（2）删除/修改学生成绩模块。

3.考试管理模块:

（1）添加新考试模块。

（2）对已有的考试信息进行修改/删除模块。

（3）对考试科目进行添加/删除模块。

六、设计要求

1、针对所选题目的用户要求，设计数据库；

2、完成系统功能模块设计，能高效的管理学生信息。

3、遇有不能解决的技术问题应及时与指导老师取得联系。

七、设计步骤（包括流程图或框图）

（一）程序流程图

（二） 功能结构图

2. 班级（Class ）表

3. 成绩（Score ）表

4. 考试（Test ）信息表

八、 设计代码

<%@LANGUAGE="VBSCRIPT"%>

<%

Dim rsGrade1__MMColParam

rsGrade1__MMColParam = "0"

If (Request("MM_EmptyValue") <> "") Then

rsGrade1__MMColParam = Request("MM_EmptyValue")

End If

%>

<%

Dim rsGrade1

Dim rsGrade1_numRows

Set rsGrade1 = Server.CreateObject("ADODB.Recordset")

rsGrade1.ActiveConnection = MM_StudentConn_STRING

rsGrade1.Source = "SELECT * FROM Class WHERE Grade = " + Replace(rsGrade1__MMColParam, "''", "''''") + " ORDER BY ClassID ASC"

rsGrade1.CursorType = 0

rsGrade1.CursorLocation = 2

rsGrade1.LockType = 1

rsGrade1.Open()

rsGrade1_numRows = 0

%>

<%

Dim rsGrade2__MMColParam

rsGrade2__MMColParam = "1"

If (Request("MM_EmptyValue") <> "") Then

rsGrade2__MMColParam = Request("MM_EmptyValue")

End If

%>

<%

Dim rsGrade2

Dim rsGrade2_numRows

Set rsGrade2 = Server.CreateObject("ADODB.Recordset")

rsGrade2.ActiveConnection = MM_StudentConn_STRING

rsGrade2.Source = "SELECT * FROM Class WHERE Grade = " + Replace(rsGrade2__MMColParam, "''", "''''") + " ORDER BY ClassID ASC"

rsGrade2.CursorType = 0

rsGrade2.CursorLocation = 2

rsGrade2.LockType = 1

rsGrade2.Open()

rsGrade2_numRows = 0

%>

<%

Dim rsGrade3__MMColParam

rsGrade3__MMColParam = "2"

If (Request("MM_EmptyValue") <> "") Then

rsGrade3__MMColParam = Request("MM_EmptyValue")

End If

%>

<%

Dim rsGrade3

Dim rsGrade3_numRows

Set rsGrade3 = Server.CreateObject("ADODB.Recordset")

rsGrade3.ActiveConnection = MM_StudentConn_STRING

rsGrade3.Source = "SELECT * FROM Class WHERE Grade = " + Replace(rsGrade3__MMColParam, "''", "''''") + " ORDER BY ClassID ASC"

rsGrade3.CursorType = 0

rsGrade3.CursorLocation = 2

rsGrade3.LockType = 1

rsGrade3.Open()