呼伦贝尔学院

计算机科学与技术学院

本科生毕业论文(设计)

题 目： 学生宿舍管理系统

学生姓名： 宋祝丽

学 号： 2007121317

专业班级： 2007级计算机科学与技术三班

指导教师： 凃云杰

完成时间： 2011年5月28日

目录

摘要 I

Abstract II

第1章 绪论 1

1.1　选题背景 1

1.2　开发设计的意义 1

1.3　开发技术 1

1.3.1　Access 2003介绍 1

1.3.2　ADO.NET访问技术 1

1.3.3　ASP.NET介绍 2

1.4　系统运行环境 2

第2章 可行性研究与需求分析 3

2.1　系统可行性研究 3

2.2　需求分析 3

第3章 系统概要设计 4

3.1　系统功能模块 4

3.1.1　系统管理模块 4

3.1.2　公寓管理模块 4

3.1.3　学生管理模块 4

3.1.4　注册管理模块 4

3.1.5　报表打印模块 5

3.2　数据库设计 5

3.2.1　数据库概念结构设计 5

3.2.2　数据逻辑结构设计 6

3.2.3　数据表的建立 6

第4章 系统实现 11

4.1　系统登录模块 11

4.2　系统管理模块 13

4.3　公寓管理模块 14

4.3.1　宿舍管理 14

4.3.2　卫生管理 16

4.4　学生管理模块 17

4.4.1　住宿管理 17

4.4.2　请假管理 18

4.4.3　访客管理 20

4.4.4　违规管理 21

4.5　报表打印模块 22

结论 23

参考文献 24

致谢 25

摘要

目前，很多高校还是用手工方式进行宿舍管理。这种方式不但麻烦而且效率也很低。本人开发了一款学生宿舍管理系统。

本系统采用B/S模式，以ASP．NET作为前端开发工具，运用Microsoft Office Access 2003建立后台数据库。本系统实现了学生住宿管理，学生财产管理，宿舍管理，卫生检查管理等功能。其操作简单，界面友好。本系统适用于高校学生宿舍管理。该系统可以提高高校宿舍管理部门的工作效率，减少不必要的人力、物力和财力的支出，为宿舍管理人员带来了极大的便利。

关键词　住宿管理；宿舍管理；财产管理

Abstract

At present，a lot of colleges still uses manual record to manage dormitories．The kind of mode is both troublesome and less efficient．The thesis develops a student dormitory management system.

The system is based on B/S mode. It uses ASP．NET as the foreground developing tool and Microsoft Office Access 2003 to build background database．The system accomplishes such functions as student lodging management，student property management，dormitory management，sanitary checking management and so on．Its operation is simple and its interface is friendly．It is suitable for college dorm management．It can improve the work efficiency of dormitory management and reduce unnecessary waste of the manpower，the physical resource and the cost．It can provide great convenience for dormitory staff.

Keywords　lodging management，dormitory management，property management

第1章 绪论

1.1　选题背景

目前，很多高校还处在由宿舍管理人员手工记录数据的阶段，手工记录对于规模小的高校来说还勉强可以接受，但对于学生信息量庞大，需要记录存档的数据多的高校来说，人工记录是相当麻烦的。而且当查找某条记录时，由于数据量大，还只能靠人工一条条地查找，这样不但麻烦还浪费了许多时间，效率也低，高校每年在人力上投资也不少。当今社会是一个信息时代，原始的记录方式亟待创新。计算机化管理正是适应时代的产物。学生宿舍管理系统对于一个高校来说是必不可少的组成部分。

1.2　开发设计的意义

本系统可以提高宿舍管理人员的工作效率，使宿舍管理工作系统化、规模化、自动化。减轻工作人员的负担，方便宿舍管理人员全面地掌握学生的住宿情况。信息查找会非常方便，结束了以往靠管理人员一条条查找的时代。而且数据库存储容量大，稳定，适合长时间保存，不容易丢失。投资小在人力，物力，财力方面也可为学校减少不少开资。

1.3　开发技术

1.3.1　Access 2003介绍

Access 2003是微软公司推出的基于Windows的桌面关系数据库管理系统（RDBMS，即Relational Database Management System），是office系列应用软件之一。Access 2003主要具有以下优点：

