学生管理系统.docx

1、学生管理系统目录 1 引 言 11.1 大作业选题 11.2 大作业的目的 12 系统分析与设计 12.1 功能及性能分析 12.1.1 功能需求 12.1.2 性能需求 12.1.3 数据流图表示 22.2 系统的开发运行环境 22.3 系统总体设计 22.3.1 学生管理系统的功能模块 22.3.2 系统流程图设计 43 数据库设计 53.1 表 53.1.1 用户表 53.1.2 班级表 53.1.3 学生表 63.1.4 课程表 63.1.5 成绩表 74 详细设计与实现 74.1 用户注册页面 74.2 用户登录页面 84.3 班级信息管理模块 84.4 学生信息管理模块 94.5

2、课程信息模块 94.6 成绩信息管理模块 104.7 关键代码及技术详细说明 114.7.1 数据库连接 114.7.2 用户注册 114.7.3 用户登录 114.7.4 查询 124.7.5 更新记录 124.7.6 添加记录 134.7.7 删除记录 134.7.8 分页 135 总结 146 参 考 文 献 141 引 言1.1 大作业选题学生信息管理系统1.2 大作业的目的1、掌握ASP.NET内部控件的应用。2、掌握ASP.NET内部对象的应用。3、Application对象的深入应用。4、掌握数据库的建立、连接与数据的存取。5、掌握动态网站开发的基本流程。2 系统分析与设计2.1

3、 功能及性能分析2.1.1 功能需求录入学生信息、查询学生信息、修改及删除学生信息、班级管理4个模块。2.1.2 性能需求 (一)用户功能模块：1.注册模块 使用验证控件对部分内容进行验证，将注册的信息存储到已建立好的数据库中user表中。若填入的信息不符合要求，如用户名重复，密码设置的不符合要求，需重新注册，注册成功后点击转到登录页面。2.登录模块： 已注册成功的用户（数据库中已存储其注册信息）输入正确的用户名和密码后就可以登录。3.班级信息管理模块4.学生信息管理模块 管理员登陆后可以对学生信息进行添加、删除、修改和查询操作。5.课程信息管理模块 管理员登陆后可以对课程信息进行添加、删除、

4、修改和查询操作。6.成绩信息管理模块 管理员登陆后可以对成绩信息进行添加、删除、修改和查询操作。2.2 系统的开发运行环境硬件：多媒体计算机软件：Windows系列操作系统（含IIS5.0以上版本）、.Net运行环境及编译环境、Access2003.2.3 系统总体设计在总体设计这个阶段，应划分出组成该系统的一些物理元素-程序，文件，数据库，人工过程和文档等等。同时，总体设计阶段另一项重要任务是设计软件的结构，确定系统中每个程序由哪些模块组成，以及这些模块间的关系。具体到该系统，开发任务是实现学生管理系统化、规范化和自动化，从而提高学生管理的工作效率。2.3.1 学生管理系统的功能模块系统功能

5、模块图：学生信息管理系统班级信息管理学生信息管理课程信息管理成绩信息管理 3 数据库设计3.1 E-R图管理员班级课程成绩学生管理属于属于拥有拥有 管理管理管理 3.2 表3.2.1 用户表3.2.2 班级表3.2.3 学生表 3.2.4 课程表3.2.5 成绩表4.详细设计与实现3.3 用户注册页面用户注册界面，注册时有信息验证，通过后方可注册成功。3.4 用户登录页面3.5 班级信息管理模块 当用户点击“班级信息”后，此模块可以显示所有的信息，包括班级号，班级名，班主任，人数，所属系别，可以进行添加、删除、修改、查询操作。3.6 学生信息管理模块 当用户点击“学生信息”后，此模块可以显示所

