人事信息管理系統(tǒng)+本科畢業(yè)論文

PAGE48XXXXXX本科畢業(yè)設(shè)計人事信息管理系統(tǒng)學生姓名ＸＸXXＸX院系名稱專業(yè)名稱計算機科學與技術(shù)班級學號指導教師XXXＸＸXＸX教務處二○○八年五月人事信息管理系統(tǒng)PAGE1人事信息管理系統(tǒng)學生：XＸXＸ指導教師:ＸXＸＸ內(nèi)容提要本系統(tǒng)所研究的內(nèi)容是《人事信息管理系統(tǒng)》，在整個研究工程中，經(jīng)過需求分析、概要設(shè)計、詳細設(shè)計、系統(tǒng)測試等幾個階段的工作，使系統(tǒng)具有了插入、刪除、修改、查詢、導出以及備份恢復維護的基本功能。本系統(tǒng)使用軟件的開發(fā)工具是ＭicrosoftVisualＣ+＋６．０，后臺數(shù)據(jù)庫是本地ＭｉcrosofｔSQLServｅr2000數(shù)據(jù)庫，設(shè)計數(shù)據(jù)庫軟件是PowerＤesigneｒＴrial１１。MｉｃrｏｓｏftＶｉsualC＋+6．0是一種開發(fā)性能非常優(yōu)秀的面向?qū)ο蟮臄?shù)據(jù)庫應用開發(fā)工具,它能夠設(shè)計高性能、基于客戶/服務器（Cｌieｎｔ/Server)體系結(jié)構(gòu)的應用系統(tǒng)。ＶisuaｌＣ+＋６.0在不犧牲靈活性、性能和控制力度的同時，給Ｃ++帶來了更高水平的生產(chǎn)效率。ＭicｒosｏftＶisuaｌC＋＋6．０提供了可視化編程,減少了編程過程中的難度，提高了編程效率。ＭｉcｒoｓoftSＱLSｅrver2000是一種使用方便、簡單的數(shù)據(jù)庫，它提供了安全的管理措施，適合于中、小型系統(tǒng)。PoｗerDｅsigｎerTｒｉａｌ11工具是一個方便的畫數(shù)據(jù)庫模型的軟件，并可以通過EＲ模型直接生成多種類型的數(shù)據(jù)庫，諸如Oｒacle、Ｓｙbasｅ、MiｃrｏsｏftＳQＬSeｒvｅr2０00等。人事信息管理系統(tǒng)主要有以下六個模塊組成：在人事管理模塊中實現(xiàn)了，人事管理的功能;在出勤管理模塊中實現(xiàn)了，員工的考勤管理的功能；在工資管理模塊中實現(xiàn)了,員工工資的管理功能;在系統(tǒng)管理模塊中實現(xiàn)了，有關(guān)基本表的更新以及數(shù)據(jù)的備份和恢復；在用戶管理模塊中實現(xiàn)了,有關(guān)系統(tǒng)用戶管理及權(quán)限的分配、密碼修改等的管理；最后用幫助模塊，讓使用者了解本系統(tǒng)，并幫助使用者如何更好的使用本系統(tǒng).關(guān)鍵字:單文檔ＡDOPrｏjｅct（工程）對象ＭanagementIｎｆorｍatiｏnＳyｓtemAbｓtrａcｔThｅｓyｓtｅmfｏcｕsｅsｏｎHumａｎaffaｉrsIｎｆormationManaｇｅｍeｎtＳyｓteｍ.Inthewholeｒeseａrchｉｎｇprｏcesｓ,weneｅdtｏｇｏthroughtｈeｆｏlｌowingsteps,ｉncｌudingｒeｑuirｅmenｔaｎａｌｙｓｉs，genｅrａldｅｓｉｇｎ，partｉcｕlardesｉｇn,systemｔesｔandsoon。Ｔhroｕgｈtheseｓtepｓｔｈａt(yī)maｋｅthesystｅｍcａnｐossesｓesthｅbasiｃfuncｔionsofdatabａseiｎsｅｒtioｎ，ｄelｅtｉoｎ，ｍｏdｉｆiｃａｔion，ｓｅａｒｃｈ，eｘportｔoｅxcel,ｂaｃkｕpaｎｄresｕme．TｈissyｓtemｕsetｈｅMｉcroｓoftVｉsｕaｌＣpluｓplｕs6．0aｓtｈeｅmpoｌdeｒtoｏl，uｓｉｎgtheMicrｏsｏｆtSＱLServｅｒ2００0ａsｔheｂacｋgrounddatａbaｓe，ａndiｕsｅＰｏｗerDesiｇneｒTrｉａl1１ｔodesiｇｎtｈedatａｂaｓｅ。ＭicrosoftＶisｕalC++６。０isakｉｎdoｆObjecｔOｒieｎｔeddaｔａｂaseappｌicａｔiｏndeveloppｉｎgｔｏoｌwiｔhexcelleｎｔexplｏitａｔiｏnpｅｒｆoｒｍａnce。Itcaｎdesiｇnhｉgｈperfoｒmanｃeapｐlicatｉoｎsysｔｅmwｈｉcｈｂaｓeｏｎclieｎt/sｅrｖｅrｓystｅmsｔructurａｌ．ＶiｓualC+＋improvetherａt(yī)ｅoｆＣ＋+expｌoitａt(yī)iｏｎoｎnｏｔimｍoｌａt(yī)ｅaｇiｌitｙ，perfoｒｍancｅａndｃｏnｔrolpowerａt(yī)thｅsaｍｅtiｍe.ＭiｃrｏsｏfｔＶisｕaｌC+＋proｖideｖisuａlｉzａt(yī)ｉoｎｐｒogrammiｎｇ,conｓeｑuｅntｌyreduceｔheｄiｆfiｃultｙduriｎgｐｒogrａｍｍing,improｖｉngｔｈeeffiｃiｅｎcyｏfｐrｏgramｍiｎｇ．ＭｉcｒｏsｏftＳQLSerｖer２000isakindoｆｕｓiｎgcｏｎvｅnien，ｓｉmplｅdａt(yī)abａse，ｉｔｐrｏvidesecuremａnagemeasuｒe。Iｔisfｉtｆoｒmiｄdl,smallsystem。PowerDesigｎeｒTrｉal11tooliｓａｓoftwareconvｅnienttopaintｉｎgdａt(yī)aｂaseｍoｄｅl，ｉtcancoｎｖeｔtｏkinｄsｏｆdataｂaｓｅthｒoughEＲｍodel，suchａｓOracle，Ｓybaｓｅ,MiｃrosｏftSＱLSerｖer2００0eｔc．Thissysteｍｉsｃompｏsedoｆsixｍoｄｕleａｓfolloｗ：Ｉnhumａnａｆｆairsmanaｇｅmoｄｅｌｆinishedｈｕmanaffaiｒmanagefuncｉtｏn。Ｉnturnoｕtforwｏｒkmaｎaｇｅmｏｄｅｌfｉnisｈedｃhecｋoｎworkａt(yī)ｔendanｃefｕｎcｔｉon.Iｎｓalａｒymａｎagemodｅlfinishedtｈemａnaｇemｅntofｅｍpｌoｙｅｅsalaｒｙfunction。Insｙstｅｍmａnａgemoｄelfiｎishedtheｕpdatｅｏｆｂasetａbleａnｄbacｋupａnｄreｓumeoｆｄatabaｓｅ.Ｉｎuｓｅrmanａｇｅmodelｆiｎishedｔｈｅusermaｎaｇe，dｉstrｉｂｕtepurｖieｗaｎdmｏdifyuｓｅｒs’paｓｓworｄmaｎａgｅ.Ｉｎfｉnａllｙhelｐmｏdelｌｅｔuｓｅrｋnowtｈｉssystemandhｅlｐuｓeｒhowtｏbetteruｓetｈiｓｓｙstem.KｅｙWorｄ:SiｎｇleＤoｃｕmｅnｔＡDO(Activｅｘdａt(yī)aobｊｅct）Prｏjectoｂjecｔ．目錄TOＣ＼o”1—2”＼h＼z\uHYＰＥRLINK＼l”_Tｏc19766１２51＂前言?ＰAGERＥF_Toc1９７66１25１\h1ＨYPERＬＩＮK\l＂＿Toc19766１25２"1?緒論 ＰAＧEＲEF＿Ｔｏc1976612５2＼h1HYPEＲLIＮK\ｌ”＿Ｔoc１９7６６１２5３"1。1?問題的提出 PAＧEＲEF_Ｔoc197６６12５3\ｈ1ＨＹPＥRLＩＮK＼l”_Toｃ1976６1２５4＂1．２?課題的背景及意義?PＡGERＥＦ＿Toc１97661２5４\h1HＹPERLINK\ｌ”＿Tｏc1９7６６1255”２?系統(tǒng)需求分析?ＰＡＧＥREF＿Ｔoｃ1９76612５5\ｈ２_Toc１97６612５７"2。２?系統(tǒng)功能需求分析 ＰＡGＥRＥF_Toc19７6６1２57＼ｈ２HYPERLINＫ\l＂_Ｔｏc１９766１2５８"３?系統(tǒng)分析與設(shè)計?ＰAＧEＲEＦ＿Toc1976612５8\h３HYＰERLＩNK\ｌ＂＿Toc1976６1259＂3.１?系統(tǒng)功能模塊設(shè)計?ＰＡGEＲＥF_Tｏc１９766125９\ｈ3HYPERＬＩNＫ＼ｌ＂_Toc1９7661260”3.2?數(shù)據(jù)庫設(shè)計ER圖 ＰＡGＥＲEF＿Toc1９76６１２６0\h４ＨYPERＬINK＼l”_Ｔoc197６６１261＂３.3?數(shù)據(jù)庫物理結(jié)構(gòu)表的描述?PＡＧＥREＦ_Toc１97661２61\ｈ４HＹＰEＲＬINK\l”_Toc19７６6１262＂4?代碼設(shè)計與實現(xiàn) PＡＧEＲEF_Toc1９76６1262\h5HYＰERLINK\ｌ＂_Toc19766１263”4．1?人事信息管理系統(tǒng)代碼設(shè)計與實現(xiàn) PＡGEREF_Toｃ1９76612６3＼h5HYＰERLINＫ４.2 代碼開發(fā) PAＧERＥＦ＿Toc１９7６61２64＼h６HYPＥＲLＩNＫ＼ｌ"＿Toc197６６1265＂5?軟件測試?ＰＡGERＥＦ_Toc19７６612６5\h３６HYPERＬIＮＫ＼l"_Toc１976６1266"5．1?系統(tǒng)模塊測試?PAGEREＦ_Ｔoc19７６６１２６6＼h36ＨYPEＲLINK＼l"_Toc１976612６７"５．2?研究成果?PAＧＥREF_Ｔoc1９7661２67＼h３6HＹPERLINK\ｌ”_Toc1976６1268＂6 技術(shù)難點及解決 PAGEＲＥＦ＿Tｏｃ1976６126８\h37HＹＰＥRLＩNK＼l＂＿Ｔoｃ1９7661２69＂6.１?一般用戶和管理員操作權(quán)限問題 PＡGEＲＥF_Ｔoc１9７66126９\h３7HYＰERＬＩNＫ＼ｌ"_Toc1９76６1２７0”6．2?設(shè)置對話框中Ｓｔaｔic控件字體的大小及顏色，代碼如下：?ＰAGＥREF_Toｃ19７6612７0\h43HＹPERLＩＮK＼ｌ”_Ｔoｃ1９76６１２71"6。3 設(shè)置LｉｓtCoｎtｒol控件的行高，及屏蔽空白行代碼實現(xiàn)：?PＡGＥRＥF_Ｔｏｃ197６61271\ｈ43ＨYPERLＩＮK\ｌ”_Toc19７６６1２72＂６．４?設(shè)置照片，代碼如下：?ＰAＧＥＲEＦ_Tｏc197661272\h43ＨYPERＬIＮＫ＼ｌ"_Toc1976６1２73＂６．5?工資的計算問題?PＡGＥＲEF＿Ｔoc1９７66１２73\ｈ48ＨＹＰEＲLIＮＫ\l"_Toc19766１２7４"7?總結(jié)及展望?PＡGEREF＿Ｔoc1９76６1２74\h４8HＹPEＲLＩＮＫ\l＂＿Toc19７661２７5"致謝語?PAGEREＦ＿Ｔoｃ1９７6６1２75\h48ＨＹＰERLIＮＫ＼l"_Toc19７6６1２76”參考文獻?PＡGEＲEＦ_Toc1９７6612７6\ｈ４８人事信息管理系統(tǒng)前言當今這樣一個信息的世界中，信息的掌握和分析已成為現(xiàn)代企業(yè)生產(chǎn)、經(jīng)營過程中的重要因素。人事管理系統(tǒng)是現(xiàn)代企業(yè)管理體制作不可缺少的部分，為適應現(xiàn)代企業(yè)制度要求、逐步走向人事管理科學化、規(guī)范化，利用計算機實現(xiàn)企業(yè)人事檔案管理勢在必行.人事信息管理系統(tǒng)是一個典型的計算機信息處理的管理模式，它支持企業(yè)對本單位工作人員的管理。本論文從基本需求出發(fā)，本著用戶界面友好，數(shù)據(jù)處理快捷的原則，創(chuàng)建了一個具有良好實用性的人事管理系統(tǒng)?！度耸滦畔⒐芾硐到y(tǒng)》采用面向?qū)ο蟮?、可視化的?shù)據(jù)庫應用系統(tǒng)技術(shù)完成了對人事信息的管理，采用了ＭicｒosoftViｓualC++６。0開發(fā)環(huán)境，并使用本地ＭicrosoftＳQLSeｒvｅr2０００數(shù)據(jù)庫。該系統(tǒng)可以滿足人事管理日常工作的需要，實現(xiàn)無紙化辦公，以模糊組合查詢的方式，提供了對數(shù)據(jù)表的多種組合查詢,為人員檔案的管理提供了方便、快捷的操作方式。本系統(tǒng)除了完成常見人事管理系統(tǒng)中人員對象的管理外，還針對現(xiàn)代企業(yè)管理的具體要求,增加了對企業(yè)部門設(shè)置和崗位編制的管理，并使其與傳統(tǒng)的單一人員管理有機的結(jié)合，實現(xiàn)了數(shù)據(jù)的合理設(shè)置和有效應用，使其更為適用于目前的企業(yè)人事管理過程.通過系統(tǒng)開發(fā),使我對面向?qū)ο蟆⒖梢暬臄?shù)據(jù)庫應用系統(tǒng)和軟件的開發(fā)過程有了一些感性的認識和了解，同時也是對自己數(shù)年來計算機專業(yè)學習成果的一次檢驗和考核。緒論問題的提出隨著計算機和網(wǎng)絡技術(shù)的廣泛應用，人事檔案管理系統(tǒng)成為現(xiàn)代企業(yè)管理中不可缺少的一部分。為適應現(xiàn)代企業(yè)制度要求，實現(xiàn)企業(yè)勞動人事檔案管理的科學化和規(guī)范化,從而提出了企事業(yè)單位人事檔案管理系統(tǒng)開發(fā)的課題。課題的背景及意義企事業(yè)單位人事檔案管理工作是一種繁瑣的，務求準確訊速的信息檢索工作。特別是對在崗人員、離退人員、工資發(fā)放、職稱評定等信息的管理,具有典型的信息處理管理模式.本設(shè)計以人事檔案管理為入口點，提出了基于面向?qū)ο蟮臄?shù)據(jù)庫應用系統(tǒng)開發(fā)技術(shù)——ＶisｕａｌC++6.0為設(shè)計工具，以軟件工程設(shè)計規(guī)則為指導的人事檔案管理系統(tǒng)。該課題基于ＶisualC++６。0數(shù)據(jù)庫應用系統(tǒng)開發(fā)技術(shù)進行開發(fā)，達到了提高企事業(yè)單位人事檔案管理信息處理效率的效果。系統(tǒng)需求分析系統(tǒng)開發(fā)策略本系統(tǒng)開發(fā)主要采用自頂向下的開發(fā)方式，自頂向下的方法模型如下圖所示：開發(fā)模型圖系統(tǒng)功能需求分析人事檔案管理系統(tǒng)的系統(tǒng)分析概述現(xiàn)在的世界是信息的世界，隨著信息量越來越大以及計算機技術(shù)的發(fā)展，計算機已成為各企事業(yè)單位管理的重要工具.人事檔案管理是對員工信息、部門信息、崗位信息、出勤信息、工資信息的管理和快速方便的查詢。系統(tǒng)開發(fā)主要有以下六個模塊組成:在人事管理模塊中實現(xiàn)了，人員檔案管理與人事管理等功能;在出勤管理模塊中實現(xiàn)了，員工的考勤管理等功能；在工資管理模塊中實現(xiàn)了，員工工資的管理等功能;在系統(tǒng)管理模塊中實現(xiàn)了，有關(guān)基本表的更新以及數(shù)據(jù)的備份和恢復的管理功能在用戶管理模塊中實現(xiàn)了,有關(guān)系統(tǒng)用戶管理及權(quán)限的分配管理；最后用幫助模塊,讓使用者了解本系統(tǒng),并幫助使用者如何更好的使用本系統(tǒng).系統(tǒng)流程圖本系統(tǒng)的系統(tǒng)流程圖如下:系統(tǒng)流程圖系統(tǒng)分析與設(shè)計系統(tǒng)功能模塊設(shè)計模塊結(jié)構(gòu)圖模塊結(jié)構(gòu)圖數(shù)據(jù)庫設(shè)計ER圖（HＹPＥRＬINK”Ｃ：＼＼ＤocumｅnｔsanｄＳettiｎｇs\＼Admiｎiｓtrator\\桌面\\ＥMPMａnａge\\ＥMPManａge＼\Dａt(yī)aＢａse\＼ＥｍpManａｇer＿ＣＤＭ．pｄf”詳細信息見數(shù)據(jù)庫設(shè)計概念模型）數(shù)據(jù)庫物理結(jié)構(gòu)表的描述主要表格如下：(ＨYPERLINＫ"C：\\ＤoｃｕmentsａｎdSｅtｔings\\Ａｄministｒａt(yī)ｏｒ＼\桌面＼＼EMPManａge\\EＭPＭａｎage\\ＤataＢasｅ＼\數(shù)據(jù)庫編碼.dｏc"詳細見數(shù)據(jù)庫編碼）員工：ＥM_Ｅmployeｅ存放員工基本信息獎懲記錄:EM_RｅwＰun＿Rec模塊劃分：EＭ_ModulｅClａｓs工資:EM＿Sａlaｒy模塊劃分的值對應表名稱模塊編號模塊名稱模塊對應值功能描述編碼ＭS_IDMSMｏdｕlｅNameMＳＶａlue000０1人事管理1控制”人事管理＂下所有的模塊0０002出勤管理2控制"出勤管理”下所有的模塊0000３工資管理4控制"工資管理＂下所有的模塊０0004系統(tǒng)管理8控制"系統(tǒng)管理＂下：①基本信息,②部門管理0０0０5用戶管理16控制"用戶管理"下：①系統(tǒng)操作員管理，②權(quán)限管理000０６數(shù)據(jù)庫管理32控制"系統(tǒng)管理＂下:①數(shù)據(jù)恢復備份,②系統(tǒng)初始化代碼設(shè)計與實現(xiàn)人事信息管理系統(tǒng)代碼設(shè)計與實現(xiàn)系統(tǒng)主界面系統(tǒng)主界面圖數(shù)據(jù)庫表關(guān)聯(lián)定義ＨYＰＥＲLＩＮK"C:\\DｏcuｍentsaｎdSetｔiｎｇs\＼Adｍinistｒatoｒ\\桌面\\EMＰＭａnａgｅ\\EMPManaｇe\＼Ｄａt(yī)ａBaｓe\＼EｍｐMａｎager_ＰDM。ｐdｆ"詳細信息見數(shù)據(jù)庫物理模型模塊間的關(guān)系人事管理模塊對員工的各種基本信息進行管理,考勤管理對員工的上下班情況及請假加班等情況進行管理，工資管理對員工的基本工資、工資構(gòu)成、稅率管理、補貼管理及員工的月度工資管理,月度工資通過考勤管理里的加班情況、出勤情況、請假情況、出差情況核算加班費、請假扣費、出差補貼等。系統(tǒng)管理主要管理單個的基本表項、部門管理、數(shù)據(jù)備份與恢復等。用戶管理對系統(tǒng)的用戶操作權(quán)限及密碼修改管理。代碼開發(fā)ＣＤｌｇLogin窗口登錄界面圖登錄對話框通過讀取數(shù)據(jù)庫中用戶名和密碼對用戶輸入的用戶名和密碼進行校驗,如果用戶名或密碼為空或錯誤當用戶點擊登錄時彈出如下提示:用戶名輸入提示圖密碼輸入提示圖密碼錯誤提示圖用戶名錯誤提示圖如果非法輸入次數(shù)超過6次，將彈出如下提示:登錄出錯提示圖系統(tǒng)將自動退出登錄，用戶輸入的密碼通過調(diào)用CCrypt加密類ｃy的生成密鑰函數(shù)cｙ.Keｙ_ｃｒeａt(yī)oｒ(sＵserPassWorｄ），調(diào)用加密函數(shù)對密碼進行加密cｙ．Ｅncrypt(sUserPａsｓWｏrｄ),將加密后的密碼與數(shù)據(jù)庫中保存的用戶名對應密碼進行比較，如果相等的話根據(jù)用戶表中該用戶的權(quán)限顯示該用戶能夠管理的模塊，其它模塊設(shè)置為灰色不可點擊.管理員用戶可以操作系統(tǒng)的所有模塊。加密類函數(shù)的主要代碼生成密鑰函數(shù)：vｏidＣCrypｔ：：Kｅy＿ｃｒeａt(yī)ｏr（CStrｉnｇＳ）//生成常量Ｃ1，C2以及加密解密Ｋeｙ{iｎti,ｊ;ｕｎsigneｄshｏrｔｋ=0；Ｃ1=1;C2＝1;for（i=0,ｊ=Ｓ.ＧetLeｎgth()－1；(i！＝j）＆＆(i！=j+1）;ｉ＋+，ｊ－—）{Ｃ１=int(S［i]）^（C1<<8)；C2=int（S［j]）^（C2〈〈8）；｝Dｅ_kｅｙ＝(C1＊C2／S．GｅｔLｅngth(））＆(~k）；Eｎ_Key=De_ｋey；}加密函數(shù):CStrｉngCCrｙpt：：Ｅncryｐt（CSｔrｉnｇS）//加密函數(shù)｛CSｔｒinｇReｓuｌt，stｒ,back;ｉｎti,j；//ch=Ｓ;Rｅsult=S;／／初始化結(jié)果字符串for（ｉ=０;i<S.ＧetLengｔh(）；i＋+）//依次對字符串中各字符進行操作｛／／Resulｔ[ｉ］=Ｓ［ｉ]^(En_Ｋｅy〉〉8);/／將密鑰移位后與字符異或Ｒesulｔ.SｅtAｔ(i，S.GetAt（i)^（En_Kｅy＞＞８）);if(ｉ<S。GｅtLｅnｇth()—1）Eｎ_Kｅｙ=(ｓhｏｒｔ）((Rｅsult［i］+En＿Ｋeｙ）*C１＋C2）；//產(chǎn)生下一個密鑰｝S＝Reｓulｔ;/／保存結(jié)果foｒ(ｉ＝0；i〈S。GeｔＬength(）；ｉ++）//對加密結(jié)果進行轉(zhuǎn)換｛ｊ＝Ｓ［i];／／提取字符/／將字符轉(zhuǎn)換為兩個字母保存stｒ=＂12"；//設(shè)置sｔr長度為２／／str[０]=６5＋ｊ／26；//sｔｒ[１]＝65+j%26；／/ｂack+=str；stｒ．SetAt（０,６5+j/26）；str．ＳｅtAt(１，65+ｊ％2６）；bａｃk+=str；｝reｔｕrｎbaｃｋ；}加密函數(shù)的實現(xiàn):CStriｎｇＣCrｙpt：：Ｄeｃrypt（ＣStｒingＳ）//解密函數(shù)｛ＣStriｎgReｓult，str，ｂａck；inti,j;//Ｒesｕlt.Empｔｙ()；//清除結(jié)果fｏｒ（ｉ＝0；i<Ｓ.GｅtLeｎgtｈ（)/２；i++）//將字符串兩個字母一組進行處理{j=(S[2＊ｉ]-65)*2６；j+=S［２＊i＋1]—65；str=＂1”;／/設(shè)置str長度為1str＝j;Rｅsulｔ＋＝str；//追加字符,還原字符串｝Ｓ=Resｕｌｔ；//保存中間結(jié)果for(i=0；ｉ〈S。GeｔＬength()；i＋+）／/依次對字符串中各字符進行操作{//Ｒesｕlt[i］=（unｓigｎedｉｎt)S［ｉ]＾(De_keｙ〉＞８）；／／將密鑰移位后與字符異或Rｅsult.SｅｔAt(i，(BYTE)S。ＧｅｔＡt（ｉ)^(Ｄe_ｋeｙ〉＞8）)；ｉf(i＜S．ＧetLｅngth(）)De_ｋeｙ＝（shoｒt）((Ｓ[ｉ］+De_keｙ）＊C1+Ｃ2）；//產(chǎn)生下一個密鑰}rｅｔuｒｎResult；}管理員登錄后主界面管理員登錄后主界面左側(cè)人事管理樹型圖左側(cè)出勤管理樹型圖左側(cè)工資管理樹型圖人事管理人事管理是對員工基本信息、人事變動信息、培訓信息等的錄入、刪除、修改、查詢、導出等的操作，主要包括以下幾個部分:人員檔案管理是對員工的基本信息的管理,方便對員工的管理；界面（見下圖)職稱評定管理記錄員工的職稱評定情況；獎懲管理記錄員工的獎懲情況及獎懲原因；培訓記錄管理記錄員工的培訓情況;人事變動管理記錄員工的調(diào)動情況；考評管理記錄員工的考評情況、結(jié)果、時間等；福利品領(lǐng)取管理記錄員工領(lǐng)取福利品的情況；培訓項目管理說明：對于公司為提供員工素質(zhì)和能力而進行的培訓項目進行添加、修改、刪除管理,主要包括培訓名稱、培訓地點、培訓內(nèi)容、培訓開始時間、培訓結(jié)束時間、培訓單位、培訓費用等的管理。考評項目管理說明，公司增加的各種對員工的考核管理.//對于員工進行考核，從而保證對員工的各種晉升及工資的調(diào)整進行管理。福利品管理，對于公司在節(jié)日時發(fā)放給員工的福利品進行添加修改等管理.人員檔案管理圖當操作員選中一條記錄雙擊或點擊增加（修改)等按鈕是將彈出單個員工信息圖操作員可以在此對話框上查看、修改、增加新的員工詳細信息.用戶點擊增加按鈕后，系統(tǒng)自動生成員工編號（此處員工編號是從數(shù)據(jù)庫中讀取第一個最大未用的編號），代碼如下：?strSｑｌ．Ｆｏrｍat(＂ｓeleｃｔEmｐＩDfｒoｍEＭ_ＥmｐloｙeｅorderbyＥmpＩDaｓc＂);?m_pＲｅcordｓeｔ=adｏ．GeｔＲｅｃordＳet(_bstr_ｔ(strSql））；?ｗhiｌｅ(!m_pＲecｏrdsｅt-〉aｄoEＯF）?｛? vBｅｆIＤ=aｔoｉ（（LＰCＴSTR)(_bstｒ_t）m＿pＲｅcoｒdｓｅt—＞GeｔCoｌlｅct（＂EｍｐID”))；??m_pRｅｃordｓｅt-＞MoveＮexｔ（);??ｉf（m＿pＲeｃｏｒｄset－＞aｄoEOF） ??break；? vＡftＩD=atoｉ（(LPCＴSＴＲ）（_bstｒ_ｔ)m_pRｅcoｒｄset-〉GetCoｌlect(”ＥmｐID")); ?if(（vAfｔID-vＢｅfＩD）＞1）??{???ｖIＤ=vBefIＤ;? ?breａk； ?} ｝?if（m_ｐRecordseｔ->ａｄoＥOＦ） ?ｖID=vＢｅfID;?vＩD+＝１;?ｖEmpID.Fｏrmaｔ（＂%０5ｄ”,ｖID）；插入員工基本信息時,基本信息比如象民族、專業(yè)、籍貫等信息可以通過從下拉菜單中選擇,而不用手工輸入，信息中有關(guān)時間的信息可以通過點擊下拉框選擇時間來設(shè)置。當員工插入完成后點擊保存退出。CoｎeEmpＲec對話框中“上一個”按鈕代碼如下：strSｑl．Ｆormａt(yī)（”select＊fromＥM_Emｐｌｏyeｅ”）；?m_ｐRecoｒdsｅt=aｄｏ．GeｔＲeｃordSet（_ｂｓｔr_ｔ（strSｑl)）；??while（！ｍ＿pRｅcoｒｄset->adｏEOF）?{ ?ｖEmｐID=（LPＣＴSＴＲ)(_ｂｓtr_t)ｍ＿pRecorｄsｅt－>GetCｏllｅcｔ（"EmpID"）;??if（vＥmpID=＝m_EｍpIＤ) ?break; ?else? ?m_pRecorｄsｅｔ—>ＭｏveＮext(）；?｝?m_pRecordｓeｔ—＞MoｖｅPrevｉｏus（);?ｉf(m_ｐＲecoｒdsｅｔ->aｄoBOＦ)? m_pＲecordset—〉MoveLaｓt（）;?vＥｍpIＤ=(ＬＰCTＳTＲ)(_bstｒ_t）m＿pRecorｄｓet—>GetＣolｌeｃt（”ＥmpＩD"）；當目前已經(jīng)是最后一個員工時，自動顯示第一個員工的相關(guān)信息?！跋乱粋€”同理自動顯示最后一個員工信息。員工社會關(guān)系、員工輔助信息、員工個人經(jīng)歷的界面差不多類似,如下員工社會關(guān)系、員工輔助信息、員工個人經(jīng)歷圖獲取選中行代碼如下:pos＝m_EmｐIｎfo.GeｔFｉrstSelectｅdＩｔemPｏsitiｏn（）； ｉf（！pos）??ｒetｕrn;Ｉnｄｅｘ=m_EmpＩnfo。GｅｔNextSeｌｅｃtedＩｔem（pｏｓ）;／/得到項目索引?dlg．EmpID＝ｍ＿ＥmpＩnfo.ＧeｔIteｍText（Iｎdex，１）；／／獲取員工編號人事管理模塊中職稱評定管理、獎懲管理、培訓記錄管理、人事變動管理、考評管理、福利品領(lǐng)取管理等界面類似,界面如下:職稱評定管理、獎懲管理、培訓記錄管理、人事變動管理、考評管理、福利品領(lǐng)取管理等界面圖出勤管理出勤管理主要包括考勤記錄、請假記錄、加班記錄、出差記錄、月度考勤記錄五個部分?？记谟涗浭秦撠煂T工的上下班時間進行記錄，包括添加、刪除、修改；計算工作時間假記錄記錄員工請假次數(shù),在核算員工工資時將根據(jù)請假次數(shù)進行工資核算；加班記錄記錄員工加班的時間、日期及加班類型,核算工資時將根據(jù)加班類型及加班時間核算加班工資；出差記錄記錄員工的出差類型、出差地點、出差開始時間、出差結(jié)束時間、出差任務等，其中出差類型及時間將在工資核算時計算出差補貼；月度考勤記錄記錄了員工一個月中累積加班時間、累計請假時間、累計曠工次數(shù)、累計出差時間、遲到早退次數(shù),其中累計礦工次數(shù)及累計遲到早退次數(shù)也將在工資核算中扣除相應金額.員工出勤管理圖工資管理工資管理主要包括對工資等級、工資構(gòu)成項目、稅率管理、節(jié)日補貼、月度工資等管理。工資等級，對工資等級的添加、修改、刪除，主要是方便用人事管理對員工工資的添加、修改,通過對工資等級的修改可以對員工同一等級進行批量修改.工資構(gòu)成項目，是對于工資由哪些項目構(gòu)成的管理及這些項目是稅前還是稅后及加、減等的管理.界面如下：工資構(gòu)成圖稅率管理，是對員工應納稅的稅率及納稅金額的上下限、速算扣除數(shù)等的管理，方便月度工資中核算稅后工資。節(jié)日補貼管理，是公司對于員工各種法定節(jié)日及員工生日發(fā)放給員工的補貼。月度工資管理，實現(xiàn)了對員工的月度工資的添加、修改、刪除、查詢、導出到Exｃel等的管理，基本工資是根據(jù)是人事管理哪里讀取的，加班費通過加班類型及加班時間計算,出差補貼按照每種出差類型的補貼＊次數(shù)的和，額外稅前是通過工資管理員設(shè)置的,設(shè)置界面如下圖1），應發(fā)工資計算公式:應發(fā)工資金額=基本工資＋加班費+出差補助—請假扣款＋額外稅前項，額外稅后、節(jié)日補貼是通過工資管理員設(shè)置的，設(shè)置界面如下圖2），稅后工資計算公式：稅后工資＝應發(fā)工資金額-納稅金額;稅金額計算公式：納稅金額=應納稅金額*適合稅率－速算扣除數(shù)而應納稅金額=應發(fā)工資金額-納稅基數(shù)（1000)；實發(fā)工資=稅后工資+稅后應加項-稅后應扣項＋納稅基數(shù).月度工資管理的主界面：月度工資管理圖額外稅前計算圖額外稅后計算圖月度工資表導出至Ｅxｃel效果如下圖：工資表導出樣式圖查詢時的通過選擇下拉框中的員工姓名或月份查看工資信息,當選擇變化時通過調(diào)用SｅlecteCｏndｉｔioｎSｅｔ(）函數(shù)改變查詢條件，然后調(diào)用Diｓｐlａytxt(）顯示查詢后的結(jié)果，ＳelecteCondiｔionSｅt（)主要代碼：voｉdＣＳaｌary：：ＳｅlecteＣondｉｔｉoｎSｅｔ()｛?UpｄateＤata(ＴRＵＥ）;?coｎdition＿SQL=””；?m＿Conditioｎ＿mｏnth.GｅtWinｄowText（ｖCｏｎditｉon_monｔh）；?m＿Ｃｏnｄｉtiｏｎ_namｅ．GeｔＷｉndoｗTｅxt(ｖCｏｎｄiｔiｏｎ_naｍe）； ｉf(vConｄｉｔｉｏn＿ｎａme?。剑⑺小??｛??vＣｏndiｔiｏn_EmpIＤ＝dｓ．ＮａmｅToＩＤ(vＣｏndiｔiｏn_naｍｅ);??ｃoｎdiｔｉoｎ_SQL=coｎdition_SQL＋＂aｎｄEM_Sａlaｒｙ.ＥｍpID＝＇"+ｖCｏndｉｔiｏｎ_EmｐIＤ＋”'"；?｝／／EM_Sａlary.EmpID?if（vCondｉtｉon_ｍoｎｔh！="所有"）? conｄｉｔiｏn_ＳＱL=ｃonｄitｉon_SQL＋”andＳALＭonth='”+vConｄitｉｏn_mｏntｈ+”＇"；?RefresｈＤaｔa(）；?UpｄateＤata（FALＳE）;｝?查詢語句：vSＱL=＂sｅlecｔＳAＬＩD,EＭ_Salａrｙ。EmpＩDEmｐＩD,EｍｐＮａｍe,ＳALMonｔh,EM_Employeｅ。SGSaｌaryGｒade”;?ｖSQL=vＳQＬ＋＂SＧSaｌaｒyGrade，ＳＧSaｌａｒySｕm，SALOｖｅrｔimｅPay，SALＧｏOnErrandsSuｂsidy＂;?vSQＬ=vＳQL+"，ＳALLeaｖePenａltｙ，SALＡtheｒBefTｒ,SＡLＯuｇhtSalarｙ,SALAtheｒAftＴr，SALFｅａstSubsidｙ”； vSＱL＝ｖＳQL+”,SALＴaxAｆｔｅrSａｌａry,SALＦacｔＳalaｒy，ＴＲTａxＲaｔe，ＳＡＬＴａｘSｕm,SALＤａt(yī)ｅ，SALIｄｉogｒaph,SＡＬRｅmark”;?vＳQL=vＳQL+＂ｆrｏmEM_Emplｏyｅｅ，EM＿Ｓalａry，EM＿ＳalａrｙGrａdeｗhereEＭ_Ｅmpｌｏyｅe.ＥmpID＝EＭ_Salａｒy．ＥmpIＤ＂；?ｖSＱL＝ｖＳQL＋”aｎｄEM＿ＳalaryＧｒaｄe。SＧSalarｙGrade＝EM_Employee.SGSalarｙＧrａdｅ＂;?vSＱL=vSQL+（_ｂsｔr＿t）conditiｏｎ＿SＱL; ｖＳQL=ｖＳQL＋"orｄerｂｙＳＡＬMonthaｓc";導出Excel主要代碼如下：voｉｄCSalaｒｙ::ＯｎＳａlａryOUT(）{ //TＯDＯ:Adｄyｏurｃonｔrolnｏtiｆiｃationhａndｌerｃodehere?/／連接數(shù)據(jù)庫 ＡDOＣonnａｄo；?ａdo。OnＩｎｉtＡDＯＣonn(）; ?//提取數(shù)據(jù)庫中員工信息?//定義操作Excｅｌ必要的對象?COlｅVａrｉａｎtＶOpｔｉonal((lonｇ）ＤＩSP_E_PARＡMNOTFＯUND，VT＿ＥＲROR）；_ＡpplｉcatioｎobjApｐ；?ＷoｒｋbｏｏksoｂjＢookｓ；?_WｏrｋｂoｏkｏbｊＢｏok；?ＷｏｒksｈeetsobjＳheets；?_WorksｈeeｔｏbjShｅet；?RangｅｏｂjRａnｇe;? //創(chuàng)建Ｅｘcｅl對象?obｊApp.CｒｅaｔeDispatｃh（”Ｅｘcel．Appliｃａt(yī)ion");?obｊＢoｏkｓ＝obｊApｐ.ＧetWｏrkｂooｋｓ(）；?//返回工作簿對象?//打開指定Exｃｅl文件 CSｔriｎｇpａt(yī)h；?//獲取當前應用程序的完整文件名，包含完整路徑?GeｔMｏduleFileNaｍｅ(ＮULL,ｐatｈ．ＧｅtＢuｆferSｅtLeｎgth(MAX_PAＴH+1),MＡＸ_ＰATＨ）；?//取得最后一個＼，去掉文件名,從而獲取當前應用程序的工作路徑?inｔｐos=path。RｅvｅrseFinｄ（＇\\'）;?ｐａｔｈ＝pａt(yī)ｈ。Leｆt(pos＋1）；?／/在當前應用程序的工作路徑下打開EmpＩｎfｏ．ｘls文件 ｏbjＢoｏk.AttachDispatch（objBｏoks。Ａｄｄ(_variaｎｔ_t(patｈ+"Salary.xls")））;?ｏbｊSｈeeｔs=oｂｊBoｏk.GetSheｅtｓ（); //定義第一個Shｅｅｔ為對象?objSheet=objSheｅts．GeｔIｔem((_variａnt_t）short(１））;?oｂjRaｎgｅ。ＡttａchDiｓｐａt(yī)ｃh（objSheeｔ.ＧetＣeｌls(),ｔruｅ);??//讀取臨時表中的記錄?_RecoｒdseｔPtｒm_rs;?_bsｔr_tvSQL;?vＳQＬ＝”ｓeleｃtSＡLID，EＭ_Sａlaｒy。EmpＩＤＥmpID，EmpNａmｅ，ＳＡLＭonｔh，EＭ_Ｅmｐｌｏｙee.ＳＧＳalaｒｙGradｅ"；?vＳＱＬ=ｖSQL+”ＳGSａlaｒyGradｅ,SGSａlａｒySum，SALＯvｅrtiｍePａy，SALGｏOｎEｒｒandsSｕbsidy"；?ｖSＱL=vＳQL+”，ＳALLeaｖeＰenalty，SALＡtｈｅrBefTr,SＡＬOugｈtＳaｌａrｙ，ＳＡLAtｈerAｆtTr，SALFeａsｔSｕｂsidy”;?vSＱL=vSQＬ＋",SALTaxＡｆterSalary，SALFacｔSaｌaｒy,ＴRＴａxRａｔe，SALTaxSuｍ，SＡLＤａｔe,SＡLIｄｉogrａpｈ，SAＬRemark＂；?vSQL=vＳQL＋”ｆrｏmＥＭ_Ｅmｐloｙｅe,EM＿Ｓaｌary,EM_ＳaｌaryGradeｗhereＥＭ_Eｍployee.EmｐＩD＝EM_Salaｒy.ＥｍpＩD＂；?vSQＬ=vＳQL+＂andEM_SａlarｙGraｄｅ。ＳＧSalａryGrade=EM＿Empｌoｙee．SGSaｌａrｙGｒadｅ＂；?vSQL=ｖＳQL+（_ｂｓtｒ_t)cｏnditｉon_ＳＱL；?vSQＬ=vSＱL+”ordｅｒｂｙＳＡLＭonthasc”;?m_rs＝ａdo.GetRｅｃordSet（vSＱＬ）；?//生成標題欄?oｂｊRaｎge。SetItｅm（_variant_ｔ（（ｌｏng）（1)），＿variant_ｔ（(lｏng）（１)）,＿ｖariａnt＿t(＂序號”））;?ｏbｊRange。SｅtＩteｍ(_variａnt_t((ｌoｎg)(1）)，_vａｒiaｎt_t((long）(2）），＿ｖariant_t（"工資編號")）;?objRａnｇe．ＳeｔＩtem（_variａnｔ＿t(（ｌong）(1）)，_vaｒｉａnｔ＿t(（long）(３））,_vａｒiａnｔ_t（"員工編號＂));?obｊRangｅ．ＳｅｔIｔｅm(＿vaｒｉanｔ_t（（long)（1）),＿vａｒiaｎｔ_t(（ｌong)(4）），_vａrｉant_t（＂姓名”））； oｂjRaｎge。SｅtIｔeｍ(＿variant＿ｔ(（lｏng)(1））,_ｖaｒｉant＿t((ｌong)（5）)，_ｖａrｉａnt_t("月份＂))；?oｂjRaｎge。SｅtIteｍ(＿varianｔ_t(（lｏng）（1)），_varｉaｎt＿ｔ（（loｎg）（６))，_ｖariaｎt_ｔ(”基本工資等級”）)；?ｏbｊRange.SeｔIｔem（_ｖarｉanｔ＿t（（long)(１））,_vaｒiaｎt_t（（lonｇ）（７）），_ｖarianｔ_t（＂基本工資")）;………………………．. oｂjＲange．SｅtＩtｅｍ（_ｖａｒiａnt_ｔ（（lｏｎg)(1)),_vaｒianｔ_ｔ（（ｌoｎg）(21）），_vａriaｎt＿t(”備注＂））；??/／記錄總數(shù)?intiRｏwＣoｕnｔ=0；?whｉle（?。恚遰s-〉adoEOF） ｛? //把列值放入Eｘcel指定單元格 CＳｔrｉｎgｓｔr；? ｓtr。Forｍａｔ(”%0３ｄ",iＲｏwCouｎt＋1);??ｏbjＲange。SeｔIteｍ（＿vaｒiａｎt_t（（loｎg)(iＲowCount+2））,_ｖariant＿t(（ｌonｇ)（1)），_ｖariａnt_ｔ（ｓｔr））; ?ｓtr＝(LPCＴSTR）（_ｂｓtr_t）ｍ_rs-＞GetCｏｌleｃｔ("SＡLＩD”）;／/工資編號 obｊRange。SｅｔIteｍ（＿varianｔ＿ｔ((ｌｏｎg）(iRoｗＣount+2）),_variａｎt_t（（lonｇ)（2）），_varｉanｔ_t（str））； ?str=(ＬPＣTＳＴR)(＿bｓｔｒ＿t)ｍ_ｒｓ－＞ＧetCｏlｌｅct(”ＥmｐＩD＂);/／員工編號?ｏｂｊRａｎge.ＳeｔＩtem(_ｖarｉant＿t(（ｌoｎg）（iRowＣoｕnt＋２))，＿ｖarｉａｎt_t(（long)（3)），＿ｖaｒiａnt＿t（ｓｔｒ）)；??ｓtｒ=（LＰＣTSTＲ)(_ｂsｔr_ｔ）m_rｓ-＞GetCｏｌlect(＂EmpName"）；／/員工姓名?oｂｊRaｎｇｅ．ＳetＩｔｅm（_ｖａｒiａnt_t（（ｌong）（ｉRoｗCoｕｎt+２）),_ｖａrｉant_ｔ((lｏｎg）(４)),_vａriant_t(sｔｒ）); ｓｔr＝(ＬＰCTＳＴR）（＿ｂｓｔｒ_t)m_ｒs->GeｔCoｌlｅｃt(”ＳAＬMonth＂）;//月份?objRａnge．ＳetＩtem（＿ｖaｒiant_t（(loｎg)（iRｏｗCｏｕnt+2）），_vａriant_ｔ（(ｌｏnｇ）(5）），＿ｖａｒiaｎt_t(str)); ?stｒ=（LPCTＳＴＲ）（_bstｒ＿t)m_ｒs－〉GｅtColｌｅｃt（＂ＳGSalaryＧrade”）；//基本工資等級 ｏbｊRange.SetItem(_variaｎt＿t（(lｏng)（iRowCount+2)）,_ｖariａnt_ｔ（（lｏng)(6）），_variant_t(ｓtr））；? ｓｔr=（ＬPCＴSTＲ)（_ｂsｔｒ_t）m_ｒs->ＧetCoｌlｅct("SＧSａｌarySum＂）;//基本工資??str。Formａt(yī)（"％0．２ｆ￥”，ａt(yī)oｆ（str））；……．．.?………………。??str=(ＬPＣＴSTＲ）(_bstｒ_ｔ)m＿ｒs－〉GetCoｌlｅｃt(＂SALRｅmaｒｋ");/／備注?obｊRange。ＳeｔItem（_ｖａｒｉａｎt_ｔ(（lｏｎg)(ｉRｏwCount＋2）),_vａrｉａnt_t（(long）（２1）），＿ｖarｉaｎt_t（stｒ）);????iＲｏｗＣｏｕnｔ++; ?ｍ_rｓ－>MoveNｅxt(）; ｝?／／設(shè)置Exｃel為可見?oｂｊApｐ．SetVｉsible(true）;?//釋放句柄 ｏｂjRangｅ.ReleaseDｉspaｔｃh（）;?objSheｅt。ＲeleaseDiｓpａｔch（）;?ｏbjＳheets.ＲｅlｅａseDispatｃh()；?obｊBｏｏk.ReｌeａｓｅDispatch();?obｊＢoｏks．RｅlｅaｓeDispａt(yī)ｃh（）；?oｂjＡｐp。ＲeｌｅａseDiｓpａｔch(）； ａｄo．ＥｘitConｎeｃt（);}系統(tǒng)管理系統(tǒng)管理主要包括對系統(tǒng)中的單項表格進行修改、添加，部門管理、數(shù)據(jù)備份恢復、數(shù)據(jù)壓縮等管理?；拘畔⒐芾恚瑢?shù)據(jù)庫中單項表格進行修改、添加,如對民族、專業(yè)、學歷等的操作；部門管理，對部門信息進行添加、修改、刪除，選中部門信息添加時，將彈出下圖2），彈出的對話框中部門編號及上級部門編號都是從數(shù)據(jù)庫中讀取的，部門編號是讀取系統(tǒng)中第一個未用的部門編號，界面如下：部門管理圖部門信息修改圖當用戶選擇部門點擊刪除時，如果該部門包含下級部門就會彈出“此部門包含下級部門,不能刪除”的提示,如果該部門包含員工時就會彈出“此部門包含員工不能刪除”的提示,提示如下圖：部門刪除提示（包含有下級部門）圖部門刪除提示（包含員工）圖部門刪除提示圖數(shù)據(jù)備份與恢復,對數(shù)據(jù)庫信息進行維護，保證數(shù)據(jù)損壞時能夠還原,數(shù)據(jù)備份時，將記錄在數(shù)據(jù)庫中備份表格ＥM＿Ｂacｋup表格中,該表格存儲了數(shù)據(jù)庫保存的備份iＤ，備份時間,及備份路徑;備份對話框界面如下:數(shù)據(jù)備份恢復圖備份說明：為了防止數(shù)據(jù)冗余,每天備份的最大數(shù)量為999９9，備份時將彈出文件保存對話框，文件名是自動根據(jù)備份日期及當天備份編號生成的,用戶可以選擇更改備份名稱，備份名稱如“備份數(shù)據(jù)BAＣＫUP2008—04-15-１９—55-０0001”，備份成功后會提示備份成功.數(shù)據(jù)恢復時也將彈出似文件打開對話框,用戶可以選擇備份文件＊．Bak文件，點擊打開后開始恢復,數(shù)據(jù)庫恢復需要幾分鐘時間。數(shù)據(jù)備份主要代碼：生成數(shù)據(jù)備份ID函數(shù)CStringCBaｋeUｐＤlg：:ProｄuｃeBａｃkUpIＤ（）{ ?//連接數(shù)據(jù)庫?AＤOConｎm＿AdoCｏｎn； m＿ＡdoCｏｎｎ.ＯｎI(lǐng)nｉｔADOＣｏｎn（); ／/設(shè)置ＳELECT語句?_bｓtｒ_ｔvＳＱＬ；?CＴｉmett＝CTｉｍe：:ＧetＣurrentTime（）；?CStringｒq=ｔt．Forｍat（”％Y-％m-％ｄ＂）；?ＣSｔrｉnｇstr_ｔｔ＝tｔ．Foｒｍat（"BＡCKUP%Y-％ｍ—％d－％Ｈ-％M—＂)；?vＳQＬ＝"selｅcｔBackUｐ＿IDfｒｏmＥＭ_BaｃｋＵｐwhｅreBackUp_Ｄate='＂+rｑ+＂＇ｏrｄｅｒbyBａckUｐ_ＩD＂;?／/執(zhí)行SELETＥ語句?＿ＲｅcoｒdsetPtｒm_pRecｏrｄset; m_ｐＲeｃorｄseｔ=m_AｄｏCoｎn。ＧetＲeｃordSｅt（vSＱL）；?／/執(zhí)行ＳＥLECＴ語句?ｉｆ(ｍ_ｐＲｅcｏrdset-〉adoEOF）?{ ｒeｔurn（str＿tt+＂0000１＂）；?｝?ｅlse?｛?? ＿variant_ｔｖａｌｕe；??CSｔｒiｎgsｔr，sｕb；??for（ｉｎti=１;i<9999９；i＋＋)? ｛ ??value=m_ｐＲecoｒdsｅｔ-＞GｅtCｏllecｔ(＂BacｋUｐ_IＤ＂）;???sｔｒ=（ｃhar*）（＿bsｔr_t）vａlｕe;???ｓｕb=str.Ｍid(2３);? ?iｎｔnumｂeｒ=ａt(yī)oｉ(sub）;???ｉf(ｎuｍber!=i）? ?{????bｒｅak； ??｝ ｍ＿pRecoｒdsｅt—>ＭoｖｅＮext()；???iｆ（m_ｐReｃｏｒdｓet－>adoEOF) ? ｛????i+＋；??? breａk； ??} ?}??ｉf（i==99９9９）??｛???ＭessaｇｅBox（"今日備份數(shù)量大于9９９9９了”,＂錯誤”，ＭB＿OKＣANCＥL｜ＭＢ_ICOＮQUＥＳTION｜MB_SYSTEMMＯDAＬ);???retｕrnCStｒinｇ(＂＂）； ?｝??str．Format(”%0５d"，i)；??str_tｔ＝ｓtr_tt＋ｓtr； ?ｒｅｔurnｓtｒ_ｔｔ；?｝ m_AｄoConn.ExitCｏnnect（）;｝數(shù)據(jù)備份函數(shù)voidCＢakｅUpＤｌｇ:：OnBacｋUp（){?/／TODO:Ａdｄyoｕrcｏｎtｒolnotｉficationhandｌｅrｃodｅhｅrｅ?ＣStrｉnｇID=this->ＰrｏduｃｅＢａckＵpIＤ（）；?ＣＳｔｒingbacｋｎamｅ=＂備份數(shù)據(jù)＂+ID； /／連接數(shù)據(jù)庫?ADＯConｎm_AｄoConn； m_AdoCoｎｎ.OnＩniｔＡDOConn（);?//設(shè)置SＥＬECＴ語句 _bsｔr_tvSＱL； CＦiｌeDiａloｇdlg（falｓe,”bak”，backｎaｍe，OＦN_ＨIDEＲＥＡＤＯNLY｜OＦN＿OVＥRWRＩTＥPROMPＴ，”（*.ｂak）＂);?dｌg。m_oｆn.ｌpstrＴiｔｌe=”保存?zhèn)浞菸募ⅲ?if(dｌｇ。DoMoｄａl(）＝＝IＤＯＫ）??｛??this—〉BeginWａitCｕrｓｏr（）；??CStｒingnａme=ｄｌg。ＧetFiｌeNａｍe（)； ?CStringpatｈ＝dlg．GeｔPathNamｅ（);??ｖSQL＝＂uｓemaｓterｂacｋuｐdataｂaseＥＭＰManagetｏdiｓk='"+ｐａｔh+"’"；? //執(zhí)行SELＥTE語句??_RecｏrｄsｅtPtｒm_ｐReｃｏrｄsｅt；??ｍ_pRecｏrdset=m_AｄoCｏnn.GｅｔRｅｃorｄSet（vSQＬ）；? _bstr_ｔsｑｌ；??CＳｔringＤaｔe＝ID．Ｍid（6,10)；??ｓql=＂useＥMＰＭａnagｅiｎｓeｒtＥM＿BacｋUｐ(BaｃkUｐ＿ID，BａckＵp＿Ｄaｔｅ,BacｋUp＿Ｐath)”；??sql=sql+＂values('"+IＤ+＂＇，'＂＋Date+＂'，＇＂＋pａt(yī)ｈ+”’)＂;? ｍ＿AdoＣoｎn。ＥxecuteＳＱL（sqｌ）；??this-〉EｎdWaitＣｕrsｏr（)；?? MeｓsageBｏｘ("備份成功”，”操作提示”,MB_IＣONＡSＴＥRISＫ)；?}?CＤialoｇ：：ＯnCaｎceｌ();｝數(shù)據(jù)恢復代碼vｏidCBakeUｐDｌg：:ＯｎReｓumｅ（)｛?//TODO：Addｙourｃonｔroｌnｏtｉficaｔionhandｌercodｅｈｅrｅ ／/連接數(shù)據(jù)庫?ADOConｎm_ＡdｏＣｏnn;?m＿ＡdoＣｏnn．OｎI(lǐng)nitADOConｎ（）；?/／CStｒｉngname;?／／設(shè)置SEＬECＴ語句 _bstr_tvSQL;?CＦｉlｅDiaｌoｇdlg(ＴRUE，ＮＵLL,ＮULL，ＯFN_HIDＥREＡＤOＮLY｜OFN＿OVEＲWRＩTＥＰＲOMPT，??????＂BacｋFｉｌe（＊。bak）|*。*"，tｈis）; //CＦileＤialogdlｇ（tｒuｅ,”baｋ",ＮＵLL,ＯFN_ＨIＤＥＲＥADＯNＬＹ｜OＦＮ＿OVERWRITEPＲOMPＴ,"（*.bａｋ)”）；?dlg．m＿ofｎ.lpｓｔrTitlｅ=”打開已備份的文件＂；?ｉｆ（dｌg．DoMｏdａl（）==IDＯK）??｛? thｉs-〉BeｇiｎWａｉｔCurｓｏr(）;??CSｔrｉｎgnamｅ＝dlｇ.GetFilｅNａmｅ(）；??CStrinｇpatｈ=ｄlｇ。GeｔPaｔｈName（）；??ｖSＱL=＂useｍａsterresｔoredaｔabaｓeEMPＭａnaｇeｆｒomdｉｓk=’＂+patｈ+"＇"；? //執(zhí)行ＳELＥＴＥ語句??＿RecoｒｄsｅｔPtrm_pＲｅｃorｄset；? m＿pRecorｄset=ｍ_AｄoConｎ。ＧｅｔRecordＳet(vSQL）; ?//m_AｄoＣonn．ＥxecutｅSQL(ｓｑｌ);??thｉs-〉EndＷａitＣurｓｏｒ(）； MｅsｓａgｅBox（"恢復成功”，"操作提示")；?}?m_AdoＣoｎn．EｘitConnecｔ（）;?CDｉａlog：：ＯnCanceｌ()；｝系統(tǒng)初始化,將數(shù)據(jù)庫中的已有數(shù)據(jù)清楚,保證數(shù)據(jù)的有效性.用戶管理用戶管理模塊主要功能對操作員的管理、權(quán)限的分配管理、及密碼修改管理.操作員及權(quán)限管理，對操作員的增加、刪除、修改及操作員的權(quán)限分配管理.添加用戶時通過選擇相應的權(quán)限,并刷新顯示，如果用戶擁有某個權(quán)限時顯示“[權(quán)限名］”如【人事管理】，如果用戶沒有某個模塊的權(quán)限就顯示【…………】。只有當用戶擁有所有權(quán)限（超級用戶）時才可以擁有操作員及權(quán)限管理的權(quán)限,普通用戶都有修改自己密碼的權(quán)限。主界面如下:用戶管理圖操作員及權(quán)限修改的管理代碼：ｖoidCUserManage::OnDｂlcｌｋUserManaｇe（ＮMHＤR＊ｐＮMHDＲ，LＲESULT＊pＲｅsuｌt)｛?//ＴO(shè)DO：Addyourconｔrｏlnｏtificatiｏnhaｎdlercodehere?AＤＯＣonnａdo，vado;//vado用來更新單個的表項?CＳtrｉngstrＳqｌ，ｖstrSqｌ；／／ｖstｒSｑl用來更新單個的表項?_ｂsｔｒ_tSQL; ＿RecordｓetPｔrm＿ｐＲecｏrdseｔ，vm_pReｃｏrdseｔ；//vm_pRｅｃordｓeｔ用來更新單個的表項?ＰOSITIＯNpos;?inｔIｎｄex；?ＵpｄatｅＤata（TＲＵE）；?pｏｓ=m_UserManａge．GｅtFirｓtＳeｌｅctedＩteｍPｏｓitiｏn（）；Index=m＿UseｒＭａnage．GetＮexｔSeleｃtedIｔem(poｓ);／/得到項目索引?m＿UMUｅsrName＝m＿UｓerＭaｎaｇｅ．GｅtIｔemＴｅxｔ(Iｎｄex,1）;?ｏlｄ_UMＵesrＮamｅ=ｍ_UMUesrNaｍe；?ｉｆ（m＿ＵMUesｒNamｅ＝="＂)?{??ｍ_UMPassｗd１＝”"； ?m_ＵMＰasswd2=”"；??m_ＥｍｐＮame。ReｓetContent（);??m_M００００１．SｅtCｈecｋ（FALSE)；??………………． ｝???eｌse?{??ａｄo.OｎI(lǐng)nｉtＡDOCｏｎn(）； ?strSql。Fｏrmat（"sｅlｅctUMUesrName，EmpNaｍe，ＵMＰasｓwｄ，UMDroｉｔ\? ?ｆromEM＿Eｍployee，ＥＭ＿UserＭanａge\?? whｅreEM_Ｅmplｏyeｅ.EｍｐIＤ=ＥM_UｓeｒMａnage。ＥｍpIＤａndＵMUeｓrNamｅ='％s＇”,oｌｄ＿UMUesｒName）; m_pReｃoｒｄseｔ=ado．GetRecoｒｄSeｔ（_ｂｓtr_t（sｔｒSql）)；? ? if(?。╩＿ｐＲecordsｅｔ->adoＥOF））???｛? ????vEmｐName=(LＰCTSＴR）（_ｂstｒ＿t）m_ｐRecordｓｅt—〉ＧｅtＣｏｌｌeｃt(”ＥmｐName")； ??m_ＵMPasｓｗd１＝(LPCTＳＴR）(_ｂｓtｒ_ｔ）m＿ｐRecoｒdsｅt-＞GetColｌｅct("UMＰasswd”）；???oｌd＿ＵMPasｓwd=ｍ_UMPasｓｗd１;? ?m_ＵＭPaｓswd2=＂”； ? ｉf(vｐｒｏpeｒt_gｌobａl＝=６３)?? { ???GeｔDｌｇIｔem(IDC＿UMＰaｓsｗd1)-〉EnａbｌeWinｄow(ＴRUE);? ? GetDlgIｔｅｍ（IＤＣ_UＭPａｓswd２）—〉EnaｂleWindoｗ(ＴＲＵE)；?? ｝? ?elｓｅ???{? ??GeｔDlgItem(IDC＿UMＰasｓｗｄ1）—〉EnａbｌｅＷindow（FALSＥ）；????GetDlgＩｔeｍ(IDＣ＿UＭPａsswd2)->EnａｂlｅWindoｗ（ＦALＳＥ）；? ?}???? ?vＵMDroｉt＝(ＬPCTＳTR）（_bstr＿t）ｍ_pＲecoｒｄseｔ－＞GetCoｌlecｔ（”ＵMDroｉt＂)；?? ??? ?/／姓名 ???m_ＥmpNamｅ．ResetCoｎtenｔ（)；? ?vａdｏ．OnInitADＯCｏnn()；???vstrSql.Ｆorｍat（"sｅlectEmpID,ＥｍpNaｍefromＥM_Employｅｅ"）； ? vｍ_pRecordseｔ=ｖａｄo．GｅtReｃordSet(＿bsｔr_t（ｖstｒＳｑl)）;? ?ｍ＿EmpNamｅ.InsertＳｔｒｉng(0，vEｍｐNａme);?? m＿EｍpName．SｅｔCurＳｅl(０）；?? wｈilｅ（(!ｖm_pReｃoｒdseｔ—＞ａdoＥOＦ）＆&(！vm_ｐReｃｏrdsｅt->adoBＯＦ))?? ｛ ???ｔｍｐ=(LPCTSTR）(_bstr_t)vm_pRｅｃｏrｄseｔ—＞GｅtCｏlleｃt("ＥｍｐNaｍe”）；????ｖEmpID＝（ＬPCＴＳTR)（_ｂｓtr＿ｔ）vm＿pＲeｃorｄｓet-＞ＧｅｔCoｌleｃt（＂ＥmpID”）；????ｉf（vEmpName！=ｔｍp)??? m＿ＥｍｐNａmｅ。ＡｄdStｒing(tmp）；????vm_pRecoｒdｓet—>MｏvｅNext(）; ? ｝ vado．EｘitCｏｎｎeｃt（);?? vａdo。ＯｎＩｎｉtＡDOConｎ();???ＳQＬ=”selectＭＳ＿IＤ,ＭSModuleNaｍe，MSVａlｕe";? ?SQＬ＝SQL+＂frｏmEM＿ModulｅＣlａｓｓｏrｄeｒbyMS_ID"; ?ｖm_pRecordset=ｖadｏ.ＧetRecordSet（ＳQＬ)；???ｗｈiｌe(!vm＿pRecｏrdｓet->aｄoEＯＦ）???｛? ??ｖMＳＶaｌue=(ＬPCTＳTR)(_bstｒ_t)ｖm＿pReｃｏrｄｓet－＞GetCoｌlｅcｔ(”MＳＶalｕe")；? ??vMS_ID＝(LPＣTＳＴＲ)(＿ｂstr_t)vm_ｐＲｅcordset－〉GetＣolｌect(＂MS＿IＤ＂）；????iｆ（（ｖMS_ＩＤ＝＝＂0０0０1”)＆＆(（atoi(ｖＭSＶalｕｅ）)&(aｔoｉ（vＵMDroit）））) ?? m＿Ｍ０0001.SｅｔChｅck(TRUＥ)； ???if（(vMＳ＿IＤ==＂００00２"）&＆（（atｏi(ｖＭSＶalｕe)）&（aｔoｉ（ｖＵＭＤroit））））? ? ?m_M0000２。ＳetCheｃk(TRUE）；????if(（vMS_ID＝＝"000０３＂）＆&（(atoi（vMSValｕe）)＆(atｏｉ（vUMDｒoit）))）???? m_Ｍ０0０03．ＳｅtChｅcｋ(TRＵE)；? ?if（（vＭS＿ID＝＝”00004＂）＆&（(aｔｏi（vＭＳＶalue)）&（atoi(ｖUMDｒｏit）））)?????m＿M０００04.SｅｔCheck(ＴRUE）； ?? iｆ（(vＭS_ID=="00005＂)&＆(（ａｔｏｉ（vMSValue)）＆(atoi(vUMDroiｔ）)）） ??? m_M0０0０5。SｅtCｈeck（ＴRUE)；????if（（ｖMＳ_ＩD=＝"00006＂)&&((atoｉ（vMＳVａlue)）＆（atoi(ｖUMＤrｏit）)））?????ｍ_M00０06。SetＣhｅcｋ（TRUE);????vm＿pRｅｃorｄset－〉ＭoｖeNｅｘt（）； ??}?? vado．ExitCoｎneｃt(）；? ???｝??ado。ＥxitCｏnｎeｃｔ（）；?｝?UｐdateDａt(yī)a（FＡＬSE);?＊pRｅｓuｌｔ=0；｝密碼管理，對于操作密碼的修改。修改時要求用戶輸入舊密碼、新密碼及確認密碼,先通過讀取全局變量中當前用戶的用戶名，查詢數(shù)據(jù)庫中舊密碼是否正確,錯誤是提示，如果正確的話就判斷新密碼與確認密碼是否一致，不一致時提示密碼不一致，一致時調(diào)用加密函數(shù)保存至數(shù)據(jù)庫.系統(tǒng)幫助系統(tǒng)幫助是方便用戶的使用.軟件測試系統(tǒng)模塊測試系統(tǒng)登錄管理模塊的功能是對用戶管理權(quán)限的管理，在此人事檔案信息管理系統(tǒng)中用戶有兩種：管理人員和一般操作人員。只有管理人員才能對人事信息進行管理，一般工作人員只有對人事信息查詢的權(quán)限。而管理人員在對人事信息進行相應維護時,必須輸入賬號和密碼。研究成果《人事信息管理系統(tǒng)》的主要研究成果是可以實現(xiàn)對人事檔案信息的錄入、更新、刪除、查詢、導出及考勤、工資、系統(tǒng)管理、用戶管理等功能,從而提高了工作效率及正確性。技術(shù)難點及解決一般用戶和管理員操作權(quán)限問題?按照系統(tǒng)分成的五個模塊,對每個模塊用一個二進制數(shù)字表示，每個用戶的權(quán)限是它擁有的各個模塊的權(quán)限值得和，用戶登錄成功后通過將用戶的權(quán)限依次與各個模塊的權(quán)限值相與,如果相與的結(jié)果為真則顯示該模塊下的各個功能，如果沒有的話只顯示主標題。主要代碼:BOＯＬCMaｉｎＦraｍe::OnCreateClｉeｎt（LＰCＲEATEＳTRＵＣTlｐcs,CCreateＣｏnｔext＊pCoｎtｅxt）｛??///首先將窗口客戶區(qū)分割為一行兩列?if（！wndＳpｌｉtｔeｒ.ＣreateSｔaｔｉｃ（tｈiｓ,1，2）)retｕｒnfalse；?ｉf（！ｗndＳplitter。Ｃreａt(yī)eViｅw(0,１，RUＮＴIＭＥ＿CＬAＳS(ＳｙｓPage）， ＣSizｅ（0，0),ｐＣｏntext））??returnｆａlse； BaseIｎfｏ＝ＦALSE;?ＳｙsＭan=FＡＬSE；/／m_pMａinＷｎd－>ShowＷindow（ＳＷ＿ＳHOW)；//??m_pMａinWnｄ—＞Ｕｐdａt(yī)eWｉｎdow(）；?DWＯRＤdｗｆ＝CGfxOutBaｒＣｔrl::fＤragＩtems| ??CＧｆｘOutBarCtrl：：ｆEdiｔGroｕps｜????CＧfｘＯutＢarCtrl::fＥdｉtItｅmｓ|? ?CＧfｘＯutＢaｒCｔrl：：fReｍｏvｅGroups｜????CGfxOｕtBarCtrl：：ｆRｅmoveＩtems| ?? ＣGｆxＯutＢaｒCtrl：:fＡdｄGrｏups｜ ??CGｆxOutBaｒＣtｒl::fAnｉｍａt(yī)iｏn；?wｎdBａｒ。Ｃrｅate（WS_CHILD｜WＳ_VＩＳＩＢＬE，CReｃｔ(０,0，０，0),＆wnｄSpliｔter， ?wndSｐｌitｔｅr．IdFromRｏwCol（0,０），dwf）;?wnｄBａr．SetOwnｅｒ（thｉs)；?imaＬarge．Create（ＩDB_ＩＭAGELＩST,32,０，ＲＧＢ（128，1２８,1２８)）; imaSｍall.Cｒeaｔe（IDB_SMＡLL＿IMＡＧEＬＩST,１６，0，RGB（０，１28，1２８））； wndBaｒ。ＳeｔＩmageLｉｓt（&ｉmａLarｇe，ＣGｆxOｕtＢarＣｔｒｌ：：fLaｒgeIcｏｎ）；?wndBａr．SetImａgeＬｉｓｔ（＆imａＳmaｌｌ，CGfxＯutBａrCtrl::fSmａllＩcoｎ);?ｗndBar.SetＡｎiｍａｔionTiｃkCｏｕnt(1０)；?wｎdＢaｒ.ＳetＡnimSelHigｈｌighｔ(２00)；?／/BlueＳｋy加入的控制?wｎdBar。SetＩfQuｅrｙRｅmovｅ(trｕe）; wnｄBar.AdｄＦｏｌｄer（"系統(tǒng)主頁＂,0）；?wｎｄBaｒ。AddFolder（＂人事管理＂,１）；?ｗndBａｒ。AddＦｏldeｒ（＂出勤管理”,２）； wndBar.AddFｏlｄer（"工資管理＂,3）； wndＢａr．ＡｄdFoldeｒ（”系統(tǒng)管理＂,4); wndBar.ＡddFolｄer（”用戶管理",5）； wndＢａｒ.AddFolｄer（＂系統(tǒng)幫助",6)；?//forwndBａｒ.AdｄFolｄｅr（"系統(tǒng)主頁”,0）；?ｗnｄＢaｒ。ＩnsertIteｍ（0，0，＂系統(tǒng)主頁"，７，0）;??ADOConnaｄo,ｖａｄo;//vａdo用來更新單個的表項?CStriｎgｓtrＳql，vstｒSqｌ；//ｖstrＳｑl用來更新單個的表項?_ＲｅｃordseｔPｔrm＿pＲecｏrdset，ｖm_pReｃorｄsｅt；//vｍ_pＲecordset用來更新單個的表項?CＳｔｒiｎgｖMSＶalue;?/／forwndＢar．AｄｄFoｌdｅr（”人事管理",1）;?aｄo．ＯｎI(lǐng)nitADOＣonn（）；?stｒSql．Foｒｍａｔ（＂ｓeｌｅctMSVaｌuefrｏｍEＭ_MｏduleCｌａｓs\?? wｈereMSMｏｄuleName＝＇%s＇”,"人事管理＂）；?m_pRｅcorｄset=ａdｏ。GetＲｅcｏrdSｅt（＿ｂｓtｒ_ｔ(sｔrSql））；?if(?。╩_pRｅcorｄｓet－〉ａｄoＥOF))? ?? ?vMSValuｅ=(ＬＰCTSTＲ）(_ｂsｔｒ_t）m_pRｅcordsｅt-〉GｅtCollect(＂ＭＳVａluｅ"）;?elsｅ??vMSValｕｅ="0"；?ado.ExitCoｎnecｔ()；??ｉf(ｖproｐert＿ｇlｏbaｌ&atｏi（ｖＭSVａlue））?｛??wndＢａr.InｓｅrtＩｔeｍ（1，0,”人員檔案管理"，0,0）；??wnｄBar。InｓeｒｔItｅm(1，1，＂職稱評定管理＂，１，0);? ｗndBar。ＩｎseｒtＩteｍ(1,2，”獎懲管理",2，0）； ?wndBａr.IｎsｅrtIteｍ（1，３，"培訓記錄管理＂,３，0); ?wｎｄBａｒ。ＩｎsertIｔeｍ(１,４，＂培訓項目管理＂，４,0）；? ｗnｄBａr.IｎsertIｔｅm（1，５,＂人事變動管理"，0,0); ?wndBaｒ.IｎｓerｔＩtem（１,６，"考評管理"，1,0);??ｗnｄBar。IｎsertIｔem(１，７，"考評項目管理”,3,0);??ｗｎdBar。InsertIｔｅm（1，8，＂福利品領(lǐng)取管理”,４,0）； ?ｗnｄBar．IｎseｒtＩtｅm（１,９,＂福利品管理＂,0,０）; ?wndＢar。ＩnsertＩteｍ（1，1０，”信息統(tǒng)計管理"，１，0)；?｝ //fｏｒwndＢar。ＡddFolｄer（＂出勤管理",2）；?ado。OnＩnitＡＤOＣｏnn（)；?stｒSql。Formａt(yī)(”ｓelecｔMSValuefrｏmEM_MoｄuｌeＣlａsｓ＼ ?ｗｈeｒeMSModｕｌｅNaｍe='%ｓ'”,”出勤管理＂）； m_pRecordset＝adｏ.GeｔＲecordSeｔ（_bstｒ_t（sｔrSqｌ））;?if(！（ｍ_pＲecordｓet—＞adoEOＦ）） ????ｖMＳVａｌｕe＝（LPCTSＴR）（_bstr_t）m＿pReｃｏrdｓet－>ＧetCｏｌlecｔ（＂MSValue”）； elｓe??vＭSＶalｕe＝"０＂； ａdｏ。ExitConnect(）；??iｆ（vproｐerｔ_gｌoｂal&atｏi（vＭSVａluｅ）)?｛??wndBａｒ。InsertＩtｅm（2，０，”考勤記錄＂，0，0）；??wndＢaｒ。ＩｎseｒtIteｍ（２,１,"請假記錄"，1，０）; ?wndBar.InsｅrtItｅｍ（2，2,"加班記錄”，2，0); ?ｗnｄBar.IｎｓeｒtIｔem（２,３，＂出差記錄＂，３,0）；??ｗndBaｒ。ＩｎｓｅrtItem（２，４，”月度考勤記錄＂，０，0)；?}?／/foｒwｎdBar。AdｄＦoldeｒ（”工資管理”，３）;?ado。ＯｎI(lǐng)nitAＤＯCｏnｎ（）;?strSql。Forｍａｔ(”seleｃｔMＳValuｅfromＥＭ_ModuleCｌaｓs＼???whereMSModuleＮaｍe＝'％s＇”，"工資管理”）；?m_pReｃordseｔ＝aｄo。GeｔRecordSet（＿bstｒ＿ｔ(sｔｒＳql）)；?if（!(ｍ_pRecordｓｅｔ->ａｄｏＥＯF)） ???? ｖＭSVaｌuｅ＝(ＬPＣTＳTR）(_bsｔｒ＿t）m＿ｐRecｏｒdsｅｔ—>GeｔCoｌlect（”MＳＶａlｕe＂）；?else? vMSVａｌuｅ＝"0”；?ado。EｘitCｏｎnecｔ（）;??iｆ（ｖproｐerｔ＿gｌobaｌ&atｏｉ（ｖMＳVａlｕe））?｛ ?ｗnｄＢａr。InseｒtＩｔｅm(3,0，”基本工資管理”，0,0）; wndBａｒ。InsertItem（3，１，”工資構(gòu)成項目管理",1，０）；??ｗndＢar．InｓeｒｔItｅm(3,２,＂稅率管理”，2，0)；??ｗndＢar．IｎsertIｔｅm（３,3，”節(jié)日補貼管理”,3,0)；