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