1．存储方式简单，易于维护管理 ；

2．面向对象；

3．界面友好，易操作；

4．集成环境，处理多种数据信息；

5．Access 2003支持ODBC（开发数据库互连，Open Data Base Connectivity）；

6．支持广泛，易于扩展。

1.3.2　ADO.NET访问技术

ASP.NET是通过ADO.NET来访问数据库的。ADO.NET是ADO的改进版本。在ADO.NET中，通过.NET Data Provider所提供的应用程序接口(API)，可轻松地访问各种数据源的数据，包括OLEDB 和ODBC支持的数据库。

ADO.NET (ActiveX Data Object.NET)是.NET平台中专门用于存取后端数据库操作的一组类。ADO.NET的数据访问分为两个部分：数据集(Dataset)和数据提供源。总体来说，使用ADO.NET访问数据可以被概括为以下步骤：首先应用程序创建一个connect对象用来建立与数据库之间的连接。然后Command对象提供了执行命令的接口，可以对数据库执行相应的命令。当命令执行的数据库返回了大于零个数据时，DataReader会被返回从而提供对返回的结果集的数据访问。或者，DataAdapter可以被用来填充数据集，然后数据库可以由Command对象或DataAdapter对象进行相应的更改。

在ASP页面里,ADO是位于OLEDB之上的应用程序. 你的ADO调用先被送到OLEDB,然后再交由ODBC处理, Microsoft Access 2003使用Jet作为其默认的数据库引擎。

1.3.3　ASP.NET介绍

ASP.NET又称为ASP+，但它不是ASP的简单升级，而是微软提出的.NET框架的一份，它是一种以.NET框架为基础开发网上应用程序的全新模式。.NET的核心内容之一就是要搭建第三代互联网平台，这个网络平台将打破不同的上网设备、不同的操作系统、不同的网站，以及各大机构和工业界的网络障碍，将解决网站之间的协同合作，使网站之间形成自动交流，最大限度地实现资源共享。

1.　．NET框架（.NET Framework）组成部分

公共语言运行库（Common Language Runtime CLR）

基础类库（Basic Class Library）

ASP.NET、VB.NET、C#等语言运行库

2． ASP.NET的功能和特点

ASP.NET是.NET框架中专门用来开发网上应用程序的，它其实不是一种语言，而更像一个框架，在这个框架下可以采用VB.NET 、C#等其他.NET语言开发网上程序。利用ASP.NET可以方便地开发目前网上流行的聊天室、留言板、BBS论坛、电子商务、网上教育、网上社区、网上办公系统等应用程序。相对于它的前身ASP来说，ASP.NET具有如下特点：

（1）效率增强；

（2）顶级开发工具支持；

（3）程序结构清晰；

（4）开发简单；

（5）移植方便；

（6）Web服务。

1.4　系统运行环境

要正确运行本系统，服务器必须安装如下软件：

1．Windows 2000 Professional 或 Windows 2000 Server 或 Windows 2000 Advance Server 或 Windows XP Professional或更高的版本，其中Windows 2000系列需要安装 Service Pack 2.0；

2．ISS 5.0(Internet信息服务管理器5.0)；

3．NET Framework (.NET框架)；

4．MDAC 2.7(Microsoft 数据访问组件2.7)。

客户端只要是普通的浏览器即可，如Internet Explorer 5.0或更高版本。

第2章 可行性研究与需求分析

2.1　系统可行性研究

1．技术可行性

本系统采用ASP.NET作为前端开发工具，Access 2003建立后台数据库，ASP.NET是微软提出的．NET框架的一份，它是一种以.NET框架为基础开发网上应用程序的全新模式；Access 2003 界面友好，易操作适合于初学者开发系统。本人系统地学习过这些软件，能够胜任系统的开发工作。所以从技术角度讲本系统是可行的。

2．经济可行性

本系统客户端只需要一台电脑和一台打印机。系统在学校的机房完成，机房的机器安装了本系统开发涉及到的所有软件，自己只需要准备一张U盘即可。在开发中不需要投入很多资金。开发出的系统可以为学校节省不少额外的开资。所以从经济角度讲本系统是可行的。

3．操作可行性

