车辆管理信息系统的分析与设计.docx

车辆管理信息系统的分析与设计.docx

《车辆管理信息系统的分析与设计.docx》由会员分享，可在线阅读，更多相关《车辆管理信息系统的分析与设计.docx（23页珍藏版）》请在冰豆网上搜索。

车辆管理信息系统的分析与设计

车辆管理信息系统的分析与设计

1概述………………………………………………………………………………1

2系统分析……………………………………………………………………….。

2

2.1系统目标需求……………………………………………………………。

。

..。

2

2。

2组织结构与功能结构分析………………………………………………。

3

2.3业务流程分析………………………………………………………………。

3

2。

4数据流程…………………………………………………………………….。

5

2。

5数据字典……………………………………………………………………。

.5

3系统设计……………………………………………………………………….。

8

3.1总体设计……………………………………………………………………..。

。

8

3。

1。

1总体平台设计………………………………………………………..。

。

.8

3。

1.2总体功能设计……………………………………………………….。

...8

3。

1。

2。

1功能结构设计…………………………。

……………………。

9

3。

1.1。

2功能模块设计………………………………………………...。

12

3。

2详细设计………………………………………………………………。

..。

12

3。

2。

1代码设计…………………………………………………。

。

12

3.2。

2输入输出设计……………………………………………..。

13

3.2.3数据库设计……………………………………………..。

.16

3.2.4系统安全设计…………………………………………….。

16

1概述

车辆管理系统用计算机管理机动车辆的档案，运营管理以及驾驶员信息的一种计算机应用技术的创新,在计算机还未普及之前车辆管理都是有工作人员手抄写的方式来操作的.现在一般的车辆管理都是采用计算机作为工具的实用的计算机智能化车辆管理程序来帮助工作人员进行更有效的机动车辆管理。

车辆管理系统是典型的信息管理系统（MIS）,其开发主要包括后台数据库的建立和维护以及前端应用程序的开发两个方面。

对于前者要建立起数据一致性和完整性强、数据安全性好的库。

而对于后者则要求应用程序功能完备，易使用等特点。

2系统分析

2。

1系统目标需求

本系统是根据中小企业的实际需要而开发的，完全能够实现企业对客户的自动化管理，通过本系统可以达到以下目标。

（1）系统运行稳定，安全可靠。

（2）界面美观、友好.

（3）信息查询灵活、方便、快捷、准确、数据存储安全可靠.

（4）采用多种方式查询数据。

（5）操作保密性强,为每个用户设置相应的权限级别

3。

（1）档案管理：

该模块包括车辆档案录入、车辆档案查询、车辆异动、车辆异动查询、车辆报废、车辆报废查询.

（2）运营管理:

该模块包括车辆运营管理、车辆运营查询、清空运营表。

（3）车辆管理:

该模块包括车辆维修管理、车辆违章管理、车辆事故管理。

（4）驾驶员管理：

该模块包括驾驶员管理、驾驶员奖罚。

（5）系统维护:

该模块包括系统初始化、管理员设置、数据备份、数据恢复、退出.

（6）帮助：

该模块包括帮助和关于。

2。

2组织结构功能结构分析

车辆管理系统功能结构图

2.3业务流程分析

车辆购置业务流程

车辆调拨业务流程图

车辆报废业务流程图

2。

4数据流程分析

数据流程分析图

2.5数据字典

3系统设计

3.1平台设计

系统平台

详细设计

硬件平台

服务器：

PIIII及以上CPU，512M内存，硬盘20G,10/100M网络

客户端：

IE6.0及以上

软件平台

操作系统：

WindowsXP

数据库：

SQLServer2000

3。

1.2总体功能设计

3.1.1。

2功能模块设计

1。

1系统架构设计

（1）文件及文件夹构架（如图1。

1所示。

）

（2）程序文件架构

（3）

为了使读者能够对系统文件有更清晰的认识，这里设计了文件架构图。

主文件架构如图1.2所示.

3.2详细设计

3。

2.1代码设计

程序启动后，在系统登录界面验证操作员密码后，将进入程序主界面.通过程序主界面将会执行相应的权限操作，并且还可以通过主界面的菜单，来调用相应程序，在进行相应操作.主程序界面运行结果如图1。

3所示。

（1）登录界面代码设计

“登录”按钮的click代码事件：

i=i+1

name=thisform.text1。

value

password=thisform.text2.value

ifname="杨xx"andpassword=”19891220”

thisformset.form2.visible=.t。

messagebox（"登陆成功!

",64,"欢迎!

"）

thisform.release

else

n=thisformset。

cs

thisformset.cs=n+1

ifn=3

messagebox（”对不起，"+chr（13）+”您无权使用!

"，48，”提示”）

thisformset。

timer0

（2）

release。

thisformset

else

messagebox（”对不起，用户名或密码不对，请重新输入!

”，48,”提示”）

