房地产信息管理系统.docx
《房地产信息管理系统.docx》由会员分享，可在线阅读，更多相关《房地产信息管理系统.docx（13页珍藏版）》请在冰豆网上搜索。
房地产信息管理系统
铁道大学四方学院
集中实践报告书
课题名称
房地产信息系统
姓名
学号
系、部
土木工程专业
专业班级
指导教师
仁芬
2015年06月25日
一、设计任务及要求：
设计任务：
房地产信息系统的开发
要求：
房地产信息管理系统使用的主要成员包括管理员、注册用户和浏览者。
1．系统管理员：
系统管理员具有房源管理、管理员管理、用户信息管理、留言信息管理等重要功能；
2．数据库模块：
建立管理员信息表、楼盘表、楼房基本信息表、房型基本信息表等，实现数据库与前台的，并设置相关权限，完善整个系统功能。
主要功能有：
1．个人或中介主要实现当注册成功后，登录到系统发布房源信息，查看用户发布的求房信息和房源信息，并更新个人信息。
2．房产商主要实现当登录后，发布房产资讯，楼盘信息和新房信息并可以安全退出。
二、指导教师评语：
三、成绩
指导教师签名：
年月日
房地产信息管理系统
1.选题的意义
随着信息技术的发展，房产公司对房产管理的要求越来越高，很多房产公司已明显觉得不能适应当前的发展和需要，意识到使用计算机管理的重要性。
目前各种信息化管理工作也迫切需要从繁杂的事务中解放出来，提高工作效率。
因此信息化管理变得越来越重要，而真正实用的房产信息管理系统必须有完善的权限管理机制，这种机制通常是通过用户管理来实现的，并进行相关的信息查询和处理。
随着我国城镇住房制度改革的深化、住房建设步伐加快和住房消费有效启动,我国房地产行业得到了飞速发展,在国民经济建设中发挥着巨大的带动作用,并已成为我国的重要支柱行业。
虽然计算机管理并不是房地产业销售走向成功的关键元素，但它可以最大限度地发挥准确、快捷、高效等作用，对房地产业的信息业务的管理提供强有力的支持。
面对信息时代的机遇和挑战，利用科技手段提高房地产公司的信息管理无疑是一条行之有效的途径。
对房地产整个公司来说，对房地产公司销售状况起决定作用的是房地产公司的信息管理水平。
如何利用先进的管理手段来提高房地产公司的信息管理水平成为房地产销售业务发展的当务之急。
面对信息时代的机遇和挑战，利用科技手段提高房地产公司的信息管理无疑是一条行之有效的途径。
虽然计算机管理并不是房地产业销售走向成功的关键元素，但它可以最大限度地发挥准确、快捷、高效等作用，对房地产业的信息业务的管理提供强有力的支持。
因此，采用全新的计算机网络和房地产信息管理系统，已成为提高房地产信息管理效率，使作业人员与管理系统之间灵活互动，实现流畅的工作流衔接，帮助房地产公司有效地进行业务管理，释放最大价值。
房地产信息管理系统在达到在节省人力资源成本的同时，可以提高业务效率，并能够及时、准确、迅速地满足顾客服务的需求。
需求分析是从客户的需求中提取出软件系统能够帮助用户解决的业务问题，通过对用户业务问题的分析，规划出系统的功能模块，即定义用例。
这个步骤是对理解需求的升华，直接关系到该系统的质量。
需求分析是从客户的需求中提取出软件系统能够帮助用户解决的业务问题，通过对用户业务问题的分析，规划出系统的功能模块，即定义用例。
这个步骤是对理解需求的升华，直接关系到该系统的质量。
2.系统功能需求分析
2.1系统概述
该系统是以房地产信息管理为基础开发的通用房地产信息管理系统，适合中、小房地产企业的使用。
该系统应有较高的可靠性，房地产信息管理系统包括房源管理，留言信息管理，管理员管理，退出等多种功能。
我们所设计的房地产信息管理系统具有以上功能，可以方便快捷准确的获取以上信息，为用户以及浏览者提供方便，形成美观大方的主题操作界面，可以使房地产信息系统更高效的为客人服务。
房源管理：
其中楼盘表，房型基本信息表，楼房基本信息表包含大量的楼房信息。
留言信息管理:
其中可发布各种求房等信息。
管理员管理：
其中包括权限管理，用户信息管理，管理系统。
退出：
可安全退出本程序。
2.2系统的组成及各模块的功能
房地产信息管理系统的组成主要包括以下几点功能:
1.系统登录模块：
用户名、密码
2.房源管理模块：
楼盘表、楼房基本信息表、房型基本信息表
3.购房与登记模块：
用户购房、购房登记
4.留言信息管理模块：
留言者、时间、留言容
5.退出模块：
安全退出
6.注册模块：
用户名、密码
2.3系统的运行环境
1.系统使用环境
操作系统:
Windows2000/XP
系统支持：
Visualbasic6.0及以上版本支持库
数据库：
Access。
硬件环境：
处理器;IntelPentium166MX或者更高。
硬盘：
剩余使用空间1GB以上。
显卡：
SVGA显示适配器。
存：
32MB以上。
操作系统：
Windows2000/XP。
2.系统开发环境
系统支持：
VisualBasic6.0
3、系统设计
3.1总体结构设计
图1总体模块图
3．2数据库实现
表1房型基本信息表
字段名称
数据类型
字段大小
所属楼盘
文本
255
栋号
文本
255
单元号
文本
255
房号
文本
255
户型
文本
255
朝向
文本
255
面积
文本
255
状态
文本
255
用户名
文本
255
联系方式
文本
255
户型图
文本
255
表2楼盘表
字段名称
数据类型
字段大小
所属楼盘
文本
255
物业类型
文本
255
建筑类别
文本
255
环线位置
文本
255
开发商
文本
255
售楼位置
文本
255
物业地址
文本
255
交通状况
文本
255
平均房价
文本
255
表3楼房基本信息
字段名称
数据类型
字段大小
所属楼盘
文本
255
栋号
文本
255
单元总数
文本
255
总层数
文本
255
户型
文本
255
占地面积
文本
255
4、系统实现
4.1主窗体的设计与实现
图2主窗体界面
PrivateSubadduser_Click（）
楼盘表.Show
EndSub
PrivateSubexit_Click（）
留言信息管理.Show
EndSub
PrivateSubliulan_Click（）
用户信息管理.Show
EndSub
PrivateSubgf_Click（）
购房与登记.Show
EndSub
PrivateSubMDIForm_Load（）
If登录.s<>"管理员"Then管理员管理.Enabled=False
If登录.s<>"房地产商1"Then房源管理.Enabled=False
EndSub
PrivateSubtiantushu_Click（）
住户信息管理.Show
EndSub
PrivateSubfx_Click（）
房型基本信息.Show
EndSub
PrivateSub管理员信息表_Click（）
管理员管理.Show
EndSub
PrivateSub楼房基本信息表_Click（）
楼房基本信息.Show
EndSub
PrivateSub退出_Click（）
UnloadMe
EndSub
4.2房型基本信息的设计与实现
图3房型基本信息界面
PrivateSubCommand3_Click（）
n=val（text11.text）
Fori=1Ton
Adodc1.Recordset.AddNew
Adodc1.Recordset.Fields
（2）=Text1.Text
Adodc1.Recordset.Fields（3）=Text2.Text
Adodc1.Recordset.Fields（5）=Text7.Text
Adodc1.Recordset.Fields（6）=Text6.Text
Adodc1.Recordset.Fields（7）=Text5.Text
Adodc1.Recordset.Fields（8）=Text4.Text
Adodc1.Recordset.Fields
（1）=Text8.Text
Adodc1.Recordset.Fields（11）=Text10.Text
Adodc1.Recordset.Fields（"房号"）=i&Text2.Text
Adodc1.Recordset.Update
Nexti
EndSub
PrivateSubCommand2_Click（）
Adodc1.Recordset.Delete
EndSub
PrivateSubCommand4_Click（）
Unloadme
EndSub
PrivateSubCommand5_Click（）
Adodc1.CommandType=adCmdText
Adodc1.RecordSource="select*from房型基本信息表where所属楼盘='"+Text9+"'"
Adodc1.Refresh
EndSub
PrivateSubCommand1_Click（）
Adodc1.Recordset.Update
EndSub
PrivateSubForm_Load（）
Adodc1.ConnectionString="Provider=Microsoft.ACE.OLEDB.12.0;DataSource=database11.accdb;PersistSecurityInfo=False"
EndSub
PrivateSubCommand6_Click（）
CommonDialog1.ShowOpen
Dims$,s1$,s2$,i%
s=""
s2=CommonDialog1.FileName
Fori=LenB（s2）To1Step-1
s1=Mid（s2,i,1）
Ifs1<>"\"Then
s=s1+s
Else
ExitFor
EndIf
Next
Image1.Picture=LoadPicture（App.Path+"\image\"+s）
Text10=s
EndSub
PrivateSubForm_Load1（）
Adodc1.ConnectionString="Provider=Microsoft.ACE.OLEDB.12.0;PersistSecurityInfo=False;DataSource="+App.Path+"\database11.accdb"
Adodc1.RecordSource="select户型图as户型图from房型基本信息表"
Adodc1.Refresh
EndSub
PrivateSubText10_Change（）
IfText10<>""Then
Image1.Picture=LoadPicture（App.Path+"\image\"+Text10）
Else
Image1.Picture=LoadPicture（）
EndIf
EndSub
4.3楼盘表的设计与实现
图4楼盘表界面
PrivateSubCommand2_Click（）
Adodc1.Recordset.MoveNext
EndSub
PrivateSubCommand1_Click（）
Adodc1.Recordset.MovePrevious
EndSub
PrivateSubCommand3_Click（）
UnloadMe
EndSub
PrivateSubCommand4_Click（）
Adodc1.CommandType=adCmdText
Adodc1.RecordSource="select*from楼盘表where楼盘名称='"+Text10+"'"
Adodc1.Refresh
EndSub
PrivateSubCommand5_Click（）
Adodc1.Recordset.AddNew
EndSub
PrivateSubCommand6_Click（）
Adodc1.Recordset.Update
EndSub
PrivateSubCommand7_Click（）
Adodc1.Recordset.Delete
EndSub
4.4楼房基本信息的设计与实现
图5楼房基本信息界面
PrivateSubCommand1_Click（）
Adodc1.Recordset.MoveNext
EndSub
PrivateSubCommand2_Click（）
Adodc1.Recordset.MovePrevious
EndSub
PrivateSubCommand3_Click（）
房型基本信息.Show
EndSub
PrivateSubCommand4_Click（）
Adodc1.CommandType=adCmdText
Adodc1.RecordSource="select*from楼房基本信息表where所属楼盘='"+Text3+"'"
Adodc1.RecordSource="select*from楼房基本信息表where栋号='"+Text3+"'"
Adodc1.Refresh
EndSub
PrivateSubCommand5_Click（）
Adodc1.Recordset.AddNew
EndSub
PrivateSubCommand6_Click（）
Adodc1.Recordset.Update
EndSub
PrivateSubCommand7_Click（）
Adodc1.Recordset.Delete
EndSub
5、设计体会
5.1总结
感一直对我课程设计提供帮助的仁芬老师，没有您的悉心指导、和孜孜不倦的教诲，我不可能完成符合要求的合格的课程设计。
与此同时，我也要感对我课程设计提供帮助的同学们，是你们给予了我更多更广泛的设计思路，才使得我的思维更加宽广，这对于我的课程设计来说，是一种莫大的帮助，你们。
同时，我也要再次感全体老师，是你们在辛勤地为我们做了许多我们不曾注重的一些细节问题，为我们无论是在设计上还是在报告中，您们的劳动都是我的毕业设计能够完成不可缺少的因素。
5.2存在的主要问题
鉴于能力水平所限，我们存在的问题还不少，界面不够精明，样式死板，无法直观的了解楼房样式，以及楼房预约，可供查询的容比较少，望老师提出批评意见。
参考文献
[1]砚周青华杰.《visualbasic8.0基础教程》，：
清华大学，2004-5-1
[2]徐健平，永.《Visualbasic基础教程，机械工业。
出版日期：
2000-5-1
[3]鲁.《Visualbasic6.0编程技巧与实例分析》，水利水电。
出版日期：
1999-10-1
[4]磊等.《Visualbasic6使用详解》，机械工业。
出版日期：
1999-7-1
[5]康耀红，黄建青等.《Visualbasic6.0数据库设计》，大学，出版日期：
2002-2-1
[6]刚.《Visualbasic6.0实效编程百例》，人民邮电，出版日期：
2002-7-1
[7]周兰文.《Visualbasic6中文版与上机指导》，清华大学，出版日期：
1999
升级会员 