本系统操作简单，界面友好，易于维护，与数据库实现了良好的连接。方便用户进行操作，系统的菜单都以相应的功能命名。界面进行了PS处理，操作都有相应的提示，非常人性化。用户可以在短期内完全掌握其使用方法和技巧。所以从操作角度讲本系统是可行的。

2.2　需求分析

目前，很多高校的宿舍还是由人工来进行管理，面对目前高校发展的实际状况，人工进行宿舍管理不但工作量大，效率低，而且很容易出错。本人通过考察和调研后，确定了宿舍管理系统所要解决的问题有：

1．系统要求具有登录验证功能，必须输入正确的用户名和密码才能进入系统；

2．系统应该实现学生住宿信息的添加、查询等操作；

3．系统应该实现学生注册信息的添加、查询等操作；

4．系统应该实现宿舍卫生检查和星级评比信息的添加、查询等操作；

5．系统应该实现访客信息的添加、查询等操作；

6．系统应该实现学生财产信息的添加、查询等操作；

7．系统应该实现学生违规的登记和查询等操作；

8．系统应该实现学生基本信息及楼房信息的添加和查询功能；

9．系统应该实现用户信息的添加、删除和修改操作；

10. 系统应该实现学生信息、员工信息、交费信息和住宿信息的打印；

11．系统要求做到界面友好、操作简单。

第3章 系统概要设计

3.1　系统功能模块

图3-1 系统功能模块图

3.1.1　系统管理模块

系统管理模块包括信息修改和通知发布，其中信息修改又包括学生信息修改和用户信息修改。信息修改功能实现学生基本信息修改和用户信息修改，通知发布实现在线信息发布。

3.1.2　公寓管理模块

公寓管理模块包括宿舍管理、卫生管理和财产管理。其中卫生管理包括宿舍卫生检查和宿舍星级评比。宿舍管理实现住宿信息的添加和修改，卫生管理实现卫生检查和星级宿舍评比信息的添加和查询，财产管理实现楼内物品信息的添加和查询。

3.1.3　学生管理模块

学生管理模块包括：请假管理、访客管理、住宿管理和违规管理。请假管理实现学生请假信息的添加、修改和查询，访客管理实现访客信息的添加和查询，住宿管理实现学生住宿信息的添加、修改和查询，违规管理实现学生违规信息的添加、修改和查询。

3.1.4　注册管理模块

注册管理模块包括学生注册和员工注册。学生注册实现学生交费信息的添加和查询，员工注册实现员工信息的添加和查询。

3.1.5　报表打印模块

报表打印模块实现学生信息打印、员工信息打印、交费信息打印和住宿信息打印。

3.2　数据库设计

本次设计选择Access 2003建立后台数据库。数据库设计是指对一个给定的应用环境，构造数据库模式，建立数据库及其应用系统，满足各种用户需求。作为信息资源开发、管理和服务的一种有效的手段，数据库技术的应用已越来越广泛，从小型的单项事务处理系统到大型的信息系统大都用先进的数据库技术来保持系统数据的安全性、完整性和共享性。对一个实际的系统来说，数据库表的设计在遵循数据库理论的同时，必须能用开发工具来实现用户在各方面提出的功能要求。

3.2.1　数据库概念结构设计

在宿舍管理系统中，涉及到员工、楼房、寝室、学生、访客等实体。宿舍管理所对应的全局E-R图如图3-2。

3.2.2　数据逻辑结构设计

数据库的逻辑数据模型又称为数据库的结构数据模型，或直接简称为数据模型(data model),相继出现有层次模型，网状模型，关系模型和对象这4种主要模型。本设计采用了关系模型，关系模型是一种简单的二维表格结构，概念模型中的每个实体和实体之间的联系都可以直接转换为对应的二维表形式。

根据在数据库概念设计中给出的数据库实体E-R图，设计出本系统的关系模式如下：

1．用户(用户名，用户密码，性别，年龄，注册类型，家庭住址，联系电话，注册日期)；

2．学生(学号，姓名，性别，宿舍号，入学日期，出生日期，所学专业，班级，班任，政治面貌，家庭住址，联系方式)；

3．员工(员工号，姓名，年龄，性别，楼房号，职位，家庭住址，联系方式)；

