车辆管理系统毕业设计范例

this.toolbar.buttons(1).tooltiptext="车辆档案"
this.toolbar.buttons(2).tooltiptext="驾驶员档案"
this.toolbar.buttons(3).tooltiptext="运营管理"
this.toolbar.buttons(5).tooltiptext="维修管理"
this.toolbar.buttons(6).tooltiptext="违章管理"
this.toolbar.buttons(7).tooltiptext="事故档案"
this.toolbar.buttons(9).tooltiptext="查询"
this.toolbar.buttons(11).tooltiptext="帮助"
TC=.f.
thisform.refresh
thisform.release
endif
endif
set exact off&&设置字符非精确比较
在“退出”按钮的Click事件中添加以下代码：
thisform.release&&释放表单
2
2.
本系统是一个协助各单位进行全面车辆管理的系统，系统由档案管理、运营管理、车辆管理、驾驶员管理、系统维护和帮助6个模块组成。本系统是协助各单位合理和优化管理车辆的最佳选择。规划系统功能模块如下：
档案管理
档案管理：车辆档案录入、车辆档案查询、车辆异动、车辆异动查询、车辆报废、车辆报废查询。
运营管理
use DataBase\管理员表&&打开数据表
cname=alltrim(bel2.caption)&&获得输入信息
ppassword=alltrim(thisform.Container3.Байду номын сангаасext1.value)&&获得输入信息
set order to管理员姓名&&指定控制索引文件
do form form\frm管理员档案&&调入表单
messagebox("亲爱的朋友："+chr(10)+chr(13)+chr(10)+"欢迎使用明日车辆管理系统！";
+chr(10)+chr(13)+"这是您第一次登录系统！请首先添加一管理员！"+chr(10)+chr(13);
+chr(10)+ "具体操作请查阅[帮助]----初次登录！",0,"初次登录")
图3“用户登录”表单运行结果
1
（1）添加一个表单，名称为Frmlogin。
（2）在表单中添加Label控件、Text控件、Command控件、Imagelist控件和Container控件。
（3）重要控件属性如表2所示。
表2“用户登录”表单重要控件属性列表
控件名
属性
值
Form1
AotoCenter
BorderStyle
else
do while eof()=.f.
thisform.container3.listview.view=0&&设置ListView控件的视图类型。
&&将ImageList控件图片赋予Listview控件
thisform.container3.listview.icons=thisform.imagelist.object
图1车辆管理系统结构图
2.
本系统是根据中小企业的实际需求而开发的，完全能够实现企业对客户的自动化管理，通过本系统可以达到以下目标：
系统运行稳定，安全可靠。
界面美观、友好。
信息查询灵活、方便、快捷、准确，数据存储安全可靠。
采用多种方式查询数据。
操作员可以随时修改自己的口令。
数据保密性强，为每个用户设置相应的权限级别。
if cn=3
thisform.release&&释放表单
endif
else
if alltrim(管理员表.密码)!=ppassword &&判断密码是否正确
cn=cn+1
cmessagetitle='系统登录'
cmessagetext='密码错误，请重新输入！'
ndialogtype=32
nanswer=messagebox(cmessagetext,ndialogtype,cmessagetitle)
学院
专业
班级
学号
姓名
指导教师
教师职称
年
月
日
【摘要】
随着社会经济的发展，使用车辆的人越来越多，对于拥有各种类型车辆的机关企事业单位，车辆的管理成为日常事务中的一项重要工作。车辆管理部门如何进行有效管理，及时了解每一辆车的情况，提高车辆的使用效率，就成为各单位急需解决的一个问题。
针对这种状况，我们开发出一套专门进行车辆管理的软件，这套软件可以为您提供车辆管理、跟踪等方面的资料。它不仅能够掌握车辆的运营、异动、维修和报废等状况，而且还可以对车辆的违章和事故进行系统管理。所以本系统是协助各单位合理和优化管理车辆的最佳选择。
cn=0
在系统登录时，判断“管理员”表中是否有记录，如果没有，则以系统管理员的身份直接进入，并弹出系统对话框。在表单的Init事件中添加以下代码：
use database\管理员表
if eof()=.t. and bof()=.t.
close all
thisform.visible=.f.&&隐藏表单
case button.index=11
do form form\frm帮助
endcase
在时间控件的Timer事件中添加以下代码用于在状态栏中实现显示系统时间。
thisform.statusbar.panels(1).text=alltrim(str(year(date())))+"年"+alltrim(str(;
case button.index=5
do form form\frm车辆维修
case button.index=6
do form form\frm车辆违章
case button.index=7
do form form\frm车辆事故管理
case button.index=9
do menu\leftmnu.mpr
this.toolbar.imagelist=this.imagelist
=this.toolbar.buttons.add(,'clda','',,1)
=this.toolbar.buttons.add(,'glyda','',,2)
=this.toolbar.buttons.add(,'yygl','',,3)
【关键词】车辆管理系统
0
车辆的管理在各机关、企事业单位一直是一个难题，一方面使用成本居高不下，另一方面各部门却经常抱怨不能有效地使用车辆，车辆驾驶员更多的将车辆当作私家车在使用，对车辆的使用成本不加以控制，管理部门没有有效的手段对车辆的使用、费用进行控制，也无法对车辆的使用、费用情况进行统计、分析，制定合理的使用计划，大大降低了车辆的使用效率。
运营管理：车辆运营管理、车辆运营查询、清空运营表。
车辆管理
车辆管理：维修管理、违章管理、事故管理。
驾驶员管理
驾驶员管理：驾驶员管理、驾驶员奖惩。
系统维护
系统维护：系统初始化、管理员设置、数据备份、数据恢复、退出。
帮助
帮助：帮助和关于。
2.
本系统共分5大部分，23个完整的功能模块。系统结构图如图1所示.
=this.toolbar.buttons.add(,'bar1','',3,1)
=this.toolbar.buttons.add(,'wxgl','',,4)
=this.toolbar.buttons.add(,'wzgl','',,5)
=this.toolbar.buttons.add(,'sggl','',,6)
&&向ListItems集合中添加一个列表项。
thisform.container3.listview.listitems.add(,,管理员表.管理员姓名,管理员表.管理员头像)
skip&&记录指针向下移动一条记录
enddo
endif
use
单击“登录”按钮，首先判断用户名是否正确，然后根据用户名判断密码是否正确，如果正确，根据该操作员的权限级别赋于用户相应的使用权限；如果不正确，弹出系统警告对话框。在“登录”按钮的Click事件中添加以下代码：
本系统是一个协助各单位进行全面车辆管理的系统，包括了车辆档案管理；驾驶员档案管理；车辆管理（维修管理、违章管理、事故管理）；车辆运营管理等。是一套真正适合企事业单位的管理系统。
1
1.1
根据赛达车有限公司的具体情况，系统主要功能包括：
档案管理：“车辆档案录入”、“车辆档案查询”、“车辆异动”、“车辆异动查询”、“车辆报废”、“车辆报废查询”。
在Toolbar控件的ButtonClick事件中添加以下代码：