ASP小区物业管理系统Word文档下载推荐.docx
《ASP小区物业管理系统Word文档下载推荐.docx》由会员分享,可在线阅读,更多相关《ASP小区物业管理系统Word文档下载推荐.docx(21页珍藏版)》请在冰豆网上搜索。
![ASP小区物业管理系统Word文档下载推荐.docx](https://file1.bdocx.com/fileroot1/2022-11/21/ae050df3-695f-4024-a11b-411cd1294b07/ae050df3-695f-4024-a11b-411cd1294b071.gif)
查询保修留言;
职员管理
使用职员管理模块可以实现以下操作:
查询职员资料;
添加、删除和修改职员资料;
业主管理
使用业主管理模块可以实现以下操作:
查询业主资料;
添加、删除和修改业主资料;
费用管理
使用费用管理模块可以实现以下操作:
查询业主费用资料;
添加、删除和修改业主费用资料;
2创建数据库
为了保存物业管理系统所用到的各种数据,在前面的创建的db1.MDB数据库中创建6张数据库表,分别为admin、baoxiubiao、book、feiyongbiao、yezhu、yuangongbiao。
表名
字段名
数据类型
说明
Admin
id
自动编号
puser
文本
管理员帐号
ppwd
密码
pname
姓名
level
数字
等级
baoxiubiao
add
门牌号
owner
业主
date
日期/时间
content
备注
报修内容
reply
回复
book
sname
ssubject
scontent
stime
feiyongbiao
单元#门牌号
wages
货币
工作人员工资福利
mtcs
维护保养费
shoushi
收视
cainuan
采暖
wuguan
物管
sum
总计
yezhu
单元号#门牌号
owners
sex
性别
dob
出生日期
tel
联系方式
基本情况
pwd
yuangongbiao
name
业主姓名
age
年龄
posts
职位
duty
工作内容
3用户验证
在构键物业管理系统时,不仅应当提供较强的数据库访问功能,还应当充分保证数据的安全性。
小区物业管理系统的安全机制主要体现在以下几个方面:
通过登录页面读取用户提交的登录信息并与保存在数据库中的数据进行比较以验证用户的身份;
通过用户的权限级别来限制用户对数据的访问。
3.1登录页面
业主用户登录通过动态网页yezhudeng.asp来实现。
用户可以输入并提交用户名和密码信息,如下图所示。
如果用户信息正确则进入shouye1.asp页面,否则显示错误信息。
如下图所示。
————————yezhudeng.asp————————
<
%@language="
VBScript"
%>
!
--#includefile="
conn.asp"
-->
%denglu=request("
denglu"
)
add=request.Form("
add"
pwd=request.Form("
pwd"
ifdenglu="
登录"
then
setrs=server.CreateObject("
adodb.recordset"
ssql="
select*fromyezhuwhereadd='
"
&
add&
'
andpwd='
pwd&
rs.openssql,conn,1,3
ifrs.bofandrs.eofthen
response.write("
对不起,您输入的用户名或密码有误"
else
session("
owners"
)=add
script>
alert('
您好,"
)&
,欢迎您登陆!
);
window.location.href='
shouye.asp'
;
/script>
endif
管理员用户登录过程通过页面guanlideng.asp来实现
在页面guanliyuan.asp中,用户名可以输入并提交用户名和密码信息,如下图所示。
如果用户信息正确则进入index.asp页面,否则显示错误信息。
3.2留言管理
在留言管理模块中提供了删除留言的功能。
代码如下:
%dimssql,rs
select*frombookorderbyiddesc"
rs.openssql,conn,1,3
ifnotrs.eofthen
rs.pagesize=5
ipagesize=rs.pagesize
iCount=rs.RecordCount
iPageSize=rs.PageSize
maxpage=rs.PageCount
page=request.QueryString("
page"
ifNotIsNumeric(page)orpage="
page=1
page=cint(page)
ifpage>
maxpagethen
page=maxpage
rs.AbsolutePage=Page
i=0
HTML>
head>
scriptlanguage="
javascript1.2"
>
--
functionconfirmdel(id){
if(confirm("
真的要删除吗?
))
window.location.href="
delete.asp?
id="
+id
}
如下图:
3.3管理员管理
在管理员管理模块中提供添加、删除和修改管理员资料的功能。
基本代码如下:
vbscript"
%Response.Expires=0%>
%dimname,puser,ppwd,level,id,action,sql,rs
action=Request.QueryString("
action"
id=Request("
id"
name=Request.Form("
name"
puser=Request.Form("
puser"
ppwd=Request.Form("
ppwd"
level=Request.Form("
level"
setRs=server.CreateObject("
adodb.Recordset"
%
selectcaseaction
case"
saveadd"
callshopadd()
savemodi"
callshopmodi()
del"
callshopdel()
sql="
select*fromadmin"
rs.opensql,conn,1,3
修改的代码如下:
%subshopadd()
select*fromadminwhere1<
1"
rs.addnew
callshopupdate()
endsub
subshopmodi()
select*fromadminwhereid="
Id
endsub
subshopdel()
deletefromadminwhereid="
conn.execute(sql)
response.Redirect("
admin.asp"
subshopupdate()
rs("
)=name
)=puser
)=ppwd
)=(level)
rs.update
rs.close
如下图所示:
3.4职员管理
在职员管理模块中提供了查询添加、修改和删除职员管理资料的功能。
添加职员资料
在职员管理页面上单击“添加职员”,可以连接到添加职员信息拦,在该页面中输入职员资料,提交保存到数据库db1的shop表中
修改如下图所示:
代码:
%functioniif(e)
ife=truethen
iif="
checked"
endfunction
%dimname,sex,age,posts,tel,duty,id,action,sql,rs
age=Request.Form("
age"
sex=Request.Form("
sex"
posts=Request.Form("
posts"
tel=Request.Form("
tel"
duty=Request.Form("
duty"
select*fromyuangongbiao"
%case"
modi"
select*fromyuangongbiaowhereid="
rs.opensql,conn,1,3%>
%endselect%>
select*fromyuangongbiaowhere1<
deletefromyuangongbiaowhereid="
shop.asp"
)=sex
)=age
)=(posts)
)=tel
)=duty
图如下:
3.5业主管理
在业主管理模块中提供了查询添加、修改和删除业主资料的功能。
在职员管理页面上单击“添加职员”,可以连接到添加职员信息拦,在该页面中输入职员资料,提交保存到数据库db1的yezhu表中
查询、添加、修改和删除的代码如下
%dimadd,owners,sex,tel,id,content,sql,rs
owners=Request.Form("
content=Request.Form("
content"
add=Request.Form("
select*fromyezhu"
select*fromyezhuwhereid="
select*fromyezhuwhere1<
deletefromyezhuwhereid="
yezhuguan.asp"
)=owners
)=content
如下图
3.6费用管理
在费用管理模块提供费用查询添加、修改和删除业主费用资料的功能。
在职员管理页面上单击“添加职员”,可以连接到添加职员信息拦,在该页面中输入职员资料,提交保存到数据库db1的feiyongbiao表中。
%dimadd,wages,mtcs,shoushi,cainuan,wuguan,id,sum,sql,rs
mtcs=Request.Form("
mtcs"
shoushi=Request.Form("
shoushi"
cainuan=Request.Form("
cainuan"
wuguan=Request.Form("
wuguan"
setsum=Conn.Execute("
SELECT*FROMfeiyongbiao"
select*fromfeiyongbiao"
select*fromfeiyongbiaowhereid="
select*fromfeiyongbiaowhere1<
deletefromfeiyongbiaowhereid="
feiyongguan.asp"
)=mtcs
)=shoushi
)=cainuan
)=wuguan
3.7页主留言
页主留言是前台的一张动态页面,主要是提供业主留言与查询留言
留言主要通过页面bookwrite.asp和save.asp来实现。
用户在页面bookwrite.asp中输入留言主题和内容等信息。
然后提交给save,asp文件进行处理,所提交到留言信息将保存到liuyanbiao表中。
Save.asp代码如下:
conn.