4．楼房(楼房号，房间数，应住人数，实住人数，负责人)；

5．宿舍(宿舍号，楼房号，居住性别，应住人数，实住人数，桌子，窗帘，柜子，拖布，舍长)；

6．学生注册(学号，宿舍号，注册日期，所交费用，交费情况，所交年度)；

7．住宿安排(学号，宿舍号，床号，柜子号，凳子，钥匙，被子，个人财产，押金)；

8．访客(来访人姓名，被访人姓名，所属关系，宿舍号，来访时间，离开时间，值班人，证件类型，备注)；

9．卫生检查(宿舍号，检查人，日期，卫生状态，备注)；

10．请假(学号，员工号，请假日期，天数，联系方式)；

11．违规(学号，员工号，违规内容，时间)。

3.2.3　数据表的建立

数据表是数据库中一个非常重要的对象，是其他对象的基础。没有数据表，关键字、主键、索引等也就无从谈起。在数据库画板中可以显示数据库中的所有数据表（即使不是用PowerBuilder创建的表），创建数据表，修改表的定义等数据表是数据库中一个非常重要的对象，是其他对象的基础。数据表(或称表)是数据库最重要的组成部分之一。数据库只是一个框架，数据表才是其实质内容，各自独立的数据表通过建立关系被联接起来，成为可以交叉查阅、一目了然的数据库。

表3-1 用户注册表

表3-2 楼房表

表3-3 宿舍表

表3-4 学生基本情况表

表3-5 员工表

表3-6学生注册表

表3-7住宿表

表3-8访客表

表3-9卫生情况表

表3-10 请假表

表3-11违规表

第4章 系统实现

本系统包括的功能模块有系统管理模块、公寓管理模块、学生管理模块、注册管理模块、报表打印模块。只以系统管理模块、公寓管理模块、学生管理模块以及报表打印模块作为代表进行介绍。

4.1　系统登录模块

本页面可以实现登录身份的验证。如果用户输入的用户名和密码有误，立即会出现“您的用户名或密码不正确”的提示。当前页面还具有用户注册和密码查询功能。登录界面如图4-1。

图4-1 宿舍管理登录界面

【登录】按钮的Click事件代码如下：

Imports System.Data

Imports System.Data.OleDb

Partial Class _Default

Inherits System.Web.UI.Page

Protected Sub Button1_Click(ByVal sender As Object, ByVal e As System.EventArgs) Handles Button1.Click

If Rad登录类型.Text = "值班人员" Then

Dim conn As OleDbConnection

conn = New OleDbConnection

Dim cmd As New OleDbCommand

conn.ConnectionString = " provider =microsoft.jet.oledb.4.0;data source=" & Server.MapPath("宿舍数据库.mdb")

conn.Open()

cmd.CommandText = "select 用户名,用户密码 from 用户注册表 where 用户名= '" & Text用户名.Text & " ' and 用户密码= '" & Text密码.Text & "' and 注册类型= '" & Rad登录类型.Text & "'"

cmd.Connection = conn

Dim dr As OleDbDataReader

dr = cmd.ExecuteReader

If dr.Read Then

Response.Redirect("值班.aspx")

Else

Response.Write("您的用户名和密码不正确")

End If

conn.Close()

Else

Dim conn As OleDbConnection

conn = New OleDbConnection

Dim cmd As New OleDbCommand

conn.ConnectionString = " provider =microsoft.jet.oledb.4.0;data source=" & Server.MapPath("宿舍数据库.mdb")

conn.Open()

cmd.CommandText = "select 用户名,用户密码 from 用户注册表 where 用户名='" & Text用户名.Text & " ' and 用户密码= '" & Text密码.Text & " ' and 注册类型= '" & Rad登录类型.Text & "'"

cmd.Connection = conn

Dim dr As OleDbDataReader

dr = cmd.ExecuteReader

If dr.Read Then

Response.Redirect("管理界面.aspx")

Else

Response.Write("您的用户名和密码不正确，请重新输入")

End If

conn.Close()

End If

End Sub

End Class

4.2　系统管理模块

系统管理模块进行学生基本信息、用户信息修改和通知发布。仅以学生信息修改为代表加以介绍。学生信息修改界面如图4-2，通过下拉列表框可以进行查询条件的选择。

