《高级程序设计》(Web教务管理系统)开发步骤

综合实训 Web教务管理系统

实训一：Web教务管理系统设计

1.1 系统需求分析

根据使用人员的权限，即不同的登录权限拥有不同的操作权限。系统角色分为教务员、教师和学生。

1.1.1教务员

登录系统；

用户管理（登记/修改/删除用户）； 登记/修改课程信息； 开设教学班；

按教学班登记学生成绩； 按教学班查询学生成绩。

1.1.2教师

登录系统； 查看教师课表；

按教学班登记学生成绩； 按教学班查询学生成绩。

1.1.3学生

登录系统； 学生选课；

查看学生本人课表； 查看学生本人成绩表。

1.2 系统设计

Web教务管理系统的缺省主页是登录页面。根据登录用户的不同，显示不同的操作页面。Web教务管理系统的执行流程如下：

Web

实训二：Web教务管理系统数据库设计与实现

2.1 数据库设计

2.1.1数据表结构

Web教务管理系统数据库使用Access 2000格式的Access数据库WebJWS.mdb，主要包括下列数据表：

（1）用户表（Users）

用户表用于储存系统用户（教务员、教师以及学生）信息。其结构如表1所示。

表1 用户表（Users）

（2）教学班表（JXB）

教学班表用于储存学校排课信息。其结构如表2所示。

表2 教学班表（JXB）

（3）课程表（Course）

课程表用于储存学校开设的课程信息。其结构如表3所示。

表3 课程表（Course）

（4学生成绩表用于储存教学班中的学生成绩信息。其结构如表4所示。

表4学生成绩表（Exam）

2.1.2数据表内容

供参考。无需事先创建，在程序调试过程中作为测试数据逐步创建。

表1 用户表（Users）

表2 教学班表（JXB）

表3 课程表（Course）

表4学生成绩表（Exam）

2.2数据库实现

【操作实训1】数据库实现

1．打开Office中的Access程序。

2．创建空白数据库，另存或导出为WebJWS.mdb（Access 2000格式）。 3．依次创建2.1中设计的数据表结构：Users、Course、JXB、Grades。 4．手动添加第1

实训三：Web教务管理系统共同页面设计与实现

3.1 Web教务管理系统默认主页的设计和实现

3.1.1设计

默认主页为Default.aspx，将自动调转到Login.aspx。

3.1.2实现

注意：

（1）在系统设计和实现的整个过程中，请务必不勾选“将代码放在单独的文件中”复选框。即：

（2）在页面设计过程中，对页面的任何布局，VS系统会自动生成style。建议在代码中删除这些style，并切换到设计界面，选中操作对象，在属性面板中手工设置属性。 【操作实训2】创建Web教务系统网站

1．运行Visual Web Developer 2008应用程序。 2．新建http://www.77cn.com.cn Web站点：C:\WebJWS。

3．拷贝2.2创建的数据库文件WebJWS.mdb到C:\WebJWS\App_Data目录下。 4．刷新（

）网站内容。

【操作实训3】修改Default.aspx

修改Default.aspx Web教务管理系统缺省主页，利用Page_Load事件函数直接跳转到登录页面，代码如下：

Protected Sub Page_Load(ByVal sender As Object, ByVal e As System.EventArgs)

Response.Redirect("Login.aspx") End Sub

3.2 Web教务管理系统登录页面的设计和实现

3.2.1设计

输入用户ID和密码，然后按“登录”按钮。登录失败，报错；登录成功，跳转到MainMenu.aspx。

3.2.1实现

【操作实训4】创建登录页面

1．创建一个名为Login.aspx的http://www.77cn.com.cn页面。 2．设计页面布局：

3．引用指定名称空间。在Login.aspx代码的头部添加下列引用指定名称空间的语句，以访问

Microsoft Access数据源：

<%@ Import Namespace="System.Data.OleDb" %>

4．编写登录按钮事件处理代码BtnLogin_Click。

Protected Sub BtnLogin_Click(ByVal sender As Object, ByVal e As System.EventArgs) '连接到数据库WebDBStudents Dim con As OleDbConnection Dim cmd As OleDbCommand Dim dtr As OleDbDataReader

con = New OleDbConnection("Provider=Microsoft.Jet.OLEDB.4.0; Data

Source=|DataDirectory|\WebJWS.mdb") con.Open()

'创建查询Users表的SQL命令

Dim userID As String = txtUserName.Text Dim password As String = txtPassword.Text

Dim sSql As String = "select [UserID], [UserName], [Flag], [Password] from users where

UserID='" & userID & "'"

sSql = sSql + "and Password='" & password & "'" cmd = New OleDbCommand(sSql, con)

'执行SQL命令并返回结果 dtr = cmd.ExecuteReader()

'判断该用户是否存在 If (dtr.HasRows()) Then '存在 dtr.Read()

'UserID、UserName、UserType信息存于Session中 Session("UserID") = dtr.GetString(0) Session("UserName") = dtr.GetString(1) Session("UserType") = dtr.GetString(2) '跳转到系统主菜单页面 Response.Redirect("MainMenu.aspx") Else '该用户不存在

lblMsg.Text = "用户ID或密码有错，请重新输入！" End If End Sub

3.3 Web教务管理系统母版页面的设计和实现

3.3.1设计

Web教务管理系统母版页整体的布局如下：

3.3.2实现

【操作实训5】创建主菜单页面

1 创建一个名为JWS.master的母版页面。 2 设计页面布局：参见设计部分。

注：使用3行2列的表格进行布局。

3 编写Page_Load事件：如果没有登陆，则跳转到Login.aspx；否则显示用户名，并根据不同用户标志（1：学生；2：教师；9：教务）显示或隐藏相应的菜单Panel。

Protected Sub Page_Load(ByVal sender As Object, ByVal e As System.EventArgs) If Session("UserID") Is Nothing Then

Response.Redirect("Login.aspx") Else

lblUser.Text = "欢迎您！" & Session("UserName") If Session("UserType") = 1 Then '学生 PanelJW.Visible = False PanelTeacher.Visible = False PanelStudent.Visible = True End If

If Session("UserType") = 2 Then '教师 PanelJW.Visible = False PanelTeacher.Visible = True PanelStudent.Visible = False End If

If Session("UserType") = 9 Then '教务 PanelJW.Visible = True

PanelTeacher.Visible = False

PanelStudent.Visible = False End If End If End Sub

3.4 Web教务管理系统主菜单页面的设计和实现

3.4.1设计

使用 …… 此处隐藏：4453字，全部文档内容请下载后查看。喜欢就下载吧 ……