搜索
售楼管理系统设计----论文设计者：邓正雍一、内容提要：房地产业的不断发展，利用电脑的先进管理手段，把售楼人员从一大堆合同中解放出来，将楼盘的销售推向“无纸化”已经成了解决当前房地产售楼管理的当务之急。本论文介绍的售楼管理系统就是为了实现这一目标而设计的。管理人员通过该系统可以及时了解楼盘的动态销售情况，还能够充分利用电脑的可检索性，方便、快速的了解有关销售的其他各种详细资料，以便即使做出正确决策。二、开发售楼管理系统所需基于的软件和硬件要求：软件：1、用VisualBasic6.0作售楼管理系统前台开发工具。2、用Access2000作售楼管理系统的后台数据库。3、基于Windows2000操作系统硬件：1、cpu赛扬1.7G2、内存128M3、硬盘40G三、售楼管理系统说明：（一）、系统组成的主要模块：房产管理、客户管理、收费管理、售楼管理。（二）、系统设计的主体结构：（三）、数据库设计：根据此系统的功能分析，系统数据库应该满足户型资料、客户资料、合同资料、收费资料、收款登记、售楼人员、收款登记、系统维护和系统管理9个功能的需求。所以需要利用Access建立一个House数据库，主要有包括如下8个表。表一：系统管理表，用于登录系统人员管理。字段名数据类型说明售楼管理系统房产管理客户管理收费管理售楼管理系统维护系统管理楼盘登记售楼人员登记售楼合同管理收款管理售楼人员查询售楼合同查询数据库备份数据库恢复添加用户退出系统收款情况查询收费查询收费登记客户资料查询客户资料登记户型登记楼盘查询户型查询Czyh文本操作员号Mm文本操作员密码Qx文本权限表二：户型资料表，用于存放户型资料。字段名数据类型说明Hst_ID文本户型编号字段Hst_buildarea数字建筑面积Hst_usearea数字套内面积Hst_type文本房型Hst_memo文本简介Hst_picture文本保存图片表三：楼盘资料表，用于存放楼盘资料。字段名数据类型说明hos_id文本楼盘编号hos_hstid文本户型hos_price货币报价表四：合同资料表，用于存放合同资料。字段名数据类型说明Pct_ID数字合同编号Pct_houseID文本楼盘编号pct_buyerid文本购买人身份证Pct_salesID文本销售人员编号Pct_housequote货币楼盘单价Pct_discountrate数字折扣率Pct_discountcash货币折扣金额pct_carplaceid文本车位号Pct_carplace货币车位价格pct_basementid文本地下室编号Pct_basement货币地下室价格Pct_paykind文本付款方式Pct_bank文本贷款银行Pct_bookdate日期/时间认购日期Pct_pactdate日期/时间签定日期pct_state数字标记是否交款表五：客户资料表，用于存放客户资料。字段名数据类型说明Hon_ID文本身份证号Hon_name文本姓名Hon_sex文本性别Hon_tel文本电话Hon_handset文本手机Hon_job文本职业Hon_birthday日期/时间出生日期Hon_email文本电子邮件Hon_carcode文本车牌号Hon_zipcode文本邮编Hon_addr文本地址Hon_memo文本备注表六：收费信息表，用于保存收费信息。字段名数据类型说明fee_ID货币收费编号fee_houseID货币楼盘编号Fee_date货币收费时间fee_tv货币有线电视费Fee_tel货币电话调试费Fee_gas货币煤气初装费Fee_member货币公用设施费Fee_other货币其他费用Fee_deposit货币押金fee_skr文本收款人fee_jkr文本交款人表七：预计付款表，用于存放预计付款表信息。字段名数据类型说明Add_pactid数字预计付款序号Add_date日期/时间预计付款日期Add_money货币付款钱数shifoufukuan文本是否已付款标记表八：收款登记表，用于存放收款登记表信息字段名数据类型说明Icm_ID数字收款单号icm_hetonghao数字合同编号icm_houseID文本楼盘编号Icm_date日期/时间收款日期icm_money货币收款金额icm_paykind文本付款方式icm_skr文本收款人icm_jkr文本交款人编号表九：售楼人员表，用于存售楼人员表信息字段名数据类型说明Sal_ID文本人员编号Sal_sfz文本身份证号Sal_name文本姓名Sal_sex文本性别sal_birthday日期/时间出生日期Sal_tel文本电话Sal_handset文本手机Sal_email文本电子邮件Sal_zipcode文本邮编Sal_addr文本地址（四）、系统功能模块设计。1、创建售楼管理系统登录窗体。在正式进入系统之前，需要对用户的身份进行确认，这是通过用户登录来实现的，所以系统中的第一个窗体也就应该是登录窗体。A.界面设计：控件名称属性属性值说明frmloginbackcolor&h00c0ffff&设置窗体背景颜色borderstyleFixedsingle设置窗体边框样式caption“登录”设置窗体标题iconSystem.ico设置窗体图标startupposition屏幕中心设置窗体初始位置Lable1caption“用户名”设置标题backcolor&h00c0ffff&设置背景颜色forecolor&h00c000c0&设置前景颜色Lable2caption“用户名”设置标题backcolor&h00c0ffff&设置背景颜色forecolor&h00c000c0&设置前景颜色cmbnametext“”设置文本框为空txtpwdtext“”设置文本框为空cmdokcaption“确定”设置命令按钮标题cmdcancelcaption“取消”设置命令按钮标题B．窗体设计状态效果如下：C.工作流程：此系统开启的第一个界面就是上述窗体，用户名中包括system模式和guset模式的两种形式。如果登录用户是system用户，他属于特权用户，具有对系统的完全管理权限。如果登录用户是guset用户，他属于一般用户，对系统中的某些功能无法进行管理。当用户名和密码录入都正确时，点（确定）按钮就会进入主窗体，如果用户名或密码录入错误，系统将作出提示而重新录入。当点（取消）按钮时将退出整个系统。D．模块原代码：OptionExplicitDimcntAsInteger'记录输入次数DimsqlAsStringDimrs_loginAsNewADODB.RecordsetPrivateSubcmdcancel_Click()conn.Close'关闭数据库连接Setconn=NothingUnloadMeEndSubPrivateSubcmdok_Click()DimuserIDAsStringIfTrim(cmbName.Text)=Then'判断输入的用户名是否为空MsgBox没有这个用户,vbOKOnly+vbExclamationcmbName.SetFocusElse'判断用户名和密码是否正确sql=select*from系统管理表whereczyh='&cmbName.Text&'rs_login.Opensql,conn,adOpenKeyset,adLockPessimisticIfrs_login.EOF=TrueThenMsgBox没有这个用户,vbOKOnly+vbExclamation,cmbName.SetFocusElse'检验密码是否正确IfTrim(rs_login.Fields(1))=Trim(txtPwd.Text)ThenuserID=cmbName.Textusername=rs_login.Fields(2)'记录登录用户的类型，以便权限设置UnloadMefrmmain.Showrs_login.CloseExitSubElseMsgBox密码不正确,vbOKOnly+vbExclamation,txtPwd.SetFocusEndIfEndIfrs_login.CloseEndIfcnt=cnt+1'输入次数加1Ifcnt=3ThenMsgBox您输入密码错误次数太多！,vbExclamation,UnloadMeEndIfEndSubPrivateSubForm_Load()DimconnectionstringAsString'定义连接字符串connectionstring=provider=Microsoft.Jet.oledb.4.0;&_datasource=&App.Path&\House.mdbconn.Openconnectionstring'打开数据库sql=select*from系统管理表'检索系统管理表rs_login.Opensql,conn,adOpenKeyset,adLockPessimistic'打开记录集Ifrs_login.EOF=FalseThen'有记录时逐一添加到cmbName组合框DoWhilers_login.EOF=FalsecmbName.AddItem(rs_login.Fields(0))rs_login.MoveNextLoopcmbName.ListIndex=0'默认显示第一个子项EndIfrs_login.Closecnt=0'初始化输入次数EndSub2．建立主窗体。此窗体为主界面，它具有菜单功能和按钮功能项，通过它的两项功能才能调用其他的工作窗体。A.界面设计。属性属性值说明caption“售楼管理系统”设置窗体标题iconSystem.ico设置窗体图标pictureDesktop.bmp设置窗体背景图案startupposition2-Centerscreen设置窗体默认位置windowstate2-maximized设置窗体默认状态名称frmmain设置窗体名称菜单属性设置：标题名称房产管理Housemanage户型登记Housestylelogin楼盘登记buildinglogin户型查询housestylefind楼盘查询buildingfind客户管理customermanage客户资料登记Customerlogin客户资料查询customerdatefind收费管理chargemanage收费登记chargelogin收费查询chargefind售搂管理buildingsalemanage销售人员登记salemanlogin售搂合同管理buildingsalebargain收款管理gatheringmanage销售人员查询salemanfind售搂合同查询buildingsaledfind收款情况查询gatheringfind系统维护syetemmaintenance数据备份databasebak数据恢复datebaserecovery系统管理sysmanage添加用户adduser退出系统exitsysB．窗体设计状态效果如下：菜单设计状态效果如下：C.工作流程：通过登录窗体成功后就进入了主窗体，当选择菜单中的某一项的下列选项时就会弹出相应功能的模块程序，也可以使用快捷的按钮方式。这些功能方便，简单，易操作和理解。D．模块原代码：OptionExplicitPrivateSubadduser_Click()Frmadduser.ShowEndSubPrivateSubbuildingfind_Click()Frmbuildingfind.ShowEndSubPrivateSubbuildinglogin_Click()frmBuildingLogin.ShowEndSubPrivateSubbuildingsale_Click()frmHetongLogin.ShowEndSubPrivateSubbuildingsalebargain_Click()frmHetongFind.ShowEndSubPrivateSubchargefind_Cl