1．学生信息修改

图4-2 学生信息修改界面

【更新】按钮的Click事件代码如下：

Imports System.Data

Imports System.Data.OleDb

Partial Class 信息修改

Inherits System.Web.UI.Page

***实现数据更新***

Protected Sub dg1_UpdateCommand(ByVal source As Object, ByVal e As System.Web.UI.WebControls.DataGridCommandEventArgs) Handles dg1.UpdateCommand

Dim t1, t2, t3, t4, t5, t6, t7, t8, t9, t10, t11 As New TextBox

t1 = e.Item.Cells(3).Controls(0)

t2 = e.Item.Cells(4).Controls(0)

t3 = e.Item.Cells(5).Controls(0)

t4 = e.Item.Cells(6).Controls(0)

t5 = e.Item.Cells(7).Controls(0)

t6 = e.Item.Cells(8).Controls(0)

t7 = e.Item.Cells(9).Controls(0)

t8 = e.Item.Cells(10).Controls(0)

t9 = e.Item.Cells(11).Controls(0)

t10 = e.Item.Cells(12).Controls(0)

t11 = e.Item.Cells(13).Controls(0)

Dim conn As New OleDbConnection("provider=microsoft.jet.oledb.4.0;data source=" & Server.MapPath("宿舍数据库.mdb"))

Dim cmd As New OleDbCommand

cmd.Connection = conn

cmd.CommandText = "update 学生基本情况表 set 姓名='" & t1.Text & "',性别='" & t2.Text & "',寝室号='" & t3.Text & "', 入学日期='" & CDate(t4.Text) & "', 出生日期='" & CDate(t5.Text) & " ', 所学专业='" & t6.Text & "' ,班级='" & t7.Text & "',政治面貌='" & t8.Text & "' ,家庭住址='" & t9.Text & "',联系方式='" & t10.Text & "' ,备注='" & t11.Text & "' where 学号='" & dg1.DataKeys(e.Item.ItemIndex) & "' "

conn.Open()

cmd.ExecuteNonQuery()

conn.Close()

dg1.EditItemIndex = -1

Call binddata()

End Sub

End Class

4.3　公寓管理模块

公寓管理模块包括宿舍管理、卫生管理和财产管理功能。仅以宿舍管理和卫生管理为代表加以说明。

4.3.1　宿舍管理

宿舍管理又包括宿舍信息添加，更新，查询。下面仅以宿舍信息添加为例进行说明。宿舍信息添加界面如图4-3。

图4-3 宿舍信息添加界面

【提交】按钮的Click事件代码如下：

Imports System.Data

Imports System.Data.OleDb

Partial Class 楼房表

Inherits System.Web.UI.Page

***实现楼房信息添加***

Protected Sub Button1_Click(ByVal sender As Object, ByVal e As System.EventArgs) Handles Button1.Click

Dim conn As OleDbConnection

conn = New OleDbConnection

Dim cmd As New OleDbCommand

conn.ConnectionString = "provider=microsoft.jet.oledb.4.0;data source=" & Server.MapPath("宿舍数据库.mdb")

conn.Open()

cmd.CommandText = "insert into 楼房表(楼房号,房间数,房间号,应住人数,备注) values('" & Tex楼房号.Text & " ','" & Tex房间数.Text & "','" & Tex房间号.Text & "','" & Tex应住人数.Text & "','" & Tex备注.Text & "')"

cmd.Connection = conn

cmd.ExecuteNonQuery()

conn.Close()

End Sub

***实现楼房信息查询并与datagrid绑定***

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

Dim conn As New OleDbConnection

Dim cmd As New OleDbCommand

Dim DaAp As New OleDbDataAdapter

Dim Ds As New DataSet

conn.ConnectionString = "provider=microsoft.jet.oledb.4.0;data source=" & Server.MapPath("宿舍数据库.mdb")

cmd.Connection = conn

cmd.CommandText = "select * from 楼房表"

DaAp.SelectCommand = cmd

DaAp.Fill(Ds, "楼房号")

dg1.DataSource = Ds.Tables(0)

dg1.DataBind()

conn.Close()

