小區(qū)現(xiàn)代化電腦業(yè)務(wù)管理畢業(yè)論文(編輯修改稿)
2025-07-25 18:38 本頁(yè)面
【文章內(nèi)容簡(jiǎn)介】 開(kāi)發(fā)完成，這里向他們表示深深的感謝。參考文獻(xiàn)[1]《Visual FoxPro數(shù)據(jù)庫(kù)開(kāi)發(fā)實(shí)例解析》機(jī)械工業(yè)出版社 王晶瑩、王國(guó)輝 2003年9月[2]《Visual FoxPro 精彩編程200例》機(jī)械工業(yè)出版社 王國(guó)輝、董韶華等 2004年9月[3]《Visual foxpro數(shù)據(jù)庫(kù)開(kāi)發(fā)關(guān)鍵技術(shù)與實(shí)例應(yīng)用》人民郵電出版社 周桓、張雨、王國(guó)輝2004年5月[4]《Visual FoxPro管理信息系統(tǒng)完整項(xiàng)目實(shí)例剖析》人民郵電出版社 明日科技 2005年7月 附錄A 數(shù)據(jù)表電費(fèi)表(tabdianmoney)用來(lái)保存電費(fèi)信息，其結(jié)構(gòu)如表A1所示表A1字段名數(shù)據(jù)類(lèi)型字段大小索引電表編號(hào)字符型20升序戶主姓名字符型10收費(fèi)標(biāo)準(zhǔn)數(shù)值型8，2計(jì)費(fèi)起始日期日期型8計(jì)費(fèi)終止日期日期型8本月讀數(shù)整型4上月讀數(shù)整型4使用數(shù)整型4應(yīng)收金額貨幣型8實(shí)收金額貨幣型8房間編號(hào)字符型20大樓信息表(tabdlinfo)是用來(lái)保存大樓的基本信息，其結(jié)構(gòu)如表A2所示表A2字段名數(shù)據(jù)類(lèi)型字段大小索引大樓編號(hào)字符型10升序大樓名稱字符型20大樓說(shuō)明字符型50大樓位置字符型30房屋數(shù)量整型4總戶數(shù)整型4負(fù)責(zé)人字符型10所屬區(qū)域字符型20備注字符型100照片備注型4建筑面積數(shù)值型15，6竣工日期日期型8交工日期日期型8大樓結(jié)構(gòu)字符型20朝向字符型20單元數(shù)整型4房屋信息表(tabfwinfo)用來(lái)保存房屋信息，其結(jié)構(gòu)如表A3所示表A3字段名數(shù)據(jù)類(lèi)型字段大小索引房間編號(hào)字符型30升序小區(qū)名稱字符型20大樓名稱字符型20單元字符型10樓層字符型10房間號(hào)碼字符型10房主代號(hào)字符型20房主姓名字符型10權(quán)屬類(lèi)型字符型20朝向字符型20房間結(jié)構(gòu)字符型20用途字符型30房間類(lèi)別字符型20配備設(shè)施字符型30房屋狀態(tài)字符型12建筑面積數(shù)值型12，6使用面積數(shù)值型12，6公產(chǎn)面積數(shù)值型12，6私產(chǎn)面積數(shù)值型12，6是否空閑邏輯型1備注字符型100房屋統(tǒng)計(jì)表(tabfwtj)是用來(lái)保存房屋統(tǒng)計(jì)信息，其結(jié)構(gòu)如表A4所示表A4字段名數(shù)據(jù)類(lèi)型字段大小索引是否空閑字符型10房間數(shù)整型4煤氣費(fèi)(tabmqmoney)是用來(lái)保存煤氣費(fèi)的信息，其表結(jié)構(gòu)如表A5所示表A5字段名數(shù)據(jù)類(lèi)型字段大小索引煤氣表編號(hào)字符型20升序戶主姓名字符型10收費(fèi)標(biāo)準(zhǔn)數(shù)值型8，2計(jì)費(fèi)起始日期日期型8計(jì)費(fèi)終止日期日期型8本月讀數(shù)整型4上月讀數(shù)整型4使用數(shù)整型4應(yīng)收金額貨幣型8實(shí)收金額貨幣型8房間編號(hào)字符型20權(quán)限表(tabpurview)是用來(lái)設(shè)置管理員及一般操作員的權(quán)限信息，其表結(jié)構(gòu)如表A6所示表A6字段名數(shù)據(jù)類(lèi)型字段大小索引操作員編號(hào)字符型10升序操作員姓名字符型10升序密碼字符型8權(quán)限級(jí)別字符型1經(jīng)營(yíng)部邏輯型1管理部邏輯型1財(cái)務(wù)部邏輯型1保安部邏輯型1經(jīng)理室邏輯型1系統(tǒng)管理邏輯型1小區(qū)信息表(tabxqinfo)是用來(lái)保存小區(qū)的基本信息，其結(jié)構(gòu)如表A7所示表A7字段名數(shù)據(jù)類(lèi)型字段大小索引小區(qū)編號(hào)字符型10升序小區(qū)名稱字符型20小區(qū)說(shuō)明字符型50負(fù)責(zé)人字符型10樓棟數(shù)整型4總戶數(shù)數(shù)值型4建筑面積數(shù)值型12，6居住面積數(shù)值型12，6綠化面積數(shù)值型12，6占地面積數(shù)值型12，6地址字符型30備注字符型100照片備注型4竣工日期日期型8交工日期日期型8業(yè)主信息表(tabyzinfo)是用來(lái)保存小區(qū)業(yè)主的基本信息，其結(jié)構(gòu)如表A8表A8字段名數(shù)據(jù)類(lèi)型字段大小索引業(yè)主代號(hào)字符型20升序業(yè)主姓名字符型10性別字符型2聯(lián)系地址字符型30手機(jī)字符型20電話字符型20工作單位字符型50單位電話字符型20證件名字符型30證件號(hào)字符型30簽約日期日期型8進(jìn)住日期日期型8進(jìn)住起始日期日期型8進(jìn)住截止日期日期型8字段名數(shù)據(jù)類(lèi)型字段大小索引是否進(jìn)住字符型10購(gòu)房合同書(shū)編號(hào)字符型20管理協(xié)議書(shū)編號(hào)字符型20購(gòu)入房編號(hào)字符型20小區(qū)名稱字符型20大樓名稱字符型20房間號(hào)碼字符型10附錄B 代碼系統(tǒng)主界面代碼：在類(lèi)的Init事件中添加以下代碼：public bz amp。amp。定義全局變量bz=.f.=2 amp。amp。設(shè)置視圖顯示方式==amp。amp。添加列表項(xiàng)=(,39。小區(qū)信息生成39。,1)=(,39。大樓信息生成39。 ,1)=(,39。房屋信息生成39。,1)=(,39。小區(qū)信息登記39。,1)=(,39。大樓信息登記39。,1)=(,39。房屋信息登記39。,1)=(,39。系統(tǒng)數(shù)據(jù)設(shè)定39。,1)單擊快捷工具條上的“經(jīng)營(yíng)部”按鈕，將在左側(cè)的List列表中顯示經(jīng)營(yíng)部各功能選項(xiàng)。各功能選項(xiàng)由圖標(biāo)和標(biāo)識(shí)性文字組成。具體代碼如下：在“經(jīng)營(yíng)部”按鈕的Click事件中添加以下代碼： amp。amp。清除數(shù)據(jù)=2 amp。amp。設(shè)置視圖顯示方式*將ImageList控件圖片賦予Listview控件===(,39。小區(qū)信息生成39。,1)=(,39。大樓信息生成39。,1)=(,39。房屋信息生成39。,1)=(,39。小區(qū)信息登記39。,1)=(,39。大樓信息登記39。,1)=(,39。房屋信息登記39。,1)=(,39。系統(tǒng)數(shù)據(jù)設(shè)定39。,1)在“管理部”按鈕的Click事件中添加以下代碼：=2===(,39。業(yè)主信息登記39。,2)=(,39。人口信息查詢39。,2)=(,39。小區(qū)員工管理39。,2)=(,39。系統(tǒng)數(shù)據(jù)設(shè)定39。,2)pjyb=.t.注：財(cái)務(wù)部、保安部、經(jīng)理室、系統(tǒng)管理及幫助的實(shí)現(xiàn)代碼同管理部的類(lèi)似，此處將不再贅述。在“退出”按鈕的Click事件中添加以下代碼：quit amp。amp。退出主程序在控件image1的Click事件中添加以下代碼：=39。圖片|*.bmp。*.jpg39。 amp。amp。 amp。amp。顯示打開(kāi)對(duì)話框= amp。amp。顯示選定文件的名字系統(tǒng)登錄界面代碼在表單的Init事件中添加以下代碼：public amp。amp。定義全局變量=0 amp。amp。給全局變量賦初值=0 amp。amp。設(shè)置視圖顯示方式==select tabpurview amp。amp。選定Tabpurview工作區(qū)為當(dāng)前工作區(qū)select *。from wuyemanage!tabpurview。where 權(quán)限級(jí)別=39。139。order by 。into cursor sysgly==39。39。key=alltrim() amp。amp。賦值給變量key=(,key,1) amp。amp。添加一個(gè)列表項(xiàng)select tabpurviewselect *。from wuyemanage!tabpurview。where 權(quán)限級(jí)別=39。239。order by 。into cursor gjczydo while !EOF() amp。amp。測(cè)試當(dāng)前記錄指針是否在文件尾 key=alltrim() =(,key,2) amp。amp。添加一個(gè)列表項(xiàng)skip amp。amp。記錄指針向下移動(dòng)一條記錄enddoselect tabpurviewselect *。from wuyemanage!tabpurview。where 權(quán)限級(jí)別=39。339。order by 。into cursor ybczydo while !EOF() amp。amp。測(cè)試當(dāng)前記錄指針是否在文件尾 key=alltrim() =(,key,3) amp。amp。添加一個(gè)列表項(xiàng) skip amp。amp。記錄指針向下移動(dòng)一條記錄enddoselect tabpurviewselect *。from wuyemanage!tabpurview。where 權(quán)限級(jí)別=39。439。order by 。into cursor zdydo while !EOF() amp。amp。測(cè)試當(dāng)前記錄指針是否在文件尾 key=alltrim() =(,key,4) amp。amp。添加一個(gè)列表項(xiàng) skip amp。amp。記錄指針向下移動(dòng)一條記錄enddo單擊“登錄”按鈕，系統(tǒng)將判斷密碼是否正確。如果密碼不正確，將提示重新輸入，三次后仍不正確，系統(tǒng)將自動(dòng)退出。在“登錄”按鈕的Click事件中添加以下代碼：select tabpurviewame=alltrim()ppassword=alltrim()set order to 操作員姓名 amp。amp。指定控制索引文件if empty(操作員姓名) amp。amp。判斷操作員字段是否為空 amp。amp。執(zhí)行表單的Resize事件 store . pjyb,pglb,pgcb,pcwb,pbab,pjls,psysgl amp。amp。給多個(gè)內(nèi)存變量賦予相同的值elseseek ame amp。amp。查找輸入的操作員姓名set exact on amp。amp。設(shè)置字符精
語(yǔ)文相關(guān)推薦
鄂ICP備17016276號(hào)-1