6、有的信息，包括学号，姓名，性别等信息，可以进行添加、删除、修改、查询操作。3.7 课程信息模块 当用户点击“课程信息”后，此模块可以显示所有的信息，包括课程号号，课程名，教师，学分，类型，可以进行添加、删除、修改、查询操作。3.8 成绩信息管理模块3.9 关键代码及技术详细说明3.9.1 数据库连接Dim conn As New OleDbConnection(Provider=Microsoft.Jet.OLEDB.4.0;Data Source= & Server.MapPath(stu.mdb)3.9.2 用户注册 用户名： 密   码： E-mail: 3.9.3

7、用户登录Dim strSql As String strSql=Select * From users Where username= & username.Text & And mypassword= & password.Text & Dim cmd As New OleDbCommand(strSql, conn) conn.Open() Dim dr As OleDbDataReader = cmd.ExecuteReader() dr.Read()=True表示有条记录，说明有该用户。否则表示没有该用户 If dr.Read()=True Then conn.Close() 通过认证

8、，并重定向到客户请求页面 FormsAuthentication.RedirectFromLoginPage(username.Text, False) mydh.Visible = True message.Text = 登录成功，欢迎进入学生信息管理系统！ Response.Redirect(xs.aspx) Else conn.Close() message.Text=您必须输入有效的用户名和密码 End If End Sub3.9.4 查询当查找记录时，执行该事件过程 Sub Enter_Click(ByVal Sender As Object, ByVal E As EventArg

9、s) conn = New OleDbConnection(Provider=Microsoft.Jet.OLEDB.4.0;Data Source= & Server.MapPath(stu.mdb) If DropDownList1.Text = 班级号 Then strSql = select * from bj where id like & % & Trim(keyword.Text) & % & & ORDER BY id ElseIf DropDownList1.Text = 班级名 Then strSql = select * from bj where mc= & Trim(

10、keyword.Text) & & ORDER BY id ElseIf DropDownList1.Text = 班主任 Then strSql = select * from bj where bzhr= & Trim(keyword.Text) & & ORDER BY id Else strSql = select * from bj where xb= & Trim(keyword.Text) & & ORDER BY id End If If Trim(keyword.Text) = Or Trim(keyword.Text) = 全部 Then strSql = Select *

11、 From bj & ORDER BY id End If Call BindData()End Sub3.9.5 更新记录单击更新时，执行该事件过程。Sub MyDataGrid_Update(Sender As Object, E As DataGridCommandEventArgs) 获取客户填写的值 Dim txtMc, txtBzhr, txtRsh, txtXb As TextBox 声明文本框控件变量 Dim txtId As Label txtId = E.Item.Cells(0).Controls(1) txtMc = E.Item.Cells(1).Controls(0

12、) txtBzhr = E.Item.Cells(2).Controls(0) txtRsh = E.Item.Cells(3).Controls(0) txtXb = E.Item.Cells(4).Controls(0) strSql = Update bj Set Mc= & txtMc.Text & ,bzhr= & txtBzhr.Text & ,rsh= & CInt(txtRsh.Text) & ,xb= & txtXb.Text & where id= & MyDataGrid.DataKeys(CInt(E.Item.ItemIndex) Dim cmd As New Ole

13、DbCommand(strSql, conn) 下面执行更新操作 Dim Exp As Exception Try conn.Open() cmd.ExecuteNonQuery() 执行更新操作 conn.Close() Catch Exp message.Text = 发生错误，没有正常更新记录 MsgBox(没有正常更新记录,可能违反了约束条件！, , 警告！) End Try 重新绑定 MyDataGrid.EditItemIndex = -1 Call BindData() 绑定数据 End Sub3.9.6 添加记录Sub Enter_Click(ByVal Sender As O

14、bject, ByVal E As EventArgs) Dim conn As New OleDbConnection(Provider=Microsoft.Jet.OleDb.4.0;Data Source= & Server.MapPath(Stu.mdb) Dim strSql As String strSql = Insert Into bj(mc,bzhr,rsh,xb) Values( & mc.Text & , & bzhr.Text & , & CInt(rsh.Text) & , & xb.Text & ) Dim cmd As New OleDbCommand(strSq

15、l, conn) conn.Open() cmd.ExecuteNonQuery() 执行操作，插入记录 conn.Close() Response.Redirect(bj.aspx) 重定向到登录页面) End Sub3.9.7 删除记录 单击删除时执行该事件过程 Sub MyDataGrid_Delete(ByVal Sender As Object, ByVal E As DataGridCommandEventArgs) 建立Command对象 strSql = Delete from bj Where id= & MyDataGrid.DataKeys(E.Item.ItemInde

16、x) & Dim cmd As New OleDbCommand(strSql, conn) Dim Exp As Exception Dim f = MsgBox(确定要删除吗？, MsgBoxStyle.OkCancel, 提示！) If f = 1 Then Try conn.Open() cmd.ExecuteNonQuery() 执行删除操作 conn.Close() Catch Exp message.Text = 发生错误，没有正常删除记录 MsgBox(没有正常删除记录,可能违反了约束条件！, , 警告！) End Try End If 重新绑定 MyDataGrid.Edit

17、ItemIndex = -1 Call BindData() 绑定数据 End Sub3.9.8 分页该过程用来分页Sub MyDataGrid_Page(sender As Object, e As DataGridPageChangedEventArgs) MyDataGrid.CurrentPageIndex = e.NewPageIndex Call BindData() 绑定数据 End Sub4 总结通过本次大作业的练习，我对各种ASP.net服务器控件（HTML控件，Web控件，验证控件）、内部对象、存取数据库的知识更熟悉了。在本系统中我主要运用了DataGrid控件实现对数据的分页显示，排序，修改和删除功能。