End Sub

End Class

4.3.2　卫生管理

卫生管理包括宿舍卫生检查和宿舍星级评比。仅以卫生检查为代表加以说明，卫生检查主要是记录每天每个宿舍的卫生情况，以方便为学生创造一个良好的学习环境卫生管理界面如图4-4。。

图4-4 卫生检查界面

【提交】按钮的Click事件代码如下：

Protected Sub Butt添加_Click(ByVal sender As Object, ByVal e As System.EventArgs) Handles Butt添加.Click

Dim conn As New OleDbConnection("provider=Microsoft.Jet.OLedb.4.0;data source=" & Server.MapPath("宿舍数据库.mdb"))

Dim strsql As String = "insert into 卫生情况(宿舍号,日期,卫生状况,备注,检查人) values('" & Tex宿舍号.Text & " ','" & Tex日期.Text & "','" & Tex卫生状况.Text & "','" & Tex备注1.Text & "','" & Tex检查人.Text & "')"

Dim cmd As New OleDbCommand(strsql, conn)

Dim dr As OleDbDataReader

conn.Open()

dr = cmd.ExecuteReader

conn.Close()

End Sub

4.4　学生管理模块

学生管理模块包括住宿管理、请假管理、访客管理和违规管理。

4.4.1　住宿管理

住宿管理主要实现学生住宿信息的添加和查询。学生住宿管理界面如图4-5。

图4-5学生住宿管理面界面

【提交】按钮的Click事件代码如下：

Imports System.Data

Imports System.Data.OleDb

Partial Class 住宿

Inherits System.Web.UI.Page

***实现学生安排住宿信息添加***

Protected Sub Button1_Click(ByVal sender As Object, ByVal e As System.EventArgs) Handles Button1.Click

Dim conn As New OleDbConnection("provider=Microsoft.Jet.OLedb.4.0;data source=" & Server.MapPath("宿舍数据库.mdb"))

Dim strsql As String = "insert into 住宿安排(学号,宿舍号,床号,柜子号,凳子,钥匙,被子,个人财产,押金) values('" & Text学号.Text & " ','" & Text宿舍号.Text & "','" & Text床号.Text & "','" & Text柜子号.Text & "','" & Text凳子.Text & "','" & Text钥匙.Text & " ','" & Text被子.Text & " ','" & Text个人财产.Text & " ','" & Text押金.Text & " ')"

Dim cmd As New OleDbCommand(strsql, conn)

Dim dr As OleDbDataReader

conn.Open()

dr = cmd.ExecuteReader

conn.Close()

message.Text = "欢迎入住本楼"

End Sub

***实现宿舍信息查询***

Protected Sub Button2_Click(ByVal sender As Object, ByVal e As System.EventArgs) Handles Button2.Click

Dim conn As New OleDbConnection("provider=Microsoft.Jet.OLedb.4.0;data source=" & Server.MapPath("宿舍数据库.mdb"))

Dim strsql As String = "select * from 宿舍表 where 宿舍号= '" & Tex宿舍号.Text & " '"

Dim cmd As New OleDbCommand(strsql, conn)

Dim dr As OleDbDataReader

conn.Open()

dr = cmd.ExecuteReader

dg2.DataSource = dr

dg2.DataBind()

conn.Close()

End Sub

End Class

4.4.2　请假管理

请假管理主要实现学生请假登记、查询以及续假。学生请假管理界面如图4-6。

图4-6 请假管理界面

【提交】按钮的Click事件代码如下：

Imports System.Data

Imports System.Data.OleDb

Partial Class 请假

Inherits System.Web.UI.Page

Protected Sub Button4_Click(ByVal sender As Object, ByVal e As System.EventArgs) Handles Button4.Click

Dim conn As New OleDbConnection("provider=Microsoft.Jet.OLedb.4.0;data source=" & Server.MapPath("宿舍数据库.mdb"))

Dim strsql As String = "insert into 请假(学号,姓名,请假日期,天数,联系方式) values('" & Tex学号.Text & " ','" & Tex姓名.Text & "','" & Tex请假日期.Text & "','" & Tex天数.Text & "','" & Tex联系方式.Text & "')"

Dim cmd As New OleDbCommand(strsql, conn)

