【正文】 Txt(CurrentIndex).Text = Trim() = False If strTableName = 房屋信息表 Then If Lbl(CurrentIndex).Caption = 房型名稱 Then Dim rsZD As New If Then select * from 房 型 信 息 表 where 房型名稱 =39。保存 On Error GoTo Err Dim i As Integer If nModeSys = 1 Then If Then For i = 0 To Val(Txt(0).Text) 1 If Trim(Txt(i + 1).Text) = Then Else (i).Value = Trim(Txt(i + 1).Text) End If Next i ElseIf nModeSys = 2 Then For i = 0 To Val(Txt(0).Text) 1 If Trim(Txt(i + 1).Text) = Then Else (i).Value = Trim(Txt(i + 1).Text) End If Next i End If nModeSys = 0 = False MsgBox 操作已成功 !, vbInformation + vbOKOnly, 系統(tǒng)提示 Exit Sub Err: MsgBox , vbInformation + vbOKOnly, 系統(tǒng)提示 End Sub Private Sub Combo1_Click() 39。39。39。39。 給予我很大的幫助，不僅幫我解答了不少的難點(diǎn)，還給我提出了許多建議，我會(huì)以他們?yōu)榘駱樱玫嘏Α? 最后就是從一而終的問題了，在開發(fā)過程中我遇到了許許多多的問題，很多地方都不明白，經(jīng)常有打退堂鼓的想法，我經(jīng)常的請(qǐng)教同學(xué)和老師，最后的成果雖然不很完美，但我盡力了，并有所收獲。 首先便是調(diào)研的不充分。這些都有待進(jìn)一步改善。 （ 2）適應(yīng)性維護(hù) 使系統(tǒng)適用環(huán)境的變化而進(jìn)行的維護(hù)。 內(nèi)存： 32MB以上 。在查詢完后，可以在如圖 57 中輸出 Excel報(bào)表。 修改：移動(dòng)到要修改的記錄，點(diǎn)修改，修改完后，點(diǎn)保存后就修改完畢。 各按鈕的功能：（所有管理界面） ：移動(dòng)到第一條記錄。這樣下一次再進(jìn)入本系統(tǒng)時(shí)本用戶的密碼就改為新密碼。如果系統(tǒng)已經(jīng)添加的該用戶，系統(tǒng)自動(dòng)提示，重新添加。在系統(tǒng)功能設(shè)計(jì)中，系統(tǒng)維護(hù)功能主要有添加用戶，刪除用戶，和管理員密碼修改，如圖 53 所示。 數(shù)據(jù)庫的連接采用的是 ADO 對(duì)象。部分表結(jié)構(gòu)如下： 房屋信息表結(jié)構(gòu)如圖：圖 46 圖 46房屋信息表 房型信息表結(jié) 構(gòu)如下：圖 47 圖 47 房型信息表 公司基本信息表：圖 48 圖 48公司基本信息表 客戶信息表：圖 49 圖 49 客戶信息表 樓房信息表：圖 410 圖 410 樓房信息表 樓盤信息表：圖 411 圖 411 樓盤信息表 銷售信息表：圖 412 圖 412 銷售信息表 員工信息表 :圖 413 圖 413員工信息表 用戶信息表：圖 414 圖 414 用戶信息表 其他的表請(qǐng)參考數(shù)據(jù)庫，表名如下：圖 415 圖 415表名 第五章 系統(tǒng)開發(fā)實(shí)現(xiàn) 應(yīng)用程序是用 VB 開發(fā)的，界面設(shè)計(jì)的簡單明了。關(guān)系型數(shù)據(jù)庫要盡量按 關(guān)系規(guī)范化要求進(jìn)行數(shù)據(jù)庫設(shè)計(jì)，但為使效率高，規(guī)范化程度應(yīng)根據(jù)應(yīng)用環(huán)境和條件來決定。 第二節(jié) 系統(tǒng)結(jié)構(gòu)設(shè)計(jì) 登錄 模塊結(jié)構(gòu)流程圖：如圖 41。 樓房信息模塊包括：對(duì)新樓房添加，和現(xiàn)有的樓房信息修改查詢。 員工信息 模塊包括：顯示添加修改刪除查詢。 用戶權(quán)限 主要任務(wù)是提高系統(tǒng)安全性和 使用性，為 系統(tǒng)提供良好的維護(hù)，如用戶 管理 可以為用戶提供權(quán)限服務(wù)。 第四章 系統(tǒng)設(shè)計(jì) 隨著科學(xué)技術(shù)的不斷提高 ,計(jì)算機(jī)科學(xué)日漸成熟 ,其強(qiáng)大的功能已為人們深刻認(rèn) 識(shí) ,它已進(jìn)入人類社會(huì)的各個(gè)領(lǐng)域并發(fā)揮著越來越重要的作用。多行 Insert 語句為拷貝數(shù)據(jù)提供了一種緊湊而高效的方法 。 下面是一個(gè)簡單 SQL語句的例子： 我們使用 SQL語句來從 user_info中檢索 ‘ 用戶 ID’ 為 ‘000001’ 的 用戶 姓名： SELECT 姓名 FROM user_info WHERE用戶 ID = ‘000001’ 數(shù)據(jù)定義語言 DDL：它是用來創(chuàng)建和修改數(shù)據(jù)庫結(jié)構(gòu)的一種語句，包括 Create、 Alter和 Drop 語句。 統(tǒng)一的語言 ： SQL可用于所有用戶的 DB活動(dòng)模型，包括系統(tǒng)管理員、數(shù)據(jù)庫管理員、 應(yīng)用程序員、決策支持系統(tǒng)人員及許多其它類型的終端用戶。使用 SQL的常見關(guān)系數(shù)據(jù)庫管理系統(tǒng)有： Oracle、 Sybase、 Microsoft SQL Server、 Access 等等。 ? 窗體設(shè)計(jì)對(duì)象 可以設(shè)計(jì)用戶接口，用來輸入并處理數(shù)據(jù)。 Open方法 (ADO Recordset)： 打開記錄集。也可以使用 AddNew和 Update方法將值的數(shù)組作為參數(shù)傳遞，同時(shí)更新記錄的若干字段。 OLE DB 是一種底層編程接口，用來訪問許多不同類型的數(shù)據(jù)源，其中包括消息、文件系統(tǒng)以及其他一些非傳統(tǒng)的數(shù)據(jù)源。它與以前 Visual Basic 的DAO、 RDO 相比有了很大的提高。 從簡單的文本文件到各種復(fù)雜的關(guān)系型數(shù)據(jù)庫，數(shù)據(jù)庫應(yīng)用程序需要面對(duì)各種各樣的數(shù)據(jù)源。以適用人員來分，可有以下三個(gè)版本： 1. 標(biāo)準(zhǔn)版 針對(duì)一般程序設(shè)計(jì)人員 ,適合普通應(yīng)用系統(tǒng)的開發(fā)。 系統(tǒng)要求 一 、 硬件要求 : 1 486/DX66Mhz以上 CPU 2 內(nèi)存 16M以上 (使用 Windows NT需要 32M以上內(nèi)存 ) 3 硬盤容量 1GB 以上 (典型安裝需要 128MB 硬盤空間 ,完全安裝須要 147MB 硬盤空間 ,外加Microsoft開發(fā)者文檔 67MB硬盤空間 ) 4 EGA以上分辨率的顯示器 . 5 一個(gè) CDROM驅(qū)動(dòng)器 6 鼠標(biāo)或其它定點(diǎn)設(shè)備 二 、 軟件要求 1 操作系統(tǒng)應(yīng)使用 Microsoft Windows95及以上版本 ,或者使用 Microsoft Windows 或者更高版本 . 2 安裝有 . 第二章 開發(fā)語言介紹 本管理系統(tǒng)采用的數(shù)據(jù)庫是 SQL Server 2020 數(shù)據(jù)庫，開發(fā)語言為 Microsoft Visual Basic (簡稱 )。對(duì)于房地產(chǎn)企業(yè)來說，利用計(jì)算機(jī)支持企業(yè)高效率完成樓盤銷售管理的日常事務(wù)，是適應(yīng)現(xiàn)代企業(yè)制度要求、推動(dòng)企業(yè)勞動(dòng)型管理走向科學(xué)化、規(guī)范化的必要條件；而房屋銷售管理是一項(xiàng)瑣碎、復(fù)雜而又十分細(xì)致的工作，樓盤的銷售 ,客戶資料 的管理 ,物業(yè)收費(fèi) ,以及售樓的合同協(xié)議等管理 ,一般不允許出錯(cuò)，如果實(shí)行手工操作 ,須手工填制大量的表格 ,這就會(huì)耗費(fèi)工作人員大量的時(shí)間和精力，計(jì)算機(jī)進(jìn)行售樓工作的管理，不僅能夠保證各項(xiàng)信息準(zhǔn)確無誤、快速輸出，同時(shí)計(jì)算機(jī) 具有手工管理所無法比擬的優(yōu)點(diǎn) .例如 :檢索迅速、查找方便、可靠性高、存儲(chǔ)量大、保密性好、壽命長、成本低等。但目前還沒有真正實(shí)現(xiàn)信息的快速查詢，也不能根據(jù)客戶需要進(jìn)行檢索， “ 服務(wù) “ 問題仍然存在 。 國內(nèi)的現(xiàn)狀 ： 從目前中國房產(chǎn)中介的現(xiàn)狀看，普遍存在著人力資源匱乏、企業(yè)規(guī)模小、管理水平低、項(xiàng)目運(yùn)作能力差、資產(chǎn)負(fù)債率高等問題。隨著互聯(lián)網(wǎng)的廣 泛應(yīng)用，法國的房 產(chǎn) 中介公司大都設(shè)有網(wǎng)站，從公司誠信為客戶服務(wù)、幫你解除煩惱的承諾到各種房屋租賃、買賣業(yè)務(wù)的經(jīng)營項(xiàng)目，一應(yīng)俱全。但隨著時(shí)代的變化，房地產(chǎn)已告別短缺時(shí)代，房地產(chǎn)市場已開始邁入買方市場，消費(fèi)者成為市場的主導(dǎo)力量，只有適應(yīng)消費(fèi)者的產(chǎn)品和被消費(fèi)者接受的品牌，才能適應(yīng)市場，受到青睞。 MCIROSPFT 公司的 VB 開發(fā)工具 ,有各種各種面向?qū)ο蟮目丶?。我們將?VB 中使用 ADO 控件連接 ACCESS 數(shù)據(jù)庫，將存在數(shù)據(jù)庫的信息通過界面顯示出來，并進(jìn)行修改，查詢等操作。 因此，在現(xiàn)代化的房地產(chǎn)營銷理念中，已將房地產(chǎn)營銷思想貫穿到了房地產(chǎn)的設(shè)計(jì)、生產(chǎn)、銷售、售后服務(wù)等各個(gè)環(huán)節(jié)，或者說房地產(chǎn)再生產(chǎn)過程的各個(gè)環(huán)節(jié)都是圍繞 著房地產(chǎn)營銷來展開。如確實(shí)想租或買房，只須打開網(wǎng)上表格填入姓名、身份、購買或租用房屋的類別、最高出價(jià)地段、面積、間數(shù)、準(zhǔn)備何時(shí)入住租期多長等要求，便可得到相關(guān)信息。尤其是一些中、小房地產(chǎn)企業(yè)，在經(jīng)營手法和市場競爭方式上，大多處在相互 模仿的階段，在所有制、規(guī)模、效益三個(gè)方面明顯表現(xiàn)出市場競爭力的不足。 系統(tǒng)分析 開發(fā)背景 隨著我國市場經(jīng)濟(jì)的快速發(fā)展和信息化水平的不斷提高，如何利用先進(jìn)的管理手段，提高房地產(chǎn)企業(yè)樓盤銷售管理的水平，是當(dāng)今社會(huì)所面臨的一個(gè)課題。這些優(yōu)點(diǎn)能夠極大地提高房屋企業(yè)管理的效率 ,也是企業(yè)的科學(xué)化、正規(guī)化管理 ,與世界接軌的重要條件。 ，用 SQL Server 2020作為后臺(tái)支持?jǐn)?shù)據(jù)庫，通過 SQL Server 2020中并對(duì)其編程來實(shí)現(xiàn)各種功能。 2. 專業(yè)版 針對(duì)專業(yè)程序開發(fā)人員，它在標(biāo)準(zhǔn)版的基礎(chǔ)上提供了對(duì)數(shù)據(jù)庫和 Inter的支持。 Visual basic ADO(Active Data Objects)作為應(yīng)用程序和 OLEDB連接的橋梁 ADO,即 Active數(shù)據(jù)對(duì)象（ Active Data Objects）：實(shí)際是一種提供訪問各種數(shù)據(jù)類型的連接機(jī)制。 DAO(Data Access Objects)即數(shù)據(jù)訪問對(duì)象，是一種面向?qū)ο蟮慕缑娼涌凇?OLE DB是一個(gè)由 Component Object Model（ COM）接口組成的集合，用來隱藏創(chuàng)建數(shù)據(jù)訪問服務(wù)過程中的細(xì)節(jié)。 Field對(duì)象 ： 代表使用普通數(shù)據(jù)類型的數(shù)據(jù)的列 。 Close方法 ： 關(guān)閉打開的對(duì)象及任何相關(guān)對(duì)象。 ? 報(bào)表對(duì)象 利用視圖向?qū)У拈_發(fā)方式，簡單、快速的建立出需求報(bào)表或標(biāo)簽。雖然絕大多數(shù)的數(shù)據(jù)庫系統(tǒng)使用 SQL，但是它們同樣有它們自立另外的專有擴(kuò)展功能用于它們的系統(tǒng)。 所有關(guān)系數(shù)據(jù)庫的公共語言 ： 由于所有主要的關(guān)系數(shù)據(jù)庫管理系統(tǒng)都支持 SQL語言，用戶可將使用 SQL的技能從一個(gè) RDBMS(關(guān)系數(shù)據(jù)庫管理系統(tǒng) )轉(zhuǎn)到另一個(gè)，所有用 SQL編寫的程序都是可以移植的。數(shù)據(jù)操作語言 DML：包括數(shù)據(jù)查詢與數(shù)據(jù)更新。 Update語句用于更新單表中選定行的一列或多列的值。 作為計(jì)算機(jī)應(yīng)用的一部分 ,使用計(jì)算機(jī)對(duì)房地產(chǎn)銷售進(jìn)行管理 ,具有著手工管理所無法比擬的優(yōu)點(diǎn) .例如 :檢索迅速、查找方便、可靠性高、存儲(chǔ)量大、保密性好、壽命長、成本低等。 該系統(tǒng)是基于 SDI窗體 ， 以 VB自帶的 jet引擎連接 Access 2020數(shù)據(jù)庫進(jìn)行開發(fā)的 房地產(chǎn)銷售系統(tǒng) ，力求與實(shí)際相結(jié)合具有 房地產(chǎn)銷售 日常管理和 檢索 等功能，旨在達(dá)到使 房地產(chǎn)銷售 的管理數(shù)字化 ， 使之更加方便快捷 ， 以 提高工作效率。 房型信息 模塊包括：顯示添加修改刪除查詢。 房屋信息模塊包括：對(duì)新房屋添加，和現(xiàn)有的房屋信息修改查詢。 管理員用戶 普通用戶 圖 41 登錄系統(tǒng)模塊結(jié)構(gòu) 基本資料 模塊結(jié)構(gòu)流程圖：如圖 42。數(shù)據(jù)表設(shè)計(jì)不僅要滿足數(shù)據(jù)存儲(chǔ)的要求，還要增加一些如反映有關(guān)信息、操作責(zé)任、中間數(shù)據(jù)的字段或臨時(shí)數(shù)據(jù)表。根據(jù)需求分析和功能設(shè)計(jì)，系統(tǒng)應(yīng)用程序分為五大模塊：登錄模塊、 信息管理、檢索打印、系統(tǒng)管理、系統(tǒng)幫助五個(gè)模塊。連接代碼如下： If Then = Provider=。只有管理員用戶才有權(quán)限進(jìn)入本界面。 刪除用戶：選中要?jiǎng)h除的用戶，直接點(diǎn)刪除、系統(tǒng)有提示是否真的刪除，點(diǎn) 是，就刪除了此用戶。其中密碼數(shù)據(jù)用戶信息表中姓名和密碼字段對(duì)應(yīng)的記錄。 ：移動(dòng)到上一條記錄。 所有的信息表中的序號(hào)及各種編號(hào)一定要統(tǒng)一 、規(guī)范。 圖 57客戶信息查詢 圖 58檢索條件 在選擇條件包括 =， ,=,=,like，其中 like是用于模糊檢索。 硬盤： （可用空間最好在 160MB以上）。 （ 3）完善性維護(hù) 為滿足用戶