小區(qū)物業(yè)收費(fèi)管理系統(tǒng)研討-資料下載頁
2025-04-12 06:21本頁面
【正文】 圖 410 戶型查詢窗口代碼設(shè)計按面積查詢_clickLH=TRIM()=4=SELECT * FROM 繳費(fèi)信息表 WHERE TRIM(面積 )=LH INTO CURSOR TEMP 數(shù)據(jù)統(tǒng)計數(shù)據(jù)統(tǒng)計主要實現(xiàn)：每棟樓住戶統(tǒng)計；每棟樓繳費(fèi)住戶統(tǒng)計。窗體運(yùn)行效果如圖 41圖412 所示。圖 411 住戶統(tǒng)計代碼設(shè)計統(tǒng)計個樓人數(shù)_click=4=SELECT 樓號 ,COUNT(*) AS 人數(shù) FROM 繳費(fèi)信息表 GROUP BY 樓號 INTO CURSOR TEMP 10 / 16圖 412 繳費(fèi)統(tǒng)計代碼設(shè)計統(tǒng)計已繳費(fèi)人數(shù)_click=4=SELECT 樓號 ,COUNT(*) AS 人數(shù) FROM 繳費(fèi)信息表 GROUP BY 樓號 WHERE 是否繳費(fèi) =.T. INTO CURSOR TEMP 系統(tǒng)維護(hù)系統(tǒng)維護(hù)功能主要實現(xiàn)：登錄用戶密碼設(shè)置；系統(tǒng)初始化；數(shù)據(jù)備份和恢復(fù)功能。圖 413 密碼設(shè)置代碼設(shè)計確定_click 代碼YHM=TRIM()MM=TRIM()MM1=TRIM()MM2=TRIM()SELECT 密 碼 表LOCATE FOR 用 戶 名 =YHM AND 密 碼 =MMIF FOUND()11 / 16 IF MM1=MM2 REPL 密 碼 WITH MM1 MESSAGEBOX(密 碼 修改成功 !,48,提示 ) ELSE MESSAGEBOX(新密 碼兩 次 輸 入不一致 !,48,提示 ) = () ENDIFELSE MESSAGEBOX(用 戶 名或密 碼錯誤 !,48,提示 ) = ()ENDIF 圖 414 系統(tǒng)初始化代碼設(shè)計系統(tǒng)初始化_clicknum=do case case num=1 YN=MESSAGEBOX(慎重操作！,36,提示) if yn=6 *select 0 *use 繳費(fèi)信息表 delete all pack else return endif case num=2 12 / 16附錄 A 參考文獻(xiàn)1．Visual FoxPro 精彩編程200例 機(jī)械工業(yè)出版社 王國輝、董韶華等 2022年9月2．Visual foxpro數(shù)據(jù)庫開發(fā)關(guān)鍵技術(shù)與實例應(yīng)用 人民郵電出版社 周桓、2022年5月3．Visual FoxPro 管理信息系統(tǒng)完整項目實例剖析 人民郵電出版社 2022年7月
公司管理相關(guān)推薦
鄂ICP備17016276號-1