Dim dr As OleDbDataReader

conn.Open()

dr = cmd.ExecuteReader

conn.Close()

Lab显示.Text = "操作成功"

End Sub

Protected Sub Button6_Click(ByVal sender As Object, ByVal e As System.EventArgs) Handles Button6.Click

If Tex请假天数.Text <= DateDiff("d", Tex日期.Text, Today()) Then

Dim conn As New OleDbConnection("provider=Microsoft.Jet.OLedb.4.0;data source=" & Server.MapPath("宿舍数据库.mdb"))

Dim strsql As String = "select * from 请假"

Dim cmd As New OleDbCommand(strsql, conn)

Dim dr As OleDbDataReader

conn.Open()

Lab.Text = "请假到期的人员："

dr = cmd.ExecuteReader

Dg1.DataSource = dr

Dg1.DataBind()

conn.Close()

End If

End Sub

Protected Sub Button3_Click(ByVal sender As Object, ByVal e As System.EventArgs) Handles Button3.Click

Dim conn As New OleDbConnection("provider=Microsoft.Jet.OLedb.4.0;data source=" & Server.MapPath("宿舍数据库.mdb"))

Dim strsql As String = "update 请假 set 天数=请假.天数+ cint('" & Tex增加天数.Text & "') where 姓名='" & Tex姓名.Text & "'"

Dim cmd As New OleDbCommand(strsql, conn)

Dim dr As OleDbDataReader

conn.Open()

dr = cmd.ExecuteReader

Dg1.DataSource = dr

Dg1.DataBind()

conn.Close()

End Sub

End Class

4.4.3　访客管理

访客管理主要实现访客信息登记，加强学生住宿的安全系数。访客管理界面如图4-7。

图4-7访客管理界面

【提交】按钮的Click事件代码如下：

Imports System.Data

Imports System.Data.OleDb

Partial Class 人员来访表

Inherits System.Web.UI.Page

Protected Sub Button1_Click(ByVal sender As Object, ByVal e As System.EventArgs) Handles Button1.Click

Dim Ds As New DataSet

Dim DaAp As New OleDbDataAdapter

Dim conn As New OleDbConnection("provider=Microsoft.Jet.OLedb.4.0;data source=" & Server.MapPath("宿舍数据库.mdb"))

Dim strsql As String = "insert into 人员来访表(被访人姓名, 来访人姓名 ,所属关系,来访时间,离开时间,值班人,证件类型,备注) values('" & Tex被访人姓名.Text & " ','" & Tex来访人姓名.Text & "','" & Tex所属关系.Text & "','" & Tex宿舍号.Text & "','" & Tex来访时间.Text & "','" & Tex离开时间.Text & "', '" & Tex值班人.Text & "','" & Tex证件类型.Text & "','" & Tex备注.Text & "')"

Dim cmd As New OleDbCommand(strsql, conn)

Dim dr As OleDbDataReader

conn.Open()

dr = cmd.ExecuteReader

conn.Close()

lab.text = "记录成功"

End Sub

End Class

4.4.4　违规管理

违规管理实现学生违规的登记和查询等操作。违规界面如图4-8.

图4-8 违规管理界面

【提交】按钮的Click事件代码如下：

Imports System.Data

Imports System.Data.OleDb

Partial Class 违规

Inherits System.Web.UI.Page

Protected Sub Button1_Click(ByVal sender As Object, ByVal e As System.EventArgs) Handles Button1.Click

Dim Ds As New DataSet

Dim DaAp As New OleDbDataAdapter

Dim conn As New OleDbConnection("provider=Microsoft.Jet.OLedb.4.0;data source=" & Server.MapPath("宿舍数据库.mdb"))

Dim strsql As String = "insert into 违规(学号,员工号,违规内容,时间) values('" & Tex学号.Text & " ','" & Tex员工号.Text & "','" & Tex违规内容.Text & "','" & Tex时间.Text & "')"

Dim cmd As New OleDbCommand(strsql, conn)

Dim dr As OleDbDataReader

conn.Open()

dr = cmd.ExecuteReader

conn.Close()

End Sub

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

Dim conn As New OleDbConnection

Dim cmd As New OleDbCommand

