【正文】 今后我會以此次的畢業(yè)設(shè)計為起點邁向更遠的未來。我在負責(zé)人及指導(dǎo)教師的指導(dǎo)下，順利的完成了這套小區(qū)物業(yè)管理系統(tǒng)。 本系統(tǒng)在開發(fā)過程中，在固定的物業(yè)管理要求的模式下還添加了一些人性化的，個人的構(gòu) 思和創(chuàng)意。 由于當(dāng)今的物業(yè)管理部門還不能有一個很統(tǒng)一的模式化，所以本系統(tǒng)僅考慮到一般小區(qū)所需要的物業(yè)管理的基本和主要的幾項功能，一個完好的小區(qū)物業(yè)管理系統(tǒng)還需要更多更復(fù)雜的功能要求。 End If strsql = = = = = = = MsgBox 修改成功 End Sub Private Sub Command4_Click() Dim strqsl As String Set db = OpenDatabase( + \) strsql = delete * from 收費信息表 where 住址 = 39。,物業(yè)管理費 = 39。,寬帶 = 39。 ,水費 = 39。 amp。 35 amp。 amp。 amp。 amp。 amp。 界面截圖如下 : 34 本模塊代碼如下： Private Sub Command1_Click() If = False Then = rs(住址 ) = rs(水費 ) = rs(電費 ) = rs(寬帶 ) = rs(垃圾清運費 ) = rs(物業(yè)管理費 ) = rs(收費時間 ) End If End Sub Private Sub Command2_Click() Dim strql As String Set db = OpenDatabase( + \) strsql = Insert Into 收費信息表 (住址 ,水費 ,電費 ,寬帶 ,垃圾清運費 ,物業(yè)管理費 ,收費時間 ) values (39。 strsql = = = = = MsgBox 刪除成功 End Sub Private Sub Command5_Click() Unload Me End Sub 33 Private Sub Command6_Click() Unload Me End Sub Private Sub Form_Load() Dim strsql As String Set db = OpenDatabase( + \) strsql = select * from 房屋基本信息 Set rs = (strsql) End Sub 物業(yè)收費管理模塊 物業(yè)收費管理用是對小區(qū)內(nèi)物業(yè)收費的總管理，主要功能也是對如 (住址、水費、電費、寬帶費、物業(yè)管理費、收費時間等信息 ) 的添加、修改、刪除、查詢及統(tǒng)計記錄個數(shù)。 where 出售信息 =39。,房屋結(jié)構(gòu) = 39。) strsql 32 = = = = = MsgBox 添加成功 End Sub Private Sub Command3_Click() Dim strsql As String If MsgBox(是否要修改此記錄 , 32 + 1, 修改 ) = 1 Then Set db = OpenDatabase( + \) strsql = update 房屋基本信息 set 住址 = 39。,39。,39。,39。,39。當(dāng)記錄較多，通過簡單的查詢可以方便的找的目標(biāo)記錄，查詢結(jié)果已表格方式顯示。 End If strsql = = = = = MsgBox 修改成功 End Sub Private Sub Command4_Click() Dim strqsl As String Set db = OpenDatabase( + \) strsql = delete * from 住戶基本信息表 where 住址 = 39。,入住時間 = 39。 ,戶主 = 39。 amp。 amp。 amp。 amp。 界面截圖如下 : 本模塊代碼如下： Private Sub Command1_Click() If = False Then = rs(戶主 ) = rs(住址 ) = rs(電話 ) = rs(入住時間 ) = rs(身份證號碼 ) End If End Sub 29 Private Sub Command2_Click() Dim strql As String Set db = OpenDatabase( + \) strsql = Insert Into 住戶基本信息表 (戶主 ,住址 ,電話 ,入住時間 ,身份證號碼 ) values (39。重新輸入密碼 SendKeys {HOME}+{END} End If End Sub 小區(qū)住戶信息管理模塊 住戶資料 主要是對住戶的基本信息如 (住戶電話、住戶姓名、物業(yè)地址、身份證號、入住時間等信息 )和另外兩個標(biāo)簽的信息進行添加、修改、刪除、查詢。用戶名或密碼不對 MsgBox 用戶名或密碼不對！ , vbOKOnly + vbInformation, 提示 Text1 = Text2 = intLoginTimes = intLoginTimes + 1 If intLoginTimes = 3 Then 39。Text2 = End If If strUserName = And strPassword = Then 39。找到記錄 strUserName = !用戶名 strPassword = !密碼 39。 amp。 amp。打開數(shù)據(jù)庫中的 用戶表 39。本系統(tǒng)分為以下三部分： (1) 用戶登陸； (2) 系統(tǒng)主體平臺； (3) 通過主體平臺調(diào)用的功能模塊。 表 房屋基本信息 表 字段名 數(shù)據(jù)類型 可否為空 住址 (主鍵 ) Char(10) NOT NULL 房屋結(jié)構(gòu) Varchar(50) NOT NULL 設(shè)備 Float(8) NOT NULL 房屋 面積 Float(8) NOT NULL 出售信息 Char(20) NULL (4) 處理故障 表 住戶 處理故障 表存放小區(qū)內(nèi)住戶的各種 故障 的所有信息。 3． 2． 5 退出 退出小區(qū)物業(yè)管理系統(tǒng)。 3． 2． 4 小區(qū)住戶 故障處理 管理功能 (1) 住戶報修基本信息的錄入，包括 住址 、報修 故障 、 經(jīng)辦人 、 處理時間 、查詢 等信息。 22 3． 2． 3 小區(qū)收費管理功能 (1) 其中包括物業(yè)收費和儀表收費兩大類信息的錄入，包括收費 住址 、 水費 、電費 、 寬帶費 、 物業(yè)管理費 、 收費時間 等信息。 3． 2． 2 小區(qū)房產(chǎn)信息管理功能 (1) 房產(chǎn)基本信息的錄入，包括物業(yè)地址、使用面積、 房屋結(jié)構(gòu) 、 設(shè)備 、 出售信息 等信息。 3． 2． 2 小區(qū)住戶信息管理功能 (1) 住戶基本信息的錄入，包括住戶 電話 、住戶姓名、物業(yè)地址、 身份證號 、入住時間等信息。 以上是對本信息管理系統(tǒng)進行的基本的需求分析，也就是本系統(tǒng)所要實現(xiàn)的基本功能。通過調(diào)研情況進行需求分析，進行模塊的劃分和功能的界定，并對各個模塊的具體管理流程進行控制和編碼實現(xiàn)。這些成為小區(qū)物業(yè)管理的主體。 19 (2) 開發(fā)平 臺前臺開發(fā)工具： Microsoft Visual Basic ① 前臺開發(fā)工具： Microsoft Visual Basic ② 后臺數(shù)據(jù)庫： Access 2020 20 第三章 系統(tǒng)分析 3． 1 需求分析 3． 1． 1 系統(tǒng)需求功能概括 經(jīng)過調(diào)研與可行性分析，出于對人們生活住房考慮，設(shè)計了這套小區(qū)物業(yè)管理系統(tǒng)，本系統(tǒng)主要考慮到小區(qū)物業(yè)管理的普遍要求，小區(qū)物業(yè)管理系統(tǒng)主要包括： (1) 對小區(qū)所有房屋資料的錄入和增、刪、改、查詢等功能實現(xiàn)，在基于這些小區(qū)的房產(chǎn)資源對小區(qū)進行管理。 ② 操作系統(tǒng)： Windows 9x/Me、 Windows 20 Windows XP、 Windows NT，分辨率： 1024*768。由于合同的規(guī)定，能否 預(yù)期的交付涉及到開發(fā)人員的信譽等等。 18 2． 2． 3 操作可行性 對于 這套小區(qū)物業(yè)管理系 統(tǒng)而言，在投入使用前，會由開發(fā)并能熟練操作本系統(tǒng)的工程人員對用戶群進行專業(yè)系統(tǒng)的培訓(xùn)。做為我國支柱產(chǎn)業(yè)之一的房地產(chǎn)業(yè)在當(dāng)今智能化小區(qū)的發(fā)展的驅(qū)動下，在當(dāng)今信息時代的推動下，擁有自己的一套特色的小區(qū)物業(yè)管理系統(tǒng)是非常必要的，與小區(qū)內(nèi)繁多的硬件設(shè)施相比較，傳統(tǒng)的手 工式的管理方式已經(jīng)無法適合當(dāng)今的龐大的數(shù)據(jù)處理和精確的運算需求，所以一套精美完善的小區(qū)物業(yè)管理系統(tǒng)是提高工作效率節(jié)省人力物力的有效解決方案。 Access 是一種關(guān)系型數(shù)據(jù)庫管理系統(tǒng)，不但能存儲和管理數(shù)據(jù)，還能編寫數(shù)據(jù)庫管理軟件，用戶可以通過 Access 提供的開發(fā)環(huán)境及工具方 便地構(gòu)建數(shù)據(jù)庫應(yīng)用程序，大部分是直觀的可視化的操作，無需編寫程序代碼，是一種使用方便、功能較強的數(shù)據(jù)庫開發(fā)工具。 (3)Access 簡介 Access 是 Office 辦公套件中 一個極為重要的組成部分。說它是一場革命，不是對對象本身而言，而是對它們處理工作的能力而言。 (2)面向?qū)ο缶幊痰母拍? 面向?qū)ο蟮某绦蛟O(shè)計 (ObjectOriented Programming，簡記為 OOP)是 Visual 誕生的基礎(chǔ)。 VB 可以用于可以開發(fā)多媒體、數(shù)據(jù)庫、網(wǎng)絡(luò)、圖形等方面的應(yīng)用程序。后臺的數(shù)據(jù)庫開發(fā)工具選用了 Access 2020，它能夠處理大量數(shù)據(jù)，同時保持數(shù)據(jù)完整性并提供許多高級管理和數(shù)據(jù)分配功能。而物業(yè)管理部門成為與業(yè)戶零距離接觸的終端部門，物業(yè)管理系統(tǒng)的作用不但使得繁重的手工工作變的簡單化，并且能夠使得業(yè)戶對物業(yè)的了解更加透明化。 2． 1． 1 背景及現(xiàn)狀 目前國家建設(shè)部房地產(chǎn)業(yè)司已將是否使用計算機進行管理列入了物業(yè)管理公司評定級別的項目之中。 由于物業(yè)管理業(yè)務(wù)的復(fù)雜性，再加上智能化小區(qū)這個概念的引入，物業(yè)管理逐漸趨于信息化高效率化，因此 上海的許多物業(yè)管理公司已引入了 “ 物業(yè)管理信息系統(tǒng) ” ，即通過計算機網(wǎng)絡(luò)和專業(yè)軟件對物業(yè)實施即時、規(guī)范、高效的管理。過去，管理人員僅僅把計算機看成是省錢的工具，而現(xiàn)在，計算機被看成是創(chuàng)造利潤的工具。 用戶參與信息資源管理（ IRM）的典型事例表現(xiàn)在分布式數(shù)據(jù)處理（ DDP）方面。過去，用戶管理人員在很大程度上是依靠信息服務(wù)人員來推薦、開發(fā)和實現(xiàn)所需的信息系統(tǒng)的。 妥善處理用戶同信息服務(wù)人員之間的關(guān)系，可以加強雙方的互相配合。 在用戶同信息服務(wù)人員的交流方面，沒有一個單位能做到盡善盡美，但是，確有某些單位已經(jīng)取