汽车销售管理系统报告.docx

齐齐哈尔大学
数据库课程设计报告

题目：　汽车销售管理系统　　

班级：　计本062　　　　　　

姓名：　邓 丽 清　　　　　　

学号：　2006021011　　　　　

指导教师：　潘 海 珠　　　　

2009年 6 月 24 日

数据库课程设计评分表
班级
计本062
姓名
邓丽清
指导教师
潘海珠
题目：汽车销售管理系统
评分标准
评分标准
分数权重
评分的依据
得分
A
C
选题
10
选题符合大纲要求，题目较新颖，工作量大
选题基本符合大纲要求，工作量适中

工作态度
10
态度端正，能主动认真完成各个环节的工作，不迟到早退，出勤好。
能够完成各环节基本工作，出勤较好。

数据库设计
20
能正确绘制总体E-R图，定义表结构准确，约束信息完备，对关系的规范化完全符合大纲要求
能基本正确绘制E-R图，定义表结构基本准确，对关系的规范化基本符合大纲要求

独立解决问题的能力
10
具有独立分析、解决问题能力，有一定的创造性，能够独立完成数据库及相关软件的设计与调试工作，程序结构合理，逻辑严谨，功能完善。
有一定的分析、解决问题能力。能够在老师指导下完成软件的设计与调试工作，程序功能较完善。

答辨问题回答
20
能准确回答老师提出的问题
能基本准确回答老师提出的问题

程序运行情况
10
程序运行正确、界面清晰，测试数据设计合理。
程序运行正确、界面较清晰，能给出合适的测试数据。

课程设计论文
20
格式规范，层次清晰，设计思想明确，解决问题方法合理，体会深刻。
格式较规范，设计思想基本明确，解决问题方法较合理。

总分

指导教师（签字）：
注：介于A和C之间为B级，低于C为D级和E级。按各项指标打分后，总分在90～100为优，80～89为良，70～79为中，60～69为及格，60分以下为不及格。

目 录
一 概述 4
二 需求分析 4
三 数据库逻辑设计 6
四 结构设计 7
五 界面设计 8
六 结束语 15
参考文献 16

一 概述
1项目背景及其编写目的
汽车销售管理系统是典型的信息管理系统，其开发主要包括后台数据库的建立和维护，以及前端应用程序的开发两个方面。对于前者，要求建立起数据一致性和完整性强、数据安全性好的库。而对于后者，则要求应用程序具有完备、易使用等特点。
随着科学技术的不断提高，计算机科学日渐成熟，其强大的功能已被人们深刻认识。它已经进入人类社会的各个领域并发挥着越来越重要的作用。作为计算机应用的一部分，使用计算机对汽车销售信息进行管理，具有手工管理所无法比拟的优点。例如，检索迅速、查找方便、可靠性高、存储量大、保密性好、寿命长、成本低等。这些优点能够极大的提高汽车销售管理的效率，也使得企业可以进行科学化、正规化管理，这是与世界接轨的重要条件。
2开发环境
操作系统：Windows XP
开发环境：Microsoft Visual Basic 6.0 + Microsoft Access 2000
二 需求分析
某汽车销售公司需要管理其各种信息，希望实现办公的信息化，通过建立一个汽车销售管理系统来管理企业。该系统完成的功能主要如下：
（1）能够实现对入库及销售信息的各种查询，包括逐个浏览，以及对入库及销售信息的增加、删除和编辑操作。另外，可以根据输入的信息来检索某辆车的信息。
（2）根据车辆信息进行汇总。
（3）管理人员也可以直接增加和删除用户信息。系统还可以提供一定的附加功能来方便用户。
系统的功能模块如图1.1所示。
按入库单+日期
汽车销售管理系统
系统管理
入库管理
销售管理
查询管理
车辆汇总
增加新用户
退出系统
修改密码
按入库单
按日期汇总
按供应商汇总
图1.1 系统的功能模块图

根据功能模块图设计规划出的实体有入库管理、车辆资料、销售管理。各个实体具体的描述如下图所示。
库存位号
入库管理实体
备注
日期
车辆名称
入库单号
经手人
图1.2 入库管理实体E-R图

库存位号
销售管理实体
备注
出库日期
车辆名称
提货单号
经手人
图1.3 销售管理实体E-R图