Dim DaAp As New OleDbDataAdapter

Dim Ds As New DataSet

conn.ConnectionString = "provider=microsoft.jet.oledb.4.0;data source=" & Server.MapPath("宿舍数据库.mdb")

cmd.Connection = conn

cmd.CommandText = "select * from 违规"

DaAp.SelectCommand = cmd

DaAp.Fill(Ds, "姓名")

dg1.DataSource = Ds.Tables(0)

dg1.DataBind()

conn.Close()

End Sub

End Class

4.5　报表打印模块

本模块主要是对学生基本情况、员工信息、楼房信息、交费情况等信息进行打印，首先可按不同查询方式进行信息查询，其次进行页面设置，最后方可打印，报表打印界面如图4-9。

图4-9 报表打印界面

【确定】按钮的Click事件代码如下：

***实现页面设置、打印及打印预览功能***

页面设置 onclick=document.all.WebBrowser.ExecWB(8,1)>

打印 onclick=document.all.WebBrowser.ExecWB(6,1) id="Button1">

打印预览 onclick=document.all.WebBrowser.ExecWB(7,1)>

结论

几个月的毕业设计现在已经接近尾声了，回想这些日子，感觉收获颇多。本人这次毕业设计的任务是建立一个学生宿舍管理系统，它使用的开发工具是ASP.NET语言，数据库设计工具使用的是Access 2003。

在设计的开始阶段为了尽快熟悉ASP.NET语言，本文详细翻阅有关该方面的资料，对书中的基本理论知识逐章逐节地分析，同时还上机操作来加深理解。特别是对书中的一些典型实例，认真学习它的编程思想，吸取它的编程技巧，弄懂程序中每句话的含义。在对所要应用的技术有了一个基本认识之后，就开始构思自己的系统设计。认真听老师对设计要求的讲解，根据设计的要求将整个系统分为几个模块，每个模块具体又要实现哪些功能，然后就逐个模块去一一详细设计。设计的过程中不时地翻阅资料，用一些巧妙的技术来优化程序。

总之，通过几个月的毕业设计，本人感受了软件开发的整个过程。毕业设计不仅是对本人在大学所学知识的一个综合运用，也是一次增长知识和经验的好机会，同时也使本人学会了许多处理、解决问题的方法，大大提高了自己的动手能力，为即将走上工作岗位打下了良好的基础。

参考文献

[1] 张海藩．软件工程导论[M](第五版)．北京：清华大学出版社，2008．

[2] 徐孝凯．数据库基础与SQL Server 应用开发[M]．北京：清华大学出版社，2009．

[3] 德力，田文武．Visual Basic.NET程序开发设计[M]．大连：理工大学出版社，2008．

[4] 尚俊杰．ASP.NET程序设计[M]．北京：清华大学出版社，2004．

[5] 赵劼．ASP.NET MVC框架.MVC模式和ASP.NET MVC模式框架概述[EB/OL]．

http://www.microsoft.com/china/msdn/events/webcasts/shared /Series/MVC.aspx

[6] 沈才梁，李志奎．ASP网页设计[M]．北京：交通大学出版社，2006．

[7] 訾秀玲．Access 2003 数据库技术及应用教程[M]．北京：清华大学出版社 ，2007．　

[8] 马素霞，王素琴.需求分析与系统设计[M]．北京：机械工业出版社，2009．

[9] 房大伟，吕双．ASP.NET开发实战1200例（第一卷）[M]．北京：清华大学出版社，2011．

[10] 宋丽华．数据库设计解决方案入门经典[M]．北京：清华大学出版社，2010．

致谢

转眼间, 几个月的毕业设计就要结束了。这次能够完成毕业设计，除了我自己的努力外，老师和同学们也给予了我非常大的帮助。感谢我的指导老师凃云杰老师，在整个毕业设计过程中，凃云杰老师给了我许多宝贵的意见和指导。感谢周围的同学给予的帮助，在该系统的完成过程中，他们给我提供了很多帮助。感谢机房的老师，她们给我提供了一个良好的学习环境。

总之，在他们尽心尽力的帮助下，我的毕业设计得以如期顺利完成，在此，真诚地向他们说一声“谢谢”!

学生宿舍管理系统