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