基于C／S结构的管理系统的设计与实现

基于C/S结构的管理系统的设计与实现

[摘要]本文针对管理系统项目的特点，设计并实现了以Visual Basic 6.0为前台SQL Server 2008为后台的基于Client/Server结构的学生管理系统。本系统的设计初衷来源于设计校内的《Visual Basic 6.0 + SQL Server 2008项目教学》课程的实例，在实际授课过程中通过实现实例中模块的功能，使学生更好的了解VB 和SQL Server的特性及结合方法，为学生完成毕业设计和毕业论文打下基础，为工作积累素材和经验。

【关键词】项目实训;Visual Basic;SQL Server;管理系统

1、问题的提出

随着计算机在各行各业的普及和应用，人们的日常办公学习都与管理系统密不可分。作为计算机软件专业的学生，能够掌握如何使用前台应用程序与后台数据库相结合的方法设计和实现管理系统软件已是必备的技能。本文以VB为前台设计界面软件，以SQL Server为后台数据库设计软件，在介绍VB与SQL Server 各自特性的同时，更着重讲述VB与SQL Server如何连接使用的实用方法。使用VB制作前台的管理系统比较易于掌握，可视化性能较强，并能生成.exe（可执行文件）或打包成安装软件，便于携带和演示，较适合高职院校学生学习和掌握，成就感较强。

2、管理系统的工作模式

实训所涉及的管理系统采用C/S（客户端/服务器端）体系结构，Client和Server常常分别处在相距很远的两台计算机上，Client程序的任务是将用户的要求提交给Server程序，再将Server程序返回的结果以特定的形式显示给用户；Server程序的任务是接收客户程序提出的服务请求，进行相应的处理，再将结果返回给客户程序。

C/S 结构的基本原则是将计算机应用任务分解成多个子任务，由多台计算机分工完成，即采用“功能分布”原则。客户端完成数据处理，数据表示以及用户接口功能；服务器端完成DBMS的核心功能。这种客户请求服务、服务器提供服务的处理方式是一种新型的计算机应用模式。学生管理系统的基本结构如图1所示：

3、系统功能和数据库设计

系统从管理和使用角度来讲，由两大部份组成：学生使用界面部分和管理员管理界面部分。系统前台界面由VB独立创建完成，后台数据库有SQL Server 独立创建完成。应用时用户可使用开发者提供的.exe文件执行程序，或使用开发者提供的打包安装文件安装完毕后执行程序。

实现系统的主要功能模块如下：

(1)登录模块：通过输入用户名和密码以及选择登录权限进入功能界面。

(2)学生管理：在显示学生信息的基础上，系统为用户提供了查询、修改、添加、删除学生信息的相关操作。该模块功能的适用对象为管理员。

(3)课程管理：在显示课程信息的基础上，系统为用户提供了查询、修改、添加、删除课程信息的相关操作。该模块功能的适用对象为管理员。

(4)学生查询：管理员权限下，在窗体上显示所有学生信息，并能够提供根据学号查询相关学生信息的操作。学生权限下，仅提供学生使用自己学号和密码登陆的学生信息。

(5)课程查询：管理员权限下，在窗体上显示所有课程信息，并能够提供根据课程号查询相关学生信息的操作。学生权限下，仅提供学生使用自己学号和密码登陆的课程信息。

学生管理系统主要功能为登陆及查询，这些功能的实现与数据库及T-SQL 语言密不可分。在实现系统功能代码之前，务必设计和实现好系统所需要的数据库、数据表、约束、索引、视图、存储过程、函数及触发器。以下为学生管理系统后台“学生管理数据库”的数据表设计：

(1)学生信息表：学号（nvarchar(6),not null,PK）,姓名（nvarchar(6),not null）,班级（nvarchar(10),null）,e-mail(nvarchar(20),null)，密码（char（6），not null）。

(2)课程信息表：课程编号（nvarchar(4),not null PK）,课程名称(nvarchar(10),not null)。

(3)选课信息表：学号（nvarchar(6),not null,PK/FK），课程编号（nvarchar(4),not null PK/FK）,成绩（decimal(5,1)，null）。

(4)管理员表：账户名（nvarchar(8),not null,PK）,密码（char(6),not null）。

4、系统功能实现

根据系统设计思路将系统前台界面及后台数据库设计和创建好之后，系统功能的实现需要在VB中通过设置控件属性，编写按钮、菜单及控件代码来实现。以下以登录模块为例，阐述登录界面的前台设计及登录按钮访问后台数据库实现的登录功能。

(1)登录界面控件及属性设置如图2：

(2) 登录界面中代码实现如下：

Private SqlCon As New ADODB.Connection

Private SqlRes As New ADODB.Recordset

Private SqlCmd As New mand

Public loginname As String ‘定义Public变量loginname,在窗体间传值

----------------------------------------------------------------------------------------------------------------------

Private Sub exit_button_Click()

End

End Sub

----------------------------------------------------------------------------------------------------------------------Private Sub Form_Load()

Adodc1.Visible = False

SqlCon.Provider = “SQLOLEDB”

SqlCon.Open “Provider=SQ LOLEDB.1;Integrated Security=SSPI;Persist Security Info=False;User ID=sa;Initial Catalog=MBOOK;Data Source=YE”

SqlCmd.ActiveConnection = SqlCon

End Sub

----------------------------------------------------------------------------------------------------------------------

Private Sub Form_Unload(Cancel As Integer)

SqlCon.Close

End Sub