车辆资料实体
金额
日期
车辆名称
数量
单价
图1.2 车辆资料实体E-R图
入库单号
供应商名称

三 数据库逻辑设计
数据库设计是指对于一个给定的应用环境，构造最优的数据库模式，建立数据库模式，建立数据库及其应用系统，有效存储数据，满足用户信息要求和处理要求。这里的数据库采用Access，用ADO作为连接数据对象。
建立一个空的数据库carshale.mdb后，建立系统需要的表，具体有：车辆名称表、车辆资料表、入库单表、供应商名称表、系统管理表、销售单表。
各表间的关系如图1.3所示：

图1.3 各表间的关系

连接数据库，需要先在VB中添加ADO库。在VB中选择“工程”à“引用”命令，在对话框中选择Microsoft ActiveX Data Objects 2.0 Library。在程序设计模块中，定义ADO连接对象。语句如下：
Public conn As New ADODB.Connection '标记连接对象
在子程序中，打开数据库的语句：
Dim connectionstring As String
connectionstring = "provider=Microsoft.Jet.oledb.4.0;" & "data source=carshale.mdb"
conn.Open connectionstring

四 结构设计
根据需求，设计好数据库系统，然后通过不同的窗体来实现不同的功能，功能模块如下所示：
入库管理模块：用来实现对入库单的增加、删除和修改等操作。
销售管理模块：用来实现对销售单的增加、删除和修改等操作。
查询管理模块：用来实现对车辆的浏览和查询。
系统管理模块：用来实现对用户的增加、删除和修改等操作。
车辆汇总模块：根据实际情况查询相应的车辆信息。
五 界面设计
最终设计好的界面如图所示：

图1.4 汽车销售管理系统界面

这是一个多文档界面应用程序，可以同时显示多个文档，每个文档显示在各自的窗体中。菜单应用程序中，有5个菜单选项，每个选项对应着E-R图的一个子项目。
1用户登录
用户登录子窗体是运行的第一个界面。用户登录界面如图1.5所示。

图1.5 用户登录界面

它检查用户名和密码是否正确。由于用户资料是存放在数据库中，所以在启动该子窗体时，就已经连接了数据库。代码如下：
Private Sub Form_Load()
Dim connectionstring As String
connectionstring = "provider=Microsoft.Jet.oledb.4.0;" & "data source=carshale.mdb"
conn.Open connectionstring
cnt = 0
End Sub
“确定”按钮检查输入的数据是否和数据库中的数据一致。实现代码见源程序。
2入库管理
入库管理子窗体界面如图1.6所示。该窗体用来添加入库的信息，用ADO 来连接数据库，采用MDI 的子程序。载入窗体时，将自动加入车辆名称和日期信息。选择“确定”按钮要求先填写基本信息，然后与数据库信息比较。先定义几个变量：
Dim rs_checkname As New ADODB.Recordset '车辆名称对应的数据对象
Dim rs_custom As New ADODB.Recordset '供应商名称对应的数据对象
Const row_num = 10 '表格行数
Const col_num = 6 '表格列数
其他控制代码见源程序。

图1.6 入库管理界面

3销售管理
销售管理子窗体界面如图1.7所示。该子窗体设计及代码均与入库管理相似。它是用来添加销售信息的，主要用ADO连接数据库。载入窗体时，将自动加入车辆名称和日期信息。选择“确定”按钮要求先填写基本信息，然后与数据库信息比较。选择“取消”按钮则卸载当前窗体。

图1.7 销售管理界面

4系统管理
系统管理菜单包括增加新用户、修改密码、退出系统。
4.1增加新用户
如图1.8所示。增加新用户子窗体是用来增加用户的用户名、密码和权限的。窗体收集输入的表中的字符串，然后与数据库中的系统的用户数据比较，如果不存在，则允许添加。单击“确定”后，返回一个信息框，提示成功信息，如图1.9所示。单击“取消”，则卸载当前界面。
返回成功信息对话框的代码如下：
MsgBox "添加用户成功", vbOKOnly + vbExclamation, ""
Unload Me
End If
对权限进行选择的代码如下：
Private Sub Form_Load()
Combo1.AddItem "system"
Combo1.AddItem "guest"
End Sub

