车辆信息管理系统.docx
《车辆信息管理系统.docx》由会员分享，可在线阅读，更多相关《车辆信息管理系统.docx（20页珍藏版）》请在冰豆网上搜索。
车辆信息管理系统
数据库原理及应用
课程设计
设计题目：
班
级:
姓
名:
学
号:
指导教师:
成
绩:
公司车队/辆信息管理系统
*************
*******
**********
*********
2014年5月
一、摘要2
二、需求分析2
1、课程设计任务2
2、功能描述3
三、概要设计3
1、功能模块图4
2、实体图5
3、数据项6
4、系统用户管理图7
5、数据流图8
四、调试测试9
1、数据库演示9
2、程序各功能演示10
五、代码（重要部分）14
1、登录15
2、车辆查询16
3、车辆信息管理17
4、删除用户18
5、添加用户20
一、摘要
本次课程设计报告主要论述了公司车队信息管理系统的分析、设计与开发,并在此基础上对其在Windows平台上的实现做了一定程度的研究。
公司车队信息管理系统是运用在公司部门的系统工具，方便公司车队管理部门工作人员的工作，该系统主要根据公司车队的特点建立的，主要是记录和查询驾驶员信息、机动车信息。
本次课程设计报告结合工程项目,具体论述了机动车驾驶员管理系统、机动车登记系统的需求分析,其中包括实体关系图、功能结构图以及数据流程图的分析和描述。
然后,报告着重讨论了车队驾驶员管理系统、车辆登记系统的数据库设计,文中详细论述了驾驶证管理系统数据库实现的各个步骤。
并讨论了车辆/驾驶员信息管理系统在J2EE平台上的具体实现及其部署。
最后，此报告对本
次系统开发中遇到的几个关键问题进行了详细的阐述。
包括驾驶证管理系统和机动车登记系统与其他系统的接口设计，IBMWebsphere应用服务器的安全策略及系统访问控制方法的实现，以及基于PC服务器平台windows操作系统上Access数据库的性能优化问题。
关键词：
公司车队信息管理系统、Access数据库、Java
需求分析
1、课程设计任务
出于经济方面的考虑，很多公司都会选择拥有自己的车队而不是租赁车辆。
因此，公司需要有效的管理车队尤其是规模较大的车队，车队信息管理系统就是
运用在公司的系统工具。
该系统是根据公司的特点建立的，主要是记录和查询驾
驶员信息、机动车信息。
早期的公司的车队信息主要是人工记录和人工管理的，不仅不容易记录，而且还不容易保存，耗时费力效果不佳。
随着市场经济的不断发展，交通道路环境的不断改善，人口流动量不断增加，
人们的出行愈加频繁，车站信息量迅猛增长，车辆方面的信息管理系统在人们的
日常生活中发挥着越来越重要的作用。
此次的车队信息管理系统实现了机动车辆驾驶员信息的管理，机动车信息的增加、删除、修改、查询，以满足人们的需求车队信息管理系统主要分为三大部分：
驾驶员信息管理、机动车信息管理和车辆信息查询
驾驶员信息管理：
此功能主要面向管理员。
管理员可以在驾驶员信息管理模块实现对驾驶员信息的管理。
管理员首先应该建立驾驶员信息数据库，输入原始的数据信息，当有新的驾驶员信息的时候或者管理员需要修改某个驾驶员的相关信息以及想要删除某个驾驶员信息的时候，就可以完成相应的操作。
管理员也可以在整个数据库中查寻相关驾驶员信息。
机动车信息管理：
此功能主要面向管理员。
管理员可以在机动车信息管理模块实现对机动车信息的管理。
管理员首先应该建立机动车信息数据库，输入原始的数据信息，当有新的机动车信息的时候或者管理员需要修改某个机动车的相关信息以及想以在整个数据库中查寻相关机动车信息。
车辆信息查询：
此功能面向公司所有职员。
公司职员可以查询公司车队中的车辆信息，以用于预订车辆进行商务活动。
2、功能描述程序分为登陆界面，选择界面，线路信息界面，机动车辆信息界面，车票信息这几个主体界面。
使用时应先知道管理员帐号和密码，登陆进入系统主菜单界面，里面包括汽车信息、退出程序菜单选项，所需时间等。
可以对它们进行添加查询，删除。
需要特别说明的是，当对数据进行操作时，在查询框内输入提示数据内容，对话框的表中和提示栏中都会出现所查询的数据，我们可以在提示栏中对数据进行删除和修改操作。
在Java中利用ODBC?
问技术操作数据库，建立到数据库中的映射类，在对话框类中通过引用映射类完成对数据库的操作。
三、概要设计
1、功能模块图
车队信息管理系统
2、实体图
3、数据项
表1：
高级用户数据表
属性名
存储代码
类型
长度
备注
用户编号
用户编号
char
10
用户编号
用户姓名
用户姓名
varchar
20
用户登录名
密码
密码
varchar
5
登录密码—
用户等级
用户等级
char
5
登陆者等级
表2:
普通用户数据表
属性名
存储代码
类型
长度
备注
用户编号
用户编号
char
10
用户编号
用户姓名
用户姓名
varchar
20
用户登录名
密码
密码
varchar
5
登录密码:
用户登记
用户等级
char
5
登陆者等级
表3:
驾驶员数据表
属性名
存储代码
类型
长度
备注
姓名
姓名
char
20
车主姓名
车牌
车牌号码
varchar
10
车辆牌号
性别
车主性别
char
5
车主性别「
籍贯
籍贯
char
10
车主籍贯
表4:
车辆数据表
属性名
存储代码
类型
长度
备注
车牌
车牌
char
10
车辆牌号
车主
车主
varchar
20
车辆型号
车型
车型
char
5
驾驶员
车色
车色
char
5
车辆颜色
发动机号
发动机
char
3
车辆购买时间
装载人数
装载人数
int
载人数
表5:
车辆情况数据表
属性名
存储代码
类型
长度
备注
车牌
车牌
char
10
车辆牌号
车主
车主
varchar
20
车主姓名
外出时间
车辆外出时间
datetime
车辆外出时间
回归时间
车辆回归时间
datetime
车辆回归时间
4、系统用户管理图
5、数据流图
四、调试测试
（1）、数据库演示
车牌
车主
车型
车色
发动机号
S&-1L2233
李四
商务车
黑
1
^D-123456
商务车
黑
1
苏E-000000
Zoe
商务车
银
2
苏K-654321
王光松
商务车
黒
1
►*f^JLL
NULL
NULL
AL4Z
i^JLL
姓名
车牌
性别
藉贯
备注
卜
李四
^0-112233
JS
江苏无揚
空闲
苏K七討32L
男
江苏扬州
外出
苏D-123斗站
男
江苏窗江
空闲
峯
NULL
NULL
NULL
NLAL
NULL
（2）程序各模块演示
可
取消
jnlM
您是普逋级用户“无迭时善统进行修改
盟车主童询
请输入您要查询的车主姓名
查询返回
五、代码（重要部分）
1、登录
PublicClass登陆
DimsAsInteger=3
DimsqlstrAsString
PrivateSubButton2_Click（ByVaisenderAsSystem.Object,ByVaieAsSystem.EventArgs）HandlesButton2.Click
IfMessageBox.Show（”你确定是否退出登录界面？
","提示",MessageBoxButtons.YesNo,
MessageBoxIcon.Question）=Windows.Forms.DialogResult.YesThen
End
EndIf
EndSub
PrivateSubButton1_Click（ByValsenderAsSystem.Object,ByValeAsSystem.EventArgs）HandlesButtonl.Click
TextBox1.Focus（）
IfTextBoxl.Text<>""AndTextBox2.Text=""Then
MessageBox.Show（”密码不能为空！
","提示"）
ElselfTextBoxl.Text=""AndTextBox2.Text<>""Then
MessageBox.Show（”用户名不能为空！
","提示"）
ElselfTextBoxl.Text=""AndTextBox2.Text=""Then
MessageBox.Show（”用户名和密码不能为空！
","提示"）
Else
CallDBopen（）
sqlstr="Select*From高级用户登陆表Where姓名='"&TextBox1.Text&"'And密码='"&TextBox2.Text&"'"
DimsqlcmdAsSqlClient.SqlCommand=NewSqlClient.SqlCommand（sqlstr,conn）
DimdrAsSqlClient.SqlDataReader
dr=sqlcmd.ExecuteReader
Ifdr.Read=TrueThen
dr.Close（）
登录提示.Show（）
TextBox1.Text=""
TextBox2.Text=""
Me.Visible=False
CallDBclose（）
Else
CallDBopen（）
sqlstr="Select*From普通用户登陆表Where姓名='"&TextBox1.Text&"'And密码='"&TextBox2.Text&"'"
Dimsqlcmd1AsSqlClient.SqlCommand=NewSqlClient.SqlCommand（sqlstr,conn）
Dimdr1AsSqlClient.SqlDataReader
dr1=sqlcmd1.ExecuteReader
Ifdr1.Read=TrueThen
登录提示.Show（）
TextBox1.Text=""
TextBox2.Text=""
Me.Visible=False
dr1.Close（）
CallDBclose（）
ElseIfs<>0ThenMessageBox.Show（"输入信息有误！
","提示",MessageBoxButtons.OKCancel,
MessageBoxIcon.Information）
TextBox1.Text=""
TextBox2.Text=""
Else
IfMessageBox.Show（"用户和密码输入错误次数过多！
","提示"）=Windows.Form
升级会员 