thisform。

text1.value=””

thisform.text2.value=””

thisform.text1。

setfocus

endif

endif

（2）车辆档案查询代码设计

SELECT车辆档案表。

车牌号码,车辆档案表。

车辆类型，车辆档案表.驾驶员,车辆档案表。

购置日期,车辆档案表.发动机号，车辆档案表。

座位,;

车辆档案表。

厂牌型号，车辆档案表。

载重,车辆档案表。

使用人,车辆档案表。

所在单位,车辆档案表.车架号，车辆档案表。

年检审，;

车辆档案表。

异动否,车辆档案表.保险否,车辆档案表。

报废否,车辆档案表.备注；

FROMH：

\管理信息系统课程设计。

杨德虎\管理信息系统设计.0810811115.杨德虎\车辆档案表.DBF车辆档案表

（3）驾驶员档案查询代码设计

SELECT驾驶员档案表.姓名，驾驶员档案表.性别,驾驶员档案表.出生日期，驾驶员档案表.驾驶证号,驾驶员档案表。

领证日期,驾驶员档案表。

证件有效期,；

驾驶员档案表.驾龄,驾驶员档案表.准驾车型，驾驶员档案表。

何时工作，驾驶员档案表.联系电话,驾驶员档案表。

年检记录,驾驶员档案表。

备注；

FROMH:

\管理信息系统课程设计.杨德虎\管理信息系统设计.0810811115.杨德虎\驾驶员档案表.DBF驾驶员档案表

（4）车辆异动查询代码设计

SELECT车辆异动表.车牌号码，车辆异动表.异动时间,车辆异动表.异动地点，车辆异动表.经手人，车辆异动表.备注;

FROMH：

\管理信息系统课程设计。

杨德虎\管理信息系统设计。

0810811115。

杨德虎\车辆异动表。

DBF车辆异动表

（5）车辆运营查询代码设计

SELECT车辆运营表。

车牌号码,车辆运营表。

运营日期，车辆运营表.工作时间,车辆运营表。

运营收入,车辆运营表。

备注；

FROMH：

\管理信息系统课程设计。

杨德虎\管理信息系统设计。

0810811115。

杨德虎\车辆运营表.DBF车辆运营表

（6）车辆维修查询代码设计

SELECT*FROM车辆信息表！

车辆维修表

（7）类设计代码设计

“首记录”按钮click事件代码设计

gotop

this。

mand1.enabled=.f。

mand2。

enabled=.f.

this。

parent。

command3。

enabled=.t.

mand4。

enabled=.t。

Thisform。

refresh

“上一个”按钮click事件代码设计

skip—1

ifbof（）

messagebox（”已到表头”,30，"提示”）

mand1.enabled=.f.

mand2.enabled=。

f。

else

this。

mand1。

enabled=。

t.

this。

parent。

command2.enabled=.t。

endif

this.parent。

command3.enabled=.t.

this。

parent。

command4。

enabled=.t。

thisform。

refresh

“下一个"按钮click事件代码设计

skip

ifbof（）

messagebox（"已到表尾”,30，"提示”）

skip-1

this。

mand3。

enabled=.f.

this。

mand4.enabled=。

f.

else

this.parent。

command3。

enabled=。

t.

this。

mand4.enabled=.t。

endif

this。

parent。

command1.enabled=。

t。

this。

parent。

command2。

enabled=.t。

thisform.refresh

“末记录”按钮click事件代码设计

gobottom

this。

mand3。

enabled=。

f。

mand4.enabled=.f。

this。

mand1。

enabled=。

t.

this.parent。

command2。

enabled=。

t.

Thisform.refresh

（8）车辆档案录入管理代码设计

表单的Init事件代码设计

Sele2

Thisform.container1。

text3.rowsource="驾驶员档案.姓名"

Sele3

Thisform。

container1。

text1x。

rowsource=”车辆类型表。

类型"

Thisform.refresh

Sele1

Thisform。

container1。

textcph。

value=alltrim（车辆档案.车牌号码）

Thisform。

container1.textlx。

value=alltrim（车辆档案。

车辆类型）

Thisform。

container1。

text3.value=alltrim（车辆档案。

驾驶员）

Thisform。

container1.text4.value=alltrim（车辆档案.购置日期）

Thisform.container1。

text5.value=alltrim（车辆档案.发动机号）

Thisform。

container1.text6。

value=alltrim（车辆档案。

车架号）

Thisform.container1.text7.value=alltrim（车辆档案。

厂牌型号）

Thisform.container1。

text8。

value=alltrim（车辆档案。

载重）

Thisform。

container1。

text9。

value=alltrim（车辆档案。

座位）

Thisform.container1.text10.value=alltrim（车辆档案。

使用人）

Thisform.container1。

text11.value=alltrim（车辆档案.车辆所在单位）

If车辆档案.年检审=.t.

Thisform.container1.check1.value=1

