《数据库论文_小区物业管理系统》由会员分享，可在线阅读，更多相关《数据库论文_小区物业管理系统（36页珍藏版）》请在金锄头文库上搜索。
1、. . . .摘 要对于小区物业管理来说，其工作流程的繁杂性、多样化、管理复杂、收缴费用与设备维护繁琐。计算机已完全能够胜任物业管理工作，而且更加准确、方便、快捷、高效、清晰、透明，它完全可以克服以上所述的不足之处。这将给项目查询和管理带来很大的方便，从而给物业管理工作带来更高的效率，这也是物业管理正规化、现代化的重要标志。因此，开发一套高效率、无差错的小区物业管理系统软件十分必要。本文的主要运用SQL和VB,开发一个物业信息管理系统，目的是告别纸质账本，安全、快捷的保存数据信息。由于小区物业管理涉及到费用问题，为了增强系统的保密性，使业主利益不受损害，使业主能够对自家的物业费用和投诉等情况提
2、供透明化、直观的了解。关键词：小区物业；管理系统；SQL；VB；过程.下载可编辑.第1章 系统功能概述1.1 设计目的及意义 掌握数据库的创建方法。掌握用一种语言（如VB）开发数据库应用程序的方法。对于小区物业管理来说，其工作流程的繁杂性、多样化、管理复杂、收缴费用与设备维护繁琐。计算机已完全能够胜任物业管理工作，而且更加准确、方便、快捷、高效、清晰、透明，它完全可以克服以上所述的不足之处。这将给项目查询和管理带来很大的方便，从而给物业管理工作带来更高的效率，这也是物业管理正规化、现代化的重要标志。因此，开发一套高效率、无差错的小区物业管理系统软件十分必要。本系统的主要目的是告别帐本，安全、快
3、捷的保存数据信息。由于小区物业管理涉及到费用问题，为了增强系统的保密性，使业主利益不受损害，本系统具有仅管理员式的保密功能，还有查询、录入、修改、删除、以及对物业设备统计等功能，使业主能够对自家的物业费用和投诉等情况提供透明化、直观的了解。本系统采用SQL server 2008作为后台数据库，这样是数据能够得到统一，并增强了管理的安全性。1.2 功能模块划分对高圆寺小区物业的相关业务进行分析后，确定房高圆寺小区物业信息管理系统应该实现的功能如下：（1） 用户登录，用于小区用户登录此系统。（2） . 管理员登陆，用于物业管理员登陆此系统。（3） 注册页面，用于注册新用户。（4） 编辑模块，主要
4、实现基本信息的管理及系统参数的设置，包括：业主、费用、服务等信息的登记管理、浏览、添加、删除等功能，还有退出系统等一些基本操作。 （5） 查询模块，用于业主、费用、服务信息的查询。（6） 用户评价模块，用于该小区用户对物业管理漏洞的投诉与建议的提出。（7） . 相关信息模块，该模块显示一些小区的基本信息。 第2章 数据库设计2.1 需求分析物业信息管理系统文件数据管理查询用户评价关于注册新用户退出业主信息费用信息服务信息交费信息服务反馈信息业主信息查询费用信息查询服务信息查询建议投诉关于系统帮助图2.1 功能模块结构2.2 E-R模型实体E-R图： 业主信息姓名面积业主编号性别门牌号电话 图2
5、.21 业主信息E-R图收费信息收费编号收费名称单价说明图2.22 收费信息E-R图项目名称负责人项目编号服务信息图2.23 服务信息E-R图关系E-R图： 业主信息服务信息收费信息收费服务反馈业主编号姓名门牌号性别面积电话费用编号单价说明费用名称收款人金额用量日期负责人项目名称项目编号时间效果 图2.24 关系E-R图2.3 关系模型登陆（用户名、密码、投诉、建议）管理员（管理员、密码）业主信息（业主编号、姓名、性别、面积、门牌号、电话）收费信息（收费编号、收费名称、单价、说明）服务信息（项目编号、项目名称、负责人）业主交费（收费编号、业主编号、金额、日期、收款人、用量）其中，“收费编号、业
6、主编号”是外码，“收费编号”参照收费信息表主码“收费编号”，“业主编号”参照业主信息表主码“业主编号”。业主服务（项目编号、业主编号、时间、服务效果）其中，“项目编号、业主编号”是外码，“项目编号”参照收费信息表主码“项目编号”，“业主编号”参照业主信息表主码“业主编号”。2.4 表结构设计登陆表：登陆表里输入的结果如下：管理员账户表：管理员账户表输入的信息：业主信息表：业主信息表里输入的结果如下：收费信息表：收费信息表里输入的结果如下：服务信息表：服务信息表里输入的结果如下：业主交费表：业主交费表输入的信息：业主服务表：业主服务表输入的信息：第3章 系统各功能模块的详细设计3.1 进入系统页
7、面：运行时的界面如下图，其中的进入系统按钮的功能是进入登陆页面。图3.1 进入系统页面3.2 登录页面：进入登陆页面后如下图，其中登陆按钮功能如下：（1）检测数据库中有无管理员帐号,如果有,则等待用户输入用户名和密码,否则不能进入系统。（2）验证用户名和密码是否正确,错误次数不能超过三次,超过三次则退出系统登陆界面。（3）当验证通过后,检测该登录用户的管理权限,并设置变量传值给主窗体。点击“进入系统”便可以进入房产管理系统了。登录代码：Dim miCount As Integer 用于记录输入密码次数Private Sub CmdLand_Click()Dim sqlstr As String
8、sqlstr = Select * From 系统信息 Where 用户名= & Text1.Text & Adodc1.RecordSource = sqlstrAdodc1.RefreshIf Adodc1.Recordset.BOF Then 若没找到符合Where条件的记录MsgBox 用户名错误，重新输入, vbExclamation, 警告Text1.Text = Text1.SetFocus Text1获得焦点Else 判断密码是否正确If Adodc1.Recordset.Fields(密码) = Text2.Text Then主控页面.ShowUnload MeElseMsg
9、Box 密码错误，重新输入 , vbExclamation, 警告Text2.Text = Text2.SetFocusEnd IfEnd IfmiCount = miCount + 1If miCount = 3 Then Unload MeForm3.ShowEnd Sub 图3.2 登录页面3.3 注册页面：注册代码：Private Sub CmdOk_Click()Dim sqlstr As StringIf Text1 = ThenMsgBox 请输入用户名！, vbExclamation, 确认用户名 Text1.SetFocus Exit SubElse sqlstr = Sel
10、ect * from 系统信息 where 用户名= & Text1.Text & Adodc1.RecordSource = sqlstr Adodc1.Refresh If Adodc1.Recordset.EOF = False Then MsgBox 用户名已存在，请重新输入！, vbExclamation, 检验用户名 Text1 = Text1.SetFocus Exit Sub End IfEnd If判断二次输入密码是否一致：If Text2.Text Text3.Text Then MsgBox 二次输入的密码不一致，请重新输入, vbExclamation, 检验密码 Te
11、xt2 = : Text3 = Text2.SetFocus Exit SubElseIf Text2 = Then MsgBox 密码不能为空！, vbExclamation, 检验密码 Text2.SetFocusElse Adodc1.Recordset.AddNew Adodc1.Recordset.Fields(用户名) = Trim(Text1) Adodc1.Recordset.Fields(密码) = Trim(Text2) Adodc1.Recordset.Update Me.Hide MsgBox 成功注册新用户！, vbInformation, 添加用户End IfEnd
12、 Sub操作如下：注册新用户“11”，再使用这个新用户登录。图3.2 注册页面3.4 主控页面：登录后便进入了主控页面，在这里可以进行添加，删除，查询，打印报表等功能。主控页面所有代码：Private Sub exit_Click()Unload MeEnd SubPrivate Sub fankui_Click()Formfankui.ShowEnd SubPrivate Sub feiyong_Click()Formshoufei.ShowEnd SubPrivate Sub fuwu_Click()Formfuwuxinxi.ShowEnd SubPrivate Sub gaunyu_C
13、lick()Formguanyu.ShowEnd SubPrivate Sub install_Click()Formzhuce.ShowEnd SubPrivate Sub jianyi_Click()Formjianyi.ShowEnd SubPrivate Sub jiaofei_Click()Formjiaofei.ShowEnd SubPrivate Sub MDIForm_Load()End SubPrivate Sub searchc_Click()Formsearchc.ShowEnd SubPrivate Sub searchp_Click()Formsearchp.ShowEnd SubPrivate Sub searchs_Click()Formsearchs.ShowEnd SubPrivate Sub tousu_Click()Formtousu.ShowEnd SubPrivate Sub yezhu_Click()Formyezhu.ShowEnd Sub图3.4 主控页面主控页面中包括文件，数据管理，查询，用户评
