【正文】 表10 表Tabtsinfo的結(jié)構(gòu)字段名數(shù)據(jù)類(lèi)型長(zhǎng)度索引投訴編號(hào)字符型20升序居住位置字符型30投 訴 人字符型10性 別字符型2投訴人電話字符型20投訴時(shí)間日期型8被投訴方字符型10聯(lián)系方式字符型20投訴原因備注型4投訴狀況字符型20投訴方式字符型30投訴性質(zhì)字符型30處理意見(jiàn)字符型50接 待 員字符型10附錄C 文件架構(gòu)主文件架構(gòu)如圖8所示。表9 表Tabdlinfo的結(jié)構(gòu)字段名數(shù)據(jù)類(lèi)型長(zhǎng)度索引大樓編號(hào)字符型10升序大樓名稱(chēng)字符型20大樓說(shuō)明字符型50大樓位置字符型30房屋數(shù)量整 型4總 戶(hù) 數(shù)整 型4負(fù) 責(zé) 人字符型10所屬區(qū)域字符型20備 注字符型100照 片備注型4建筑面積數(shù)值型156竣工日期日期型15交工日期日期型8大樓結(jié)構(gòu)字符型20朝 向字符型20單 元 數(shù)整 型4q 投訴信息表Tabtsinfo投訴信息表Tabtsinfo是用來(lái)保存小區(qū)人員投訴信息。表8 表Tabdianmoney的結(jié)構(gòu)字段名數(shù)據(jù)類(lèi)型長(zhǎng)度索引電表編號(hào)字符型20升序戶(hù)主姓名字符型10收費(fèi)標(biāo)準(zhǔn)數(shù)值型82計(jì)費(fèi)起始日期日期型8計(jì)費(fèi)終止日期日期型8本月讀數(shù)整 型4上月讀數(shù)整 型4使 用 數(shù)整 型4應(yīng)收金額貨幣型8實(shí)收金額貨幣型8房間編號(hào)字符型20q 大樓信息表Tabdlinfo大樓信息表Tabdlinfo用來(lái)保存大樓的基本信息。執(zhí)行表單的Activate事件 =.f. =.t. =.f. endif附錄A 參考文獻(xiàn)1．《Visual Basic精彩編程200例》機(jī)械工業(yè)出版社 賽奎春、高春艷等2003年1月 2．《Visual Basic數(shù)據(jù)庫(kù)開(kāi)發(fā)實(shí)例解析》機(jī)械工業(yè)出版社 劉志銘、高春艷等2003年8月 3．《Visual FoxPro數(shù)據(jù)庫(kù)開(kāi)發(fā)實(shí)例解析》機(jī)械工業(yè)出版社 王晶瑩、王國(guó)輝等2003年9月 4．《Power Builder數(shù)據(jù)庫(kù)開(kāi)發(fā)實(shí)例解析》機(jī)械工業(yè)出版社 華傳銘、張振坤等2003年9月 5．《Delphi數(shù)據(jù)庫(kù)開(kāi)發(fā)實(shí)例解析》機(jī)械工業(yè)出版社 賽奎春、鄭驍鵬等2004年2月 6．《PowerBuilder 精彩編程200例》機(jī)械工業(yè)出版社 張振坤、李文立等 2004年9月7．《Visual FoxPro 精彩編程200例》機(jī)械工業(yè)出版社 王國(guó)輝、董韶華等2004年9月8．《ASP數(shù)據(jù)庫(kù)開(kāi)發(fā)實(shí)例解析》機(jī)械工業(yè)出版社 李嚴(yán)、于亞芳、王國(guó)輝 2004年12月9．《Delphi工程應(yīng)用與項(xiàng)目實(shí)踐》機(jī)械工業(yè)出版社 宋坤、趙智勇等2005年1月 10．《Visual Basic工程應(yīng)用與項(xiàng)目實(shí)踐》機(jī)械工業(yè)出版社 高春艷、李俊民等 2005年1月 11．《Visual C＋＋工程應(yīng)用與項(xiàng)目實(shí)踐》機(jī)械工業(yè)出版社 張雨、阮偉良等 2005年1月12．《JSP工程應(yīng)用與項(xiàng)目實(shí)踐》機(jī)械工業(yè)出版社 陳威、白偉明、李楠2005年2月13．《ASP工程應(yīng)用與項(xiàng)目實(shí)踐》機(jī)械工業(yè)出版社 王國(guó)輝、牛強(qiáng)、李南南2005年4月14．《Visual Basic 信息系統(tǒng)開(kāi)發(fā)實(shí)例精選》機(jī)械工業(yè)出版社 高春艷、李俊民、張耀庭等 2005年7月15．《ASP 信息系統(tǒng)開(kāi)發(fā)實(shí)例精選》機(jī)械工業(yè)出版社 王國(guó)輝、牛強(qiáng)、李南南等 2005年7月 16．《Delphi 信息系統(tǒng)開(kāi)發(fā)實(shí)例精選》機(jī)械工業(yè)出版社 宋坤、趙智勇、劉強(qiáng)等2005年7月 17．《Visual foxpro數(shù)據(jù)庫(kù)開(kāi)發(fā)關(guān)鍵技術(shù)與實(shí)例應(yīng)用》人民郵電出版社 周桓、張雨、王國(guó)輝2004年5月18．《Power Builder數(shù)據(jù)庫(kù)開(kāi)發(fā)關(guān)鍵技術(shù)與實(shí)例應(yīng)用》人民郵電出版社 劉志銘、張振坤、馮文萃 2004年5月19．《Delphi數(shù)據(jù)庫(kù)開(kāi)發(fā)關(guān)鍵技術(shù)與實(shí)例應(yīng)用》人民郵電出版社 賽奎春、陳紫鴻、宋昆2004年5月20．《Visual basic數(shù)據(jù)庫(kù)開(kāi)發(fā)關(guān)鍵技術(shù)與實(shí)例應(yīng)用》人民郵電出版社 高春艷、李艷2004年5月21．《Visual C++ 管理信息系統(tǒng)完整項(xiàng)目實(shí)例剖析》人民郵電出版社 明日科技2005年7月 22．《Visual Basic 管理信息系統(tǒng)完整項(xiàng)目實(shí)例剖析》人民郵電出版社 明日科技2005年7月 23．《PowerBuilder 管理信息系統(tǒng)完整項(xiàng)目實(shí)例剖析》人民郵電出版社 明日科技 2005年7月 24．《Visual FoxPro管理信息系統(tǒng)完整項(xiàng)目實(shí)例剖析》人民郵電出版社 明日科技2005年7月 25．《SQL Server數(shù)據(jù)庫(kù)開(kāi)發(fā)實(shí)例解析》機(jī)械工業(yè)出版社 宋昆、李嚴(yán)等2006年1月26．《Access數(shù)據(jù)庫(kù)開(kāi)發(fā)實(shí)例解析》機(jī)械工業(yè)出版社 李俊民、高春燕等2006年1月27．《Visual Basic數(shù)據(jù)庫(kù)系統(tǒng)開(kāi)發(fā)完全手冊(cè)》人民郵電出版社 明日科技王春才、高春艷、李俊民 2006年3月28．《Visual C++ 數(shù)據(jù)庫(kù)系統(tǒng)開(kāi)發(fā)完全手冊(cè)》人民郵電出版社 明日科技 王端、于速、張雨2006年3月29．《Delphi數(shù)據(jù)庫(kù)系統(tǒng)開(kāi)發(fā)完全手冊(cè)》人民郵電出版社 明日科技 宋坤、鄒天思2006年3月30．《JSP數(shù)據(jù)庫(kù)系統(tǒng)開(kāi)發(fā)完全手冊(cè)》人民郵電出版社 明日科技 王國(guó)輝、李文立、楊亮2006年3月31．《Visual Basic數(shù)據(jù)庫(kù)系統(tǒng)開(kāi)發(fā)案例精選》人民郵電出版社 明日科技 高春艷、李俊民、劉彬彬 2006年5月32．《Delphi 數(shù)據(jù)庫(kù)系統(tǒng)開(kāi)發(fā)案例精選》人民郵電出版社 明日科技 李文立、劉強(qiáng)、梁冰2006年5月33．《ASP數(shù)據(jù)庫(kù)系統(tǒng)開(kāi)發(fā)案例精選》人民郵電出版社 明日科技 孫明麗、鄒天思、蓋天宇2006年5月34．《JSP數(shù)據(jù)庫(kù)系統(tǒng)開(kāi)發(fā)案例精選》人民郵電出版社 明日科技 王國(guó)輝、王易2006年5月附錄B 數(shù)據(jù)表q 電費(fèi)表Tabdianmoney電費(fèi)表Tabdianmoney用來(lái)保存電費(fèi)信息。) select tabpurview locate for 操作員姓名=czyname amp。,48,39。更新數(shù)據(jù)表 endcase messagebox(39。where 操作員姓名==czyname amp。 update tabpurview set 權(quán)限級(jí)別=crand,經(jīng)營(yíng)部=jyb,管理部=glb,工程部=gcb,。 財(cái)務(wù)部=.f.,保安部=.t.,經(jīng)理室=.f.,系統(tǒng)管理=.f. where 操作員姓名==czyname case crand=39。339。amp。 update tabpurview set 權(quán)限級(jí)別=crand,經(jīng)營(yíng)部=.t.,管理部=.t.,工程部=.t.,財(cái)務(wù)部=.t.,。順序查詢(xún) do case case crand=39。ndialogtype=4+32nAnswer=messagebox(cmessagetext,ndialogtype,cmessagetitle)if nAnswer=6 select tabpurview locate for 操作員姓名=czyname amp。cmessagetext=39。獲取輸入信息crand=alltrim()jyb=glb=gcb=cwb=bab=jls=sysgl=cmessagetitle=39。具體代碼如下：czyname=alltrim() amp。amp。amp。amp。amp。amp。39。權(quán)限管理39。級(jí)別1為系統(tǒng)管理員，不能有多個(gè)，請(qǐng)重新輸入！39。amp。如果權(quán)限級(jí)別為1或4以上則給予系統(tǒng)警告。amp。439。amp。339。239。amp。139。amp。這種寫(xiě)法其實(shí)將Resize 事件當(dāng)成一個(gè)設(shè)相關(guān)控件是否有效的函數(shù)。amp。amp。39。amp。tabpurview39。amp。（3）重要控件的重要屬性如表7所示。圖7 權(quán)限設(shè)置表單運(yùn)行結(jié)果1．表單設(shè)計(jì)（1）在物業(yè)管理系統(tǒng)的項(xiàng)目中，新建一個(gè)表單，命名為“權(quán)限設(shè)置”。通過(guò)權(quán)限設(shè)置界面可設(shè)置一般操作員的權(quán)限以及查詢(xún)操作員權(quán)限級(jí)別及使用權(quán)限。amp。投訴狀態(tài)比例圖39。amp。小區(qū)人口比例圖39。已簽約、未簽約房間數(shù)各占總房間數(shù)的百分比39。amp。房產(chǎn)資源比例圖39。amp。未簽約39。已簽約39。操作失敗39。請(qǐng)先生成房屋信息！39。 order by 房間編號(hào)。 where amp。 endfor dl=alltrim(substr(dl1,1,len(dl1)14)) select tabfwinfo select *。 for i=1 to dl1=dl1+alltrim((i))+39。39。amp。房產(chǎn)資源比例圖39。請(qǐng)選擇要統(tǒng)計(jì)的大樓名稱(chēng)！39。房產(chǎn)資源比例圖39。設(shè)置Rowsourcetype屬性值為：6字段endif單擊“開(kāi)始分析信息”按鈕，將根據(jù)用戶(hù)在Combo2控件中選擇的統(tǒng)計(jì)依據(jù)對(duì)數(shù)據(jù)進(jìn)行統(tǒng)計(jì)，將統(tǒng)計(jì)結(jié)果保存到相應(yīng)的臨時(shí)表中，并在MSChart控件中顯示。賦數(shù)據(jù)值的源 =6 amp。 amp。賦數(shù)據(jù)源 =39。 amp。 else =39。 =39。) =39。,48,39。into cursor lindepif reccount()=0 messagebox(39。from wygl\database\tabdlinfo。39。39。amp。 leftsource=left(source,len(source)1) =amp。+fzr+39。+dlno+39。 into cursor lindl fzr=alltrim() dlno=alltrim() =1 source=source+dlname+39。 from wuyemanage!tabdlinfo。amp。amp。 leftsource=left(source,len(source)1) =amp。+fzr+39。+dlno+39。設(shè)置Rowsourcetype屬性值為：1值 source=dln