【文章內(nèi)容簡(jiǎn)介】 錄的部門(mén)編號(hào)作為參數(shù)傳遞給“部門(mén)信息”標(biāo)簽（ Bminfo）并以預(yù)覽的方式查看打印結(jié)果。 命令按鈕工具欄中的“保存”（ Cmdsave）按鈕的作用是判斷表單中各數(shù)據(jù)欄的填寫(xiě)情況，如果無(wú)誤則將緩沖區(qū)的數(shù)據(jù)寫(xiě)入數(shù)據(jù)表中。 創(chuàng)建考勤記錄管理表單 在項(xiàng)目管理器中新建一表單，命名為 Kqadm。 將“考勤記錄”數(shù)據(jù)表、“員工信息”數(shù)據(jù)表、“部門(mén)信息”數(shù)據(jù)表添加其數(shù)據(jù)環(huán)境中。用“考勤記錄”數(shù)據(jù)表中的“員工編號(hào)”字段作為表達(dá)式和“員工信息”數(shù)據(jù)表中的“員工 編號(hào)”字段建立關(guān)聯(lián)，用“員工信息”數(shù)據(jù)表的“所在部門(mén)”字段作為表達(dá)式和“部門(mén)信息”數(shù)據(jù)表中“部門(mén)編號(hào)”字段建立關(guān)聯(lián)。 表單在初始化時(shí)應(yīng)該是處于瀏覽狀態(tài)的，與考勤操作表單相同，要 使顯示日期的標(biāo)簽控件顯示系統(tǒng)日期。 由于可以通過(guò)考勤操作表單添加記錄，所以命令按鈕工具欄的“新建”（ Cmdadd）按鈕隱藏。 命令按鈕工具欄的“修改”（ Cmdmod）、“刪除”（ Cmddel）、“取消”（ Cmdcancel）、“退出”（ Cmdexit）按鈕的代碼可使用基類中定義好的代碼。 “查詢”（ Cmdser）按鈕的作用是調(diào)用一個(gè)輸入查詢條件的表單，表單的查詢功能將主要通該輸入查詢條件表單完成。 “查詢”（ Cmdser）按鈕的 Click 事件代碼如下： DO FORM KQSER “打 印”（ Cmdpri）按鈕的作用是將表單中當(dāng)前記錄的考勤編號(hào)作為參數(shù)傳遞給考勤記錄表單，以預(yù)覽方式查看瀏覽結(jié)果。 “打印”（ Cmdpri）按鈕的 Click 事件代碼如下： REPORT FORM KQBYDAY FOR 考勤編號(hào) = 考勤編號(hào) .VALUE PREVIEW 創(chuàng)建加班記錄管理表單 在項(xiàng)目管理器中新建一表單，命名為 Jbadm，將“加班記錄”數(shù)據(jù)表、“員工信息”數(shù)據(jù)表和“部門(mén)信息”數(shù)據(jù)表添加到表單的數(shù)據(jù)環(huán)境中。用“加班記錄”數(shù)據(jù)表的“員工編號(hào)”字段作為表達(dá)式和“員工信 息”數(shù)據(jù)表的“員工編號(hào)”字段建立關(guān)聯(lián)，并用“員工記錄”數(shù)據(jù)表的“所在部門(mén)”字段作為表達(dá)式和“部門(mén)信息”數(shù)據(jù)表的“部門(mén)編號(hào)”建立關(guān)聯(lián)。 從數(shù)據(jù)環(huán)境中添加要在表單中顯示的字段，將“移動(dòng)記錄工具欄”類和“命令按鈕工具欄”類實(shí)例化，重新命名為 Jbadmmr 和 Jbadmabg。 添加一個(gè)表單屬性 Oldrecord，并將其值初始化為 1。添加兩個(gè)方法屬性 Modpre和 Modmod，分別用來(lái)控制表單的瀏覽狀態(tài)和非瀏覽狀態(tài)。 命令按鈕工具欄中“修改”（ Cmdmod）、“刪除”（ Cmddel）、“取消”（ Cmdcancel）、“退出（ Cmdexit）按鈕的代碼可以沿用基類的代碼。 命令按鈕工具欄中的“查詢”（ Cmdser）按鈕的功能是調(diào)用輸入查詢條件表單，完成表單的查詢功能。 命令按鈕工具欄中的“打印”（ Cmdpri）按鈕的功能是將表單中當(dāng)前記錄的加班編號(hào)作為參數(shù)傳遞給加班記錄報(bào)表，并以預(yù)覽方式查看打印結(jié)果。 “保存”按鈕（ Cmdsave）的作用是判斷表單中欄的輸入情況，如果輸入無(wú)誤，則將緩沖區(qū)的數(shù)據(jù)寫(xiě)入數(shù)據(jù)表中。 在項(xiàng)目管理器中新建一表單，命名為 Jbser，將加班記錄數(shù)據(jù)表添加到表單的數(shù)據(jù)環(huán)境中。 在項(xiàng)目管理 器中新建一表單，命名為 Jbserout，設(shè)置其數(shù)據(jù)環(huán)境為加班記錄數(shù)據(jù)表、員工信息數(shù)據(jù)表和部門(mén)信息數(shù)據(jù)表。用加班記錄數(shù)據(jù)表的“員工編號(hào)”字段作為表達(dá)式和員工信息數(shù)據(jù)表的“員工編號(hào)”字段建立關(guān)聯(lián)，用員工信息數(shù)據(jù)表的“所在部門(mén)”字段作為表達(dá)式和部門(mén)信息數(shù)據(jù)表的“部門(mén)編號(hào)”字段建立關(guān)聯(lián)。向表單中添加一個(gè)標(biāo)簽控件、一個(gè)表格控件和兩個(gè)按鈕控件。 創(chuàng)建日終處理記錄查詢結(jié)果表單 日終處理記錄查詢結(jié)果表單，設(shè)置其數(shù)據(jù)環(huán)境為日終處理記錄本數(shù)據(jù)表。向表單中添加一個(gè)標(biāo)簽控件、一個(gè)表格控件、兩個(gè)按鈕控件。標(biāo)簽控件按需進(jìn) 行設(shè)置，表格控件用表格控件生成器，按鈕控件設(shè)置按照與前面類似表單的類似按鈕進(jìn)行設(shè)置。 但是表格有幾個(gè)很重要的屬性，不能設(shè)置為其他的值。 AutoCenter 屬性要設(shè)為“ .T.”，MdiForm 屬性一定要設(shè)置為“ .T.”， ShowWindows 屬性要設(shè)置為“ 1在頂層表單中”，WindowType 屬性要設(shè)置為“ 1模式”表單。 創(chuàng)建系統(tǒng)打印功能 系統(tǒng)的打印功能主要包括加班記錄報(bào)表打印、考勤記錄按日期報(bào)表打印、考勤記錄按員工報(bào)表打印、員工信息報(bào)表打印、日終處理記錄報(bào)表打印，員工信息標(biāo)簽打印和部門(mén)信息標(biāo)簽打印 。 創(chuàng)建員工信息及日終處理記錄報(bào)表 在項(xiàng)目管理器中新建一報(bào)表，命名為 Yginfo，添加其數(shù)據(jù)環(huán)境為員工信息數(shù)據(jù)表。從數(shù)據(jù)環(huán)境中將要在報(bào)表中顯示的字段拖放到報(bào)表中。 利用報(bào)表控件工具欄在表單中添加相應(yīng)字段的字段名，并利用矩形控件和線條控件制造成一個(gè)矩形。 單擊 VFP 主窗口中“報(bào)表”主菜單下“標(biāo)題 /總結(jié)”子菜單，在彈出的窗口中選擇“標(biāo)題”復(fù)選框，單擊確定回到報(bào)表設(shè)計(jì)器，在新增的報(bào)表的標(biāo)題欄輸入要報(bào)表的標(biāo)題。同時(shí)新建一個(gè)域控件，在域控件的表達(dá)式中輸入“ _DATE（）”，即可顯示報(bào)表的打印日期。在頁(yè)注腳 區(qū)添加一個(gè)域控件，在域控件的表達(dá)式中輸入“ ”頁(yè)碼 ”+ALLTRIM（ STR（ _PAGENO））”，該表達(dá)式先用“ _PAGENO”來(lái)獲取頁(yè)碼數(shù)，再用 STR（）函數(shù)將其轉(zhuǎn)化為字符型，最后用 ALLTRIM 函數(shù)將頁(yè)碼中空格去掉。 數(shù)據(jù)備份模塊的設(shè)計(jì) 有時(shí)系統(tǒng)會(huì)因?yàn)楦鞣N原因而崩潰，為了保證數(shù)據(jù)安全，必須不時(shí)的將數(shù)據(jù)進(jìn)行備份，數(shù)據(jù)模塊就是為此而設(shè)計(jì)的。 系統(tǒng)幫助模塊的設(shè)計(jì) 說(shuō)明系統(tǒng)的設(shè)計(jì)者，版本好，及系統(tǒng)的內(nèi)存等信息 系統(tǒng)菜單的設(shè)計(jì) 創(chuàng)建系統(tǒng)菜單 在項(xiàng)目管理器中新建一個(gè) 菜單，命名為 Mainmenu，將其作系統(tǒng)的菜單，其主菜單有日常操作、信息管理、信息查詢、信息打印、系統(tǒng)功能等，系統(tǒng)的所有功能將通過(guò)該菜單來(lái)完成。 菜單結(jié)構(gòu)創(chuàng)建完成，單擊 VFP 主窗口中“文件”主菜單下“保存”菜單將創(chuàng)建好的菜單保存，單擊“菜單”主菜單下“生成”子菜單，將菜單生成可執(zhí)行的菜單文件。 由于菜單是要內(nèi)嵌在表單中，單擊“顯示”主菜單下“常規(guī)選項(xiàng)”子菜單，選中“頂層菜單”復(fù)選框即可。 創(chuàng)建系統(tǒng)主菜單 在項(xiàng)目管理器中新建一表單，命名為 Kqmain。將所有數(shù)據(jù)表添加到表單的數(shù)據(jù)環(huán)境，把員工信息 數(shù)據(jù)表、部門(mén)信息數(shù)據(jù)表、考勤記錄數(shù)據(jù)表、加班記錄數(shù)據(jù)表的打開(kāi)方式設(shè)置為獨(dú)占式，即在數(shù)據(jù)環(huán)境設(shè)計(jì)器中這些數(shù)據(jù)表的 Execlusive 屬性設(shè)置為“ .T.”，向表單中添加一個(gè)命令按鈕組控件作為系統(tǒng)的工具欄。 第三章 總結(jié) 對(duì)本軟件的總結(jié) 這是一個(gè)簡(jiǎn)單的用 VFP 編寫(xiě)的考勤管理系統(tǒng)，實(shí)現(xiàn)了員工考勤操作，加班操作，和各種信息的查詢和打印，并且可以進(jìn)行數(shù)據(jù)備份，適用于中小企業(yè)，本軟件功能比較齊全，移植性強(qiáng)。 本軟件存在的問(wèn)題和發(fā)展 本軟件由于實(shí)際的情況，只設(shè)置了單一的用戶管理功能，可根據(jù)需要采用多級(jí)用戶管 理模式，不同的用戶權(quán)限不一樣，另外，考慮到安全性，還可以對(duì)密碼進(jìn)行加密，這些是本軟件需要改進(jìn)的地方。本軟件由于功能比較齊全，值得推廣。 第四章 軟件發(fā)展前景 現(xiàn)有 考勤管理 系統(tǒng)的廠商的開(kāi)發(fā)層面幾乎只停留在人事操作的層面上． 國(guó)外成熟產(chǎn)品雖然在理論性和先進(jìn)性上優(yōu)于國(guó)內(nèi)產(chǎn)品，但在中國(guó)現(xiàn)今 考勤 管理制度不規(guī)范的現(xiàn)狀下，其功能的實(shí)用性及有效性已大大打折，同時(shí)其高昂的價(jià)格也使得大多數(shù)企業(yè)望而生畏。同時(shí)中國(guó)的企業(yè)受中華民族深遠(yuǎn)文化的影響有其與西方企業(yè)所不同的管理文化底蘊(yùn)，而國(guó)外軟件設(shè)計(jì)商則很難將其產(chǎn)品與中國(guó)國(guó)情相結(jié)合，使得 其產(chǎn)品無(wú)法真正為廣大中國(guó)企業(yè)所受用。 企業(yè)考勤管理系統(tǒng)從中國(guó)的具體國(guó)情出發(fā)，能大大減少公司的人力、物力，有很好的市場(chǎng)發(fā)展前景。 參考文獻(xiàn) [1] 《 VFP及其應(yīng)用系統(tǒng)開(kāi)發(fā)》 譚浩強(qiáng)主編 清華大學(xué)出版社 [2] 《 》 蔡偉等編著 人民郵電出版社 [3] 《 》 清華大學(xué)出版社 [4] 《 》 清華大學(xué)出版社 [5] 數(shù)據(jù)庫(kù)系統(tǒng)實(shí)現(xiàn)（英文版 ） Database system implementation [美 ] Hector Garciamolina/ 機(jī)械工業(yè)出版社 [6] 數(shù)據(jù)庫(kù)系統(tǒng)導(dǎo)論 An introduction to Database Systems(Seventh editon) [美 ]C. J. Date 機(jī)械工業(yè)出版社 附錄 A 數(shù)據(jù)備份 DO WHILE EMPTY(m_dir) IF MESSAGEBOX(39。您沒(méi)有選擇要備份的目錄。 39。+CHR(13)+39。是否要取消備份？39。,4+32+256,39。取消 39。)=7 m_dir=GETDIR(39。39。,39。請(qǐng)輸入文件要備份到的目錄： 39。) ELSE RETURN ENDIF ENDDO CLOSE ALL DEFINE WINDOWS win1 FROM 1,1 TO 7,50 IN DESKTOP SYSTEM TITLE 39。升級(jí)向?qū)?39。 COLOR RGB(0,0,0,192,192,192) MOVE WINDOWS win1 CENTER ACTIVATE WINDOWS win1 SET CONSOLE OFF @ 2,10 SAY 39。正在備份數(shù)據(jù)，請(qǐng)稍候 39。 COPY FILE DATA\*.DBF TO (m_dir+39。*.dbf39。) COPY FILE DATA\*.CDX TO (m_dir+39。*.cdx39。) DEACTIVATE WINDOWS win1 RELEASE WINDOWS win1 MESSAGEBOX(39。數(shù)據(jù)已成功備份 39。,64,39。完成 39。) m_dir=GETDIR(39。39。,39。請(qǐng)輸入備份的文件 所在的目錄： 39。) 數(shù)據(jù)恢復(fù) DO WHILE EMPTY(m_dir) IF MESSAGEBOX(39。 您沒(méi)有選擇目錄。 39。+CHR(13)+39。 是否要取消恢復(fù)數(shù)據(jù)？39。,4+32+256,39。取消 39。)=7 m_dir=GETDIR(39。39。,39。請(qǐng)輸入備份的文件所在的目錄： 39。) ELSE RETURN ENDIF ENDDO CLOSE ALL DEFINE WINDOWS win1 FROM 1,1 TO 7,50 IN DESKTOP SYSTEM TITLE 39。升級(jí)向?qū)?39。 COLOR RGB(0,0,0,192,192,192) MOVE WINDOWS win1 CENTER ACTIVATE WINDOWS win1 SET CONSOLE OFF @ 2,10 SAY 39。正在恢復(fù)數(shù)據(jù)，請(qǐng)稍候 39。 IF !DIRECTORY(39。data39。) MD DATA ENDIF COPY FILE (m_dir+39。*.dbf39。) TO DATA\*.DBF COPY FILE (m_dir+39。*.cdx39。) TO DATA\*.CDX DEACTIVATE WINDOWS win1 RELEASE WINDOWS win1 MESSAGEBOX(39。數(shù)據(jù)已成功恢復(fù) 39。,64,39。完成 39。) tern University to do his advanced studies, all on full financial scholarships. The other father never finished the eighth gr ade. Both men were successful in their careers, working hard all their lives. Both earned substantial ines. Yet one struggled financially all his life. The other would bee one of the richest men in Hawaii. One died leaving tens of millions of dollars to his family, charities and his church. The other left bills to be paid. Both men were strong, charismatic and influential. Both men offered me advice, but they did not advise the same things. Both men believed s trongly in education but did not remend the same course of study. If I had had only one dad, I would have had to accept o