图1.8 增加新用户界面

图1.9 成功信息框

4.2修改密码
修改密码子窗体如图1.10所示。该子窗体用来修改用户密码。“确定”按钮的代码如下所示：
Private Sub Command1_Click()
Dim rs_chang As New ADODB.Recordset
Dim sql As String
If Trim(Text1.Text) <> Trim(Text2.Text) Then
MsgBox "密码不一致！", vbOKOnly + vbExclamation, ""
Text1.SetFocus
Text1.Text = ""
Text2.Text = ""
Else
sql = "select * from 系统管理 where 用户名='" & userID & "'"
rs_chang.Open sql, conn, adOpenKeyset, adLockPessimistic
rs_chang.Fields(1) = Text1.Text
rs_chang.Update
rs_chang.Close
MsgBox "密码修改成功", vbOKOnly + vbExclamation, ""
Unload Me
End If
End Sub
首先比较两个表中的数据是否一致，然后用rs_chang.fields(1)=text1.text 语句把代码输入到数据库中。最后，用MsgBox "密码修改成功", vbOKOnly + vbExclamation, ""语句弹出一个信息框，提示修改成功。

图1.10 修改密码界面

4.3退出系统
退出系统则直接使用unload me即可。代码如下：
Private Sub exit_Click()
Unload Me
End Sub
5查询管理
查询子窗体是用来查询库存资料中的详细情况，其界面如图1.11所示。

图1.11 查询输出界面

在选择列表框中给出入库单号或年月日后，“查询”按钮的click 事件将给出与数据库查找比较的结果。运行查询子窗体时，组合框中就已经从数据库中提取了货单号和年月日两个待查条件。查询完毕后，输出查询结果。
部分代码如下：
Option1.Value = True
If findok = True Then
rs_data1.Close
End If
sql = "select * from 入库单 order by 入库单号 desc"
rs_find.CursorLocation = adUseClient
rs_find.Open sql, conn, adOpenKeyset, adLockPessimistic
If rs_find.EOF = False Then '添加编号
With rs_find
Do While Not .EOF
Combo1(0).AddItem .Fields(0)
Combo1(1).AddItem .Fields(0)
.MoveNext
Loop
End With
End If
6车辆汇总管理
车辆汇总是按一定的类别，把车辆汇总列表。运行的车辆汇总子窗体如图1.12所示。

图1.12 车辆汇总界面

车辆汇总子窗体是由选择响应“车辆汇总”命令出现的窗体，在主窗体中，“车辆汇总”菜单共有四个选项，分别是按日期汇总、按供应商汇总、按入库单汇总、按入库单+日期汇总。所以，窗体对应这4个部分的代码。
六 结束语
在软件设计完成后，如何使用户快速的了解本系统，这就取决于系统主要设计的说明设计的好坏，所以应该从用户的角度来设计设计说明，使用户对于系统有个初步的了解。
　 经过一段时间的制作，完成了汽车销售管理系统。该系统可以使操作员进行一般的操作，如：查询入库信息、销售信息，根据输入的信息来检索某辆车的信息，根据车辆信息进行汇总，直接增加和删除用户信息。
这次课程设计，使我受到了一次用专业知识、专业分析和解决问题的全面系统的锻炼。使我在综合知识的选用方面，在应用软件开发的基本思想、方法方面，以及在常用编程设计思路技巧的掌握方面都能迈进了一大步。
由于本人的水平和经验限制了系统的功能，一些销售管理应有的功能暂时无法实现，需要更加完善。相信在这之后我会对销售管理系统有进一步的学习和研究，使系统变得更完善。
参考文献
[1] 单建魁,赵启升.数据库系统实验指导.清华大学出版社,2004.12
[2] 龚沛曾,陆慰民,杨志强.Visual Basic 程序设计简明教程.高等教育出版社,2003
[3] 刘文涛.数据库开发与实例.清华大学出版社,2006.7
[4] G.V.Post . 数据库管理系统(英文版) .机械工业出版社，2006:89-156
[5] Hector Garcia-Molina Jeffrey D.Ullman Jennifer Widom.数据库系统实现(英文版)/经典原版书库.机械工业出版社，2005:157-239