小区物业车辆管理系统.docx
《小区物业车辆管理系统.docx》由会员分享，可在线阅读，更多相关《小区物业车辆管理系统.docx（22页珍藏版）》请在冰豆网上搜索。
小区物业车辆管理系统
小区物业车辆管理系统
内容摘要…………………………………………………………………………1
关键字……………………………………………………………………………1
绪论………………………………………………………………………………2
1、系统需求分析………………………………………………………………3
1、可行性分析………………………………………………………………3
2、系统主要功能……………………………………………………………3
3、业务流程图………………………………………………………………3
4、网站结构图………………………………………………………………4
5、小区车辆出入管理流程图………………………………………………5
2、系统概要设计………………………………………………………………5
1、实体联系模型……………………………………………………………5
2、数据库逻辑结构设计……………………………………………………7
3、系统详细设计………………………………………………………………7
1、系统功能描述……………………………………………………………8
2、总体功能模块设计：
功能层次图………………………………………8
3、系统界面设计……………………………………………………………8
（1）首页设计…………………………………………………………8
（2）小区车辆管理…………………………………………………10
（3）管理模块…………………………………………………………15
4、系统系统错误信息………………………………………………………17
4、系统测试结果………………………………………………………………17
参考文献…………………………………………………………………………18
内容摘要
本系统是根据青海省湟中县“香榭丽都”小区物业现行车辆管理方式所设计的小区车辆管理系统，按照系统调查、系统分析、系统设计、系统实施的步骤，采用结构化的编程方法而编写完成的。
利用小区车辆管理系统，促进小区信息化、网络化建设，使小区车辆管理更加简单、高效、规范、灵活，使管理趋于规范化、标准化。
整个系统从符合操作简便、界面友好、灵活、实用、安全的要求出发，完成小区车辆管理的全过程，主要包括以下几个功能：
小区车辆管理、小区车主管理、小区车辆进出登记管理等等。
系统开发工具采用ASPVBScript，后台数据库采用ACCESS，B/S结构。
利用计算机网络来支持小区物业高效率完成日常车辆管理事务，是适应小区物业制度要求、推动小区车辆管理走向科学化、规范化的必要条件，该系统具有直观、方便、快捷、可靠、保密、低成本等优点。
这些优点能够极大地提高小区物业车辆管理的效率，也是小区物业管理正规化、科学化的重要条件。
经过实际使用证明，本文所设计的小区车辆管理系统可以满足小区物业管理方面的需要，有效提高车辆管理系统的效率。
关键字：
车辆管理ASPACCESSB/S
绪论
车辆管理历来是小区物业管理中重要的组成部分。
由于车辆信息和车主信息种类繁杂、数量繁多，所以传统的车辆信息管理需要大量人力、物力，且容易出错。
因此，建立高效、实用、科学的小区物业车辆管理信息系统，是小区物业管理走向现代化的重要一步。
随着计算机技术的迅猛发展，尤其是网络技术的发展，为小区通过局域网管理财产提供了契机。
ASP动态网站所具有的交互性强、界面简单、服务器架设容易等优点，为小区采用动态网页方式管理财产提供了一个非常好的机会。
小区物业车辆管理系统是一个协助各小区物业各部门科学、全面、高效地进行车辆管理的系统。
在内容上，它包括了车辆变动登记、查询；车主信息登记、变动；车辆进出登记、查询等模块，有完善的车辆资料（车辆信息、状态、进出时间、停车位置，车主信息等）和车主信息（车主信息、住址、联系电话等）。
在操作上，它集输入、变更、查询、删除等操作为一体，信息更新和查询灵活、方便。
因此，如何建立利用计算机、网络等高新科技来高效的财产管理系统，对于小区物业管理部门而言，具有重要的实际意义。
一、系统需求分析
1、可行性分析
从操作可行性角度看，小区物业车辆管理系统基于ASP技术的B/S系统，物业管理部门只需要在小区服务器上配置ASP财产管理系统IIS运行环境。
车辆管理系统的用户在装有IE浏览器的客户机连接登录服务器即可，所有的管理操作端都运行在服务器上，因此该系统具有安装简单、维护方便的特点特别适合在学校使用。
从技术可行性角度看，小区物业车辆管理系统使用ASP技术设计，ASP是微软公司活动服务器页面的简称，经过多年的发展，目前技术非常成熟，运行比较稳定。
软件的后台采用ACCESS数据库，也是经过多年发展完善的中小型企业数据库，易用性和可操作性非常好。
从技术角度来看，该系统技术成熟、运行稳定、设计简单易行。
从系统的使用角度看，经过多年的信息化工作的推进，目前各个小区的管理人员都有一定的信息技术能力，车辆管理人员基本都具备使用该系统的技术能力。
从经济可行性角度看，小区物业车辆管理系统只需要在服务器端安装，就目前各个小区的情况看，服务器的安装与配置都比较完善，不需要增加额外的开销。
对于没有专业服务器的小区，由于该系统运行的系统开销比较小，完全可以用普通PC作为服务器，能保证该系统的稳定运行。
2、系统主要功能
整个小区物业车辆管理系统实现的功能如下：
（1）可以向数据库中添加、修改和删除车主信息，包括车主姓名，电话，住址等。
（2）可以向数据库中添加、修改和删除车辆信息，包括车号，车辆型号，颜色，价值，停车位置、车主等。
（3）可以向数据库添加、修改和删除车辆进出信息，包括进出车辆车号，进出时间等。
（4）可以对数据库中的车辆进出进行动态管理。
3、业务流程图
4、网站结构图
5、小区车辆出入管理流程图：
二、系统概要设计
1、实体联系模型
本系统中所规划的实体主要有：
财产基本信息实体、教师基本信息实体、部门基本信息实体、系统管理员信息实体。
具体的描述E-R图如下所示：
（1）车辆基本信息实体E-R图，如图所示：
（2）车主基本信息实体E-R图，如图所示：
（3）车辆进出登记基本信息实体E-R图，如图所示：
（4）系统管理员信息实体E-R图，如图所示：
2、数据库逻辑结构设计
（1）车辆基本情况表
列名
数据类型
可否为空
说明
chehao
varchar
NOTNULL
车辆编号
chezhuID
numric
NOTNULL
车主编号
yanse
varchar
NULL
车辆颜色
xinghao
varchar
NULL
车辆型号
jiazhi
numric
NULL
车辆价值
tingquyu
varchar
NULL
停车区域
（2）车主基本情况表
列名
数据类型
可否为空
说明
chezhuID
varchar
NOTNULL
车主编号
xingming
varchar
NOTNULL
车主姓名
xingbie
varchar
NULL
车主性别
shenfenzheng
varchar
NULL
车主身份证号
zhuzhi
varchar
NULL
车主住址
danhua
varchar
NULL
车主联系电话
（3）车辆进出登记表
列名
数据类型
可否为空
说明
ID
varchar
NOTNULL
进出信息编号
zhuangtai
varchar
NOTNULL
车辆状态
chehao
varchar
NULL
车号
shijian
data/time
NULL
进出时间
（4）系统管理员表
列名
数据类型
可否为空
说明
guanliID
varchar
NOTNULL
管理员编号
guanliyuan
varchar
NOTNULL
管理员名
guanlimima
varchar
NULL
管理密码
三、系统详细设计
1、系统功能描述
（1）小区车辆信息管理
实现对车辆的基本信息的管理，如小区车辆信息的添加、修改、删除和查询。
小区车辆基本信息主要包括：
车号、车主、颜色、车辆规格、车辆价值、停车位置等基本信息。
（2）小区车主信息管理
包括小区车主的姓名、住址等基本信息，主要对车主的信息进行管理，为后续的功能模块提供数据。
（3）车辆进出管理
主要是车辆进出信息的管理，其主要功能是车辆进入、离开的时间记录。
为车辆按进出情况进行汇总、管理提供数据支持。
（4）系统管理员信息管理
主要是网络系统的管理员管理，管理员可以进行车辆信息的上传、车主信息的上传、车辆的登记、车辆进出情况查询等。
便于对小区物业车辆管理系统进行分级管理，提高数据库的安全性。
2、总体功能模块设计：
功能层次图
根据前面的需求分析以及系统功能的分析可用以下图形来描述系统总体的功能模块。
3、系统界面设计
（1）首页设计
首页主要用于普通用户登录，登录后，可以查看个人信息，或者再以管理员的身份进行后台管理登录，首页简洁明了。
主要代码为：
<%MM_LoginAction=Request.ServerVariables（"URL"）
IfRequest.QueryString<>""ThenMM_LoginAction=MM_LoginAction+"?
"+Server.HTMLEncode（Request.QueryString）
MM_valUsername=CStr（Request.Form（"mingzi"））
IfMM_valUsername<>""Then
DimMM_fldUserAuthorization
DimMM_redirectLoginSuccess
DimMM_redirectLoginFailed
DimMM_loginSQL
DimMM_rsUser
DimMM_rsUser_cmd
MM_fldUserAuthorization=""
MM_redirectLoginSuccess="caiwu/caiwu_index.asp"
MM_redirectLoginFailed="index.asp"
MM_loginSQL="SELECTyhming,mima"
IfMM_fldUserAuthorization<>""ThenMM_loginSQL=MM_loginSQL&","&MM_fldUserAuthorization
MM_loginSQL=MM_loginSQL&"FROMyonghuWHEREyhming=?
ANDmima=?
"
SetMM_rsUser_cmd=Server.CreateObject（"ADODB.Command"）
MM_rsUser_cmd.ActiveConnection=MM_conn_STRING
MM_rsUser_cmd.CommandText=MM_loginSQL
MM_rsUser_cmd.Parameters.AppendMM_rsUser_cmd.CreateParameter（"param1",200,1,12,MM_valUsername）'adVarChar
MM_rsUser_cmd.Parameters.AppendMM_rsUser_cmd.CreateParameter（"param2",200,1,20,Request.Form（"mima"））'adVarChar
MM_rsUser_cmd.Prepared=true
SetMM_rsUser=MM_rsUser_cmd.Execute
IfNotMM_rsUser.EOFOrNotMM_rsUser.BOFThen
'usernameandpasswordmatch-thisisavaliduser
Session（"MM_Username"）=MM_valUsername
If（MM_fldUserAuthorization<>""）Then
Session（"MM_UserAuthorization"）=CStr（MM_rsUser.Fields.Item（MM_fldUserAuthorization）.Value）
Else
Session（"MM_UserAuthorization"）=""
EndIf
ifCStr（Request.QueryString（"accessdenied"））<>""AndfalseThen
MM_redirectLoginSuccess=Request.QueryString（"accessdenied"）
EndIf
MM_rsUser.Close
Response.Redirect（MM_redirectLoginSuccess）
EndIf
MM_rsUser.Close
Response.Redirect（MM_redirectLoginFailed）
EndIf
（2）小区车辆进出管理
小区物业管理员对车辆基本信息进行管理，登记车辆、查询车辆信息等，对小区车辆进行有效的查看，做好车辆进出信息的管理和查询。
主要代码如下：
<%
'***RestrictAccessToPage:
Grantordenyaccesstothispage
MM_authorizedUsers=""
MM_authFailedURL="/index.asp"
MM_grantAccess=false
IfSession（"MM_Username"）<>""Then
If（trueOrCStr（Session（"MM_UserAuthorization"））=""）Or_（InStr（1,MM_authorizedUsers,Session（"MM_UserAuthorization"））>=1）Then
MM_grantAccess=true
EndIf
EndIf
IfNotMM_grantAccessThen
MM_qsChar="?
"
If（InStr（1,MM_authFailedURL,"?
"）>=1）ThenMM_qsChar="&"
MM_referrer=Request.ServerVariables（"URL"）
if（Len（Request.QueryString（））>0）ThenMM_referrer=MM_referrer&"?
"&Request.QueryString（）
MM_authFailedURL=MM_authFailedURL&MM_qsChar&"accessdenied="&Server.URLEncode（MM_referrer）
Response.Redirect（MM_authFailedURL）
EndIf%>
（小区车辆判断、车辆进出状态判断主要代码）
<%MM_authorizedUsers=""
MM_authFailedURL="/index.asp"
MM_grantAccess=false
IfSession（"MM_Username"）<>""Then
If（trueOrCStr（Session（"MM_UserAuthorization"））=""）Or_（InStr（1,MM_authorizedUsers,Session（"MM_UserAuthorization"））>=1）Then
MM_grantAccess=true
EndIf
EndIf
IfNotMM_grantAccessThen
MM_qsChar="?
"
If（InStr（1,MM_authFailedURL,"?
"）>=1）ThenMM_qsChar="&"
MM_referrer=Request.ServerVariables（"URL"）
if（Len（Request.QueryString（））>0）ThenMM_referrer=MM_referrer&"?
"&Request.QueryString（）
MM_authFailedURL=MM_authFailedURL&MM_qsChar&"accessdenied="&Server.URLEncode（MM_referrer）
Response.Redirect（MM_authFailedURL）
EndIf%>
<%Dimche__MMColParam
che__MMColParam="1"
If（Request.Form（"chehao"）<>""）Then
che__MMColParam=Request.Form（"chehao"）
EndIf%>
<%Dimche
Dimche_cmd
Dimche_numRows
Setche_cmd=Server.CreateObject（"ADODB.Command"）
che_cmd.ActiveConnection=MM_lj_STRING
che_cmd.CommandText="SELECT*FROMche_zhuWHEREchehao=?
"
che_cmd.Prepared=true
che_cmd.Parameters.Appendche_cmd.CreateParameter（"param1",200,1,8,che__MMColParam）'adVarChar
Setche=che_cmd.Execute
che_numRows=0%>
<%Dimchuru__MMColParam
churu__MMColParam="1"
If（Request.Form（"chehao"）<>""）Then
churu__MMColParam=Request.Form（"chehao"）
EndIf%>
<%Dimchuru
Dimchuru_cmd
Dimchuru_numRows
Setchuru_cmd=Server.CreateObject（"ADODB.Command"）
churu_cmd.ActiveConnection=MM_lj_STRING
churu_cmd.CommandText="SELECT*FROMchuruWHEREchehao=?
ORDERBYIDDESC"
churu_cmd.Prepared=true
churu_cmd.Parameters.Appendchuru_cmd.CreateParameter（"param1",200,1,8,churu__MMColParam）'adVarChar
Setchuru=churu_cmd.Execute
churu_numRows=0%>
<%if（notchuru.eofornotchuru.bof）then
if（churu.Fields.Item（"zhuangtai"）.Value）="停车"then%>
"
<%endifendif%>
<%if（notchuru.eofornotchuru.bof）then
if（churu.Fields.Item（"zhuangtai"）.Value）="离开"then%>
"/>
<%endifendif%>
<%Ifchuru.EOFAndchuru.BOFThen%>
"/>
<%endif%><%endif%>
<%Ifche.EOFAndche.BOFThen%>
本车尚未在小区登记，属于临时进出！
<%if（notchuru.eofornotchuru.bof）then
if（churu.Fields.Item（"zhuangtai"）.Value）="停车"then%>
升级会员 