else

Thisform.container1.check1。

value=0

Else

If车辆档案。

保险否=。

t。

Thisform.container1.check2.value=1

else

Thisform.container1.check2.value=0

Endif

Thisform.container1。

edit1。

value=alltrim（车辆档案.备注）

Thisform。

container1.lable16.caption=alltrim（str（recno（）））

Sele1

Usedatdbase\车辆档案。

exclusive

Sele2

Usedatabase\驾驶员档案

Sele3

Usedatabase\车辆类型表

Publicnof，1

Store。

f。

Tonof，1

（9）“添加”按钮click事件代码设计

Sele1

Ifmand5.caption=”添加"

Appendblank

Repl车辆档案.车牌号码with"NoNumber”+alltrim（str（recno（）））

Thisform。

refresh

Tmand5.caption=”保存”

Thisform。

commandgroup1。

command5.tooltiptext=”保存记录”

I=。

t.。

Thisform.resize

Thisform。

mand1。

enabled=。

t.

Store.f。

Tothisform。

commandgroup1。

command3.enabled,thisformcommandgroup1。

command4。

endabled；mand6。

enabled

Thisform。

commandgroup1。

command7.enabaled

Thisform。

mand8.enabled=。

t。

Store"tothisform。

container1.textcph。

value,thisform.container1.textlx.value，;

Thisform.container1text3。

value，thisform.value，thisform。

container1。

text4。

value，;

Thisform.container1text5。

value,thisform。

value,thisform。

container1。

text6.value,;

Thisform.container1text7。

value,thisform.value，thisform。

container1.text8.value，;

Thisform.container1text9.value，thisform。

value，thisform.container1.text10.value，；

Thisform.container1text11.value,thisform。

value，thisform.container1.edit1.value，；

Store0tothisform.container1。

check1.value,thisform.container1.check2。

value,；

Thisform.container1.textcph。

setfocus

Else

Ifempty（alltrim（thisform.container1。

textcph.value））or；empty（alltrim（thisformcontainer1.txet3

。

value））orempty（alltrim（thisform.container1.text10。

value））

A=messagebox（"车牌号、驾驶员、使用单位或个人不容许为空！

”，16,”错误”）

Else

Nof=。

f。

Thisform。

commandgroup1。

command5。

caption="添加”

Thisform。

mand5.tooltiptext="添加记录"

L=。

f.

Thisform.resize

Thisform。

container1。

container2。

command1。

enabled=.f.

Store。

t。

Tothisform。

commandgroup1。

command1。

enabled，thisformmand2。

endabled；mand3。

enabled

Thisform。

mand7。

enabaled

Tmandgroup1。

command4。

enabled,mand7.enbaled

Store.f。

Tomandgroup1。

command6。

enbaled,thisform。

commandgroup1。

command8。

enabled;

Repl车辆档案.车牌号码withalltrim（thisform。

container1。

textcph.value），车辆类型with；

Alltrim（（thisform。

container1.textlx.value），驾驶员withalltrim（thisform。

container1。

text3。

value）,

购置日期withctod（thisform.container1。

text4.value），发动机号withval（thisform。

container1。

text5。

value），车架号withval（thisform.container1。

text6。

value）,；

厂牌型号withtrim（thisform.container1.text7.value）,载重withval（thisform。

container1。

text8.value）,座位withval（thisform。

container1。

text9。

value），使用人或单位；withtrim（thisform。

container1。

text10.value）,车辆所在单位withtrim（thisform。

container1.text11.value）;

Ifthisform。

container.check1.value=1

Repl车辆档案.年检审with。

t.

else

Repl车辆档案。

年检审with。

f.

endif

Ifthisform.container.check1.value=1

Repl车辆档案.保险否with.t.

else

Repl车辆档案.保险否with.f.

endif

Repl车辆档案.备注withtrim（thisform。

container1.edit1.value）

Endif

Endif

3.2.2输入输出设计

车辆管理信息系统设计的出入登记输入输出以表格形式登记

3。

2。

3数据库设计

对数据库的物理设计后，进行数据库的实施，在微机上应用MicrosoftSQLserver创建数据库，在经过调试完成数据库的设计。

在MicrosoftSQLserver中点击数据库建立车辆牌照管理系统的

在MicrosoftSQL　server中选择表点击右键新建表选中表点击新建文件，建立车牌表，入库时间表，车型号表，驾驶员表

构建关系图

我们选择所有表，然后在设计器中添加相关的表

数据库查询

3.2.4系统安全设计

对于系统安全性考虑，选用安全性较高的Windows　２０００　server作为系统运行平台，并且系统补丁升级到ｓｐ２，对系统管理通过严密的口令和密码设置，关掉Windows２０００　server中部必要的服务，以保证系统的安全性，对于ｗｅｂ服务器和其他服务器的计算机，安装防火墙软件，监控和抵御外来攻击。