【正文】 略計劃。 (2)、分析部分，主要在 EDPS 基礎(chǔ)之上，對數(shù)據(jù)進行深加工，如運用各種管理模型、定量化分析手段、程序化方法、運籌學(xué)方法等對組織的生產(chǎn)經(jīng)營情況進行分析。有一點要明確， “ 進去的是垃圾，出來的也是垃圾 ” ，必須保證信息的準確性、一致性。 信息 管理者 信息處理器 信息用戶 信息源 10 1． 1． 3 管理信息系統(tǒng)的特點 管理信息的特點可以從七個方面來概括： (1)、 MIS 是一個人機結(jié) 合的輔助管理系統(tǒng)。 (4)、以高速度低成本完成數(shù)據(jù)的處理業(yè)務(wù)，追求系統(tǒng)處理問題的效率。因為信息處理模型和處理過程的直接對象是 數(shù)據(jù)信息，只有保證完整的數(shù)據(jù)資料的采集，系統(tǒng)才有運作的前提。任何一種開發(fā)策略都要明確以下問題： (1)、系統(tǒng)要解決的問題，如采取何種方式解決組織管理和信息處理方面的問題，對企業(yè)提出 的新的管理需求該如何滿足等。 (3)、系統(tǒng)開發(fā)的原則。針對己經(jīng)確定的開發(fā)策略選定相應(yīng)的 開發(fā)方法，是結(jié)構(gòu)化系統(tǒng)分析和 設(shè)計方法， 還是選擇原型法或面向?qū)ο蟮姆椒ā? 用結(jié)構(gòu)化生命周期開發(fā)方法開發(fā)一個 系統(tǒng)，將整個開發(fā)過程劃分為五個依次連接的階段： ① 系統(tǒng)規(guī)劃階段，主要任務(wù)是明確系統(tǒng)開發(fā)的請求，并進行初步的調(diào)查，通過可行性研究確定下一階段的實施。該階段的成果為下一階段的實施提供了編程指導(dǎo)書。結(jié)構(gòu)化生命周期開發(fā)方法嚴格區(qū)分了開發(fā)階段，非常重視文檔工作，對于開發(fā)過程中出現(xiàn)的問題可以得到及時的糾正，避免了出現(xiàn)混亂狀態(tài)。 原型法的應(yīng)用使人們對需求有了漸進的認識，從而使系統(tǒng)開發(fā)更有針對性。 1． 1． 6 管 理信息系統(tǒng)的經(jīng)濟效益評價 管理信息系統(tǒng)的效益評價分為直接經(jīng)濟效益評價和間接經(jīng)濟效益評價。造成這種看法的原因是，數(shù)據(jù)處理和信息服務(wù)人員不愿使用容易計算機用戶理解的語言同用戶進行交流?？梢姡脩艄芾砣藛T掌握這方面的知識是非常必要的。系統(tǒng)質(zhì)量的優(yōu)劣是直接與用戶同信息服務(wù)人員之間互相配合的好壞成正比的。用戶更多地參與信息系統(tǒng)的開發(fā)，這種趨勢早在 70 年代中期就開始了，而且，自那時以后不斷地發(fā)展，現(xiàn)在已進入了信息服務(wù)人員同用戶合作的時代。 1． 2． 3 我國 MIS的發(fā)展策略 直到最近幾年，人們才認識到：信息是一種資源，必須把這種有價值的資源加以利用，不使其白白浪費掉。發(fā)掘這種潛力所需要具有的計算機和信息處理的知識水平，這是大多數(shù)管理人員力所能及的。服務(wù)中心在接到業(yè)主報修后，會立刻打出工程部的報修單 ，提高了日常維修的服務(wù)質(zhì)量。滬上的中海、古北、萬科、卓越、永業(yè)、西部、金橋、船舶大廈、魏理仕、香港廣場、太平洋中心、華都大廈等近 200 家物業(yè)管理公司已部分或全部在某所管理的樓盤引入了物業(yè)管理信息系統(tǒng)?？尚行匝芯康哪康木褪怯米钚〉拇鷥r 在盡可能短的時間內(nèi)確定問題是否能夠解決 2． 2． 1 技術(shù)的可行性 小區(qū)物業(yè)管理系統(tǒng)采用了當前的主流計算結(jié)構(gòu)模式進行開發(fā)，前臺開發(fā)工具選用 Microsoft Visual Basic 。 (1) Visual Basic 的簡介 Visual Basic（簡稱 VB）是 Microsoft 公司開發(fā)的一種通用的基于對象的程序設(shè)計語言。 VB 中提供大量的控件，這些控件可幫助我們設(shè)計界面和實現(xiàn)功能，減少了編程人員的很多麻煩，提高了編程的效率和可靠性。它通過給程序中加入擴展語句，把函數(shù) “封裝 ”進 Windows 編程所必需的 “對象 ”中。除非整個開發(fā)環(huán)境都是面向?qū)ο蟮?，否則對 17 象產(chǎn)生的好處還沒有帶來的麻煩多?，F(xiàn)在它已經(jīng)成為 Office 辦公套件中不可缺少的部件了。 21 世紀是一個充滿競爭和挑戰(zhàn)的世紀。一套完善的小區(qū)物業(yè)管理系統(tǒng)可持續(xù)使用并能隨著時代和工作的需求不斷更新，一期投入終身受用，按長期的使用計算，開發(fā)系統(tǒng)的造價平均到每年與傳統(tǒng)式的管理方式的年耗資本相對比，性價比是可行的。所以本系統(tǒng)的操作是完全可行的。 2． 2． 5 硬件配置 (1) 硬件設(shè)備及操作系統(tǒng) ① 服務(wù)器： Pentium4 以上配置的高性 能 PC 機，內(nèi)存應(yīng)在 256M 以上，硬盤在 40G 以上。 Windows 9x 以上 操作系統(tǒng)。 (3) 在具有了所有的基本資料信息后，需要實現(xiàn)實質(zhì)性的物業(yè)管理。 3． 1． 2 系統(tǒng)操作 設(shè)計內(nèi)容 根據(jù)以上的操作需要研究設(shè)計內(nèi)容如下： (1) 模塊功能的研究設(shè)計：盡量采用物業(yè)管理部門中現(xiàn)有的軟硬件環(huán)境以及先進的管理系統(tǒng)開發(fā)方案，從而達到充分利用現(xiàn)有資源，提高系統(tǒng)開發(fā)水平和應(yīng)用效果的目的。 21 (3) 完備的信息查詢統(tǒng)計：為滿足管理和決策工作的需要，在查詢基礎(chǔ)上應(yīng)具備一定的統(tǒng)計功能。這樣，才能使系統(tǒng)得到不斷的完善，功能更加強大，與用戶的交互性更強。 (3) 住戶基本信息的刪除。 (3) 房產(chǎn)基本信息的刪除。 (3) 收費基本信息的刪除。 (3) 住戶 故障 基本信息的刪除。 表 用戶表 字段名 數(shù)據(jù)類型 可否為空 用戶名 （主鍵） Char(10) NOT NULL 密碼 Int NOT NULL (2) 住戶基本信息表 住戶表存放小區(qū)內(nèi)所有的住戶信息，這些信息也是小區(qū)物業(yè)管理的基本信息，在實現(xiàn)系統(tǒng)的各個功能中起真非常重要的作用。 表 物業(yè)收費表 字段名 數(shù)據(jù)類型 可否為空 住址 (主鍵 ) Char(10) NOT NULL 水費 Char(10) NOT NULL 電費 Varchar(50) NOT NULL 寬帶 Int(4) NOT NULL 垃圾清運費 Int(4) NOT NULL 物 業(yè)管理費 Varchar(50) NOT NULL 收費時間 Datetime NOT NULL 26 第五章 系統(tǒng)詳細設(shè)計 經(jīng)過以上的分析及建摸模，已經(jīng)完成了數(shù)據(jù)庫的后臺工作 。 界面截圖如下 : 本模塊代碼如下： Private Sub Command1_Click() Dim strUserName As String Dim strPassword As String Static intLoginTimes As Integer 27 If Trim() = Then 39。 用戶名 =39。 , , adSearchForward, 1 39。 39。沒找到記錄 39。關(guān)閉窗體 39。關(guān)閉數(shù)據(jù)庫中的 用戶表 End 39。當記錄較多， 通過 簡單 的 查詢可以 方便的找的目標記錄，查詢結(jié)果已表格方式顯示。,39。,39。,39。,39。) strsql = = = = = 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。 where 身份證號碼 =39。 strsql = = = = = MsgBox 刪除成功 30 End Sub Private Sub Command5_Click() Unload Me End Sub 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 房屋信息管理模塊 房產(chǎn) 資料 主要是對住戶的基本信息如 (物業(yè)地址、使用面積、房屋結(jié)構(gòu)、設(shè)備、出售信息等信息 )的添加、修改、刪除、查詢及統(tǒng)計記錄個數(shù)。 界面截圖如下 : 31 本模塊代碼如下： Private Sub Command1_Click() If = False Then = rs(住址 ) = rs(設(shè)備 ) = rs(房屋結(jié)構(gòu) ) = rs(房屋面積 ) = rs(出售信息 ) End If End Sub Private Sub Command2_Click() Dim strql As String Set db = OpenDatabase( + \) strsql = Insert Into 房屋基本信息 (住址 ,設(shè)備 ,房屋結(jié)構(gòu) ,房屋面積 ,出售信息 ) values (39。 amp。 amp。 amp。 amp。 ,設(shè)備 = 39。,房屋面積 = 39。 End If strsql = = = = = MsgBox 修改成功 End Sub Private Sub Command4_Click() Dim strqsl As String Set db = OpenDatabase( + \) strsql = delete * from 房屋基本信息 where 住址 = 39。記錄 較多，通過簡單的查詢可以方便的找的目標記錄，查詢結(jié)果已表格方式顯示。,39。,39。,39。,39。,39。,39。) strsql = = = = = = = 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。 strsql = = = = = = 36 = MsgBox 刪除成功 End Sub Private Sub Command5_Click() Unload Me End Sub 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 37 結(jié)束語 至此，小區(qū)物業(yè)管理系統(tǒng)設(shè)計與實現(xiàn)順利完成。希望在以后能夠?qū)π^(qū)的物業(yè)做更深一步的調(diào)研，在原由系統(tǒng)的基礎(chǔ)上不斷添加新功能。希望本系統(tǒng)能夠給用戶帶來方便。這使得我對以后的工作充滿了信