人事管理系統(tǒng)畢業(yè)論文

1、<p><b>　　出版社人事管理系統(tǒng)</b></p><p>　　學 院 名 稱：培黎工程技術學院 </p><p>　　專 業(yè) 名 稱：電子信息科學與技術</p><p>　　學 生 姓 名： </p><p>　　指 導 教 師： </p><p><

2、;b>　　二○一一年十月</b></p><p><b>　　摘 要</b></p><p>　　本文以出版社管理信息系統(tǒng)建設中的人事管理子系統(tǒng)的開發(fā)為背景，首先論述了管理信息系統(tǒng)的概念、結構及系統(tǒng)開發(fā)的基本原理和方法，以Visual FoxPro 6.0開發(fā)平臺；詳細說明了以數(shù)據(jù)庫技術為技術背景的"人事管理系統(tǒng)"的基本功能及

3、實現(xiàn)過程，其次全文按序言、管理信息系統(tǒng)綜述、開發(fā)方法、開發(fā)平臺和工具、系統(tǒng)規(guī)劃和分析、系統(tǒng)實現(xiàn)、處理等七個章節(jié)加以論述，并且對系統(tǒng)各個模塊的操作既查詢修改、刪除、更新等做了詳細的演示。最后重點介紹信息管理系統(tǒng)未來的展望和發(fā)展前景。</p><p>　　關鍵詞：管理信息系統(tǒng)、人事管理、系統(tǒng)開發(fā)、 數(shù)據(jù)庫、 查詢</p><p><b>　　ABSTRACT </b>&l

4、t;/p><p>　　This paper is to discuss the personal management subsystem which is according to the management information system construction of publishing company .First of all ,the paper dissertated the concept

5、 ，the structure of the management information system and basic principle and method of system development through the visual forpro6.0 development platform .It is explained the basic function and the realization process

6、of the personal management system by the database technique .Secondly，the paper d</p><p>　　Key words: Management information system, personnel management, system development, database, query </p><

7、p><b>　　目 錄</b></p><p>　　第一章 引言……………………………………………………………… 6</p><p>　　第二章 管理信息系統(tǒng)綜述</p><p>　　2.1 概述…………………………………………………………… 7</p><p>　　2.2 管理信息系統(tǒng)的發(fā)展………………………

8、……………………7</p><p>　　2.3 目前我國人事管理的現(xiàn)狀………………………………………7</p><p>　　2.4 人事管理信息系統(tǒng)建設的好處…………………………………8</p><p><b>　　第三章 開發(fā)方法</b></p><p>　　3.1 系統(tǒng)開發(fā)方法概述 ……………………………………………

9、 8</p><p>　　3.2 結構化生命周期法簡介…………………………………………8</p><p>　　3.3 本系統(tǒng)開發(fā)方法的選擇…………………………………………8</p><p>　　第四章 開發(fā)平臺和工具</p><p>　　4.1 開發(fā)平臺的選擇…………………………………………………9</p><p>　

10、　4.2 開發(fā)工具的選擇…………………………………………………9</p><p>　　4.2.1 開發(fā)語言介紹…………………………………………………9</p><p>　　第五章 系統(tǒng)規(guī)劃和分析…… ………………………………………………………10</p><p>　　5.1 系統(tǒng)的可行性分析………………………………………………10</p><p&

11、gt;　　5.2 系統(tǒng)的詳細調查…………………………………………………10</p><p>　　5.3 系統(tǒng)邏輯模型的提出……………………………………………10</p><p>　　第六章.系統(tǒng)設計…………………………………………………………………… 10</p><p>　　6.1 系統(tǒng)設計的依據(jù)…………………………………………………11</p>&

12、lt;p>　　6.2 系統(tǒng)總體結構設計………………………………………………11</p><p>　　6.3系統(tǒng)界面………………………………………………12</p><p>　　6.4 源代碼 ………………………………………………………………………14</p><p>　　第七章. 開發(fā)總結與對管理信息系統(tǒng)的展望</p><p>　　

13、參考文獻 ………………………………………………………………………………24</p><p><b>　　第一章 引言</b></p><p>　　在現(xiàn)代社會中管理的作用越來越顯得重要。一般來講，管理通過計劃、組織、指導與領導、控制等手段，為組織制定目標，應用組織的各種要素，以實現(xiàn)組織的目標。對一個出版社來說，人們按照一定的生產(chǎn)關系組織起來，對系統(tǒng)內的各個部門人員加以

14、計劃、指導、監(jiān)控和協(xié)調，以達到預期的目的，即稱為管理。</p><p>　　管理信息系統(tǒng)從產(chǎn)生到現(xiàn)在已經(jīng)經(jīng)歷了單項數(shù)據(jù)處理階段、 綜合數(shù)據(jù)處理階段 、現(xiàn)代管理信息系統(tǒng)（MIS）等幾個階段。但是在我國，由于各種原因，管理信息系統(tǒng)的發(fā)展尚處于初級階段。盡管如此，充分利用現(xiàn)有的資源和技術力量，開發(fā)一些適合出版社的管理信息系統(tǒng)還是非常必要的。</p><p>　　近年來，隨著科學技術的迅猛發(fā)展和管

15、理水平的不斷提高，計算機已經(jīng)被廣泛應用于日常管理之中，那么作為一個出版社來說，人力資源的管理和利用是出版社發(fā)展的根本保證，可以及時的做到人員在各個部門的調動及分配比例，便于登記，提高工作效率。因此開發(fā)一套完整的人事管理系統(tǒng)已是大勢所趨.</p><p>　　第二章 管理信息系統(tǒng)綜述</p><p><b>　　2.1 概述</b></p><p&g

16、t;　　管理信息系統(tǒng)（Management Information System，簡稱MIS）是一個由管理人員和計算機組成的用以進行信息的收集、傳輸、加工、存儲、維護和使用的系統(tǒng)。它是一門綜合了管理科學，系統(tǒng)理論，計算機科學的系統(tǒng)性邊緣科學。</p><p>　　管理信息系統(tǒng)的物理組成包括以下五個方面:</p><p>　　(1)計算機硬件系統(tǒng)：包括主機、外部存儲器、輸入輸出設備等。&l

17、t;/p><p>　　(2)計算機軟件系統(tǒng)：包括系統(tǒng)軟件和應用軟件兩大部分。</p><p>　　(3)通信系統(tǒng)：包括線路等通信設施和與計算機網(wǎng)絡、數(shù)據(jù)通信有關的軟件等。</p><p>　　工作人員：包括系統(tǒng)分析員、程序設計員、維護人員、管理員、操作人員等。</p><p>　　2.2 管理信息系統(tǒng)的發(fā)展</p><p&

18、gt;　　管理信息系統(tǒng)通過對企業(yè)當前運行的數(shù)據(jù)進行處理來獲得有關信息，以控制企業(yè)的行為；利用過去和現(xiàn)在的數(shù)據(jù)及相應的模型，對未來的發(fā)展進行預測；能從全局目標出發(fā)，對企業(yè)的管理決策活動予以輔助。</p><p>　　2.3 目前我國人事管理的現(xiàn)狀</p><p>　　我國的計算機應用于企業(yè)管理，只是在70年代末期以后才逐漸開展起來的。目前，計算機輔助管理已在我國的各行各業(yè)得到了廣泛地應用，但

19、總的來說，計算機在我國管理中的應用，還處于初級階段，盡管近兩年發(fā)展較快，但還需要不斷地探索和研究。尤其是計算機輔助人事管理僅是近幾年才在我國得到普及和發(fā)展，而在許多發(fā)達國家計算機輔助人事管理已十分普及，因此對這方面的研究是必要的，它將推動我國企業(yè)的發(fā)展和人事管理信息處理的現(xiàn)代化。</p><p>　　2.4 人事管理信息系統(tǒng)建設的優(yōu)點</p><p>　　科技是第一生產(chǎn)力，離開了科學技術的

20、企業(yè)是不會長遠發(fā)展的，科技的載體是人，沒有人也說無所謂科學技術，因此人力資源的開發(fā)和管理是十分重要的。隨著時代的發(fā)展，人才在我國各行各業(yè)中的地位日趨重要，各類人才肩負著企業(yè)發(fā)展的重任，所以人事管理的好壞，決定著一個集體的興衰成敗，因此，開發(fā)人事管理信息系統(tǒng)對出版社的管理及人才素質的提高具有重大的社會意義?？梢蕴岣咴摮霭嫔绻芾淼默F(xiàn)代化水平，提高人事管理的工作效率，適應社會的發(fā)展。因此此系統(tǒng)有以下四個優(yōu)點。</p><p

21、>　　1、及時的記錄各部門的人員情況</p><p>　　2、改變工作方式，提高工作效率</p><p><b>　　3、提高了經(jīng)濟效益</b></p><p>　　4、強化科學管理水平</p><p><b>　　第三章 開發(fā)方法</b></p><p>　　3.1系

22、統(tǒng)開發(fā)方法概述</p><p>　　建立一個管理信息系統(tǒng)，是一項復雜的軟件工程的實施。近30多年來，軟件工程發(fā)展成為新科學，至今已經(jīng)成為IT產(chǎn)業(yè)的重要支柱。一開始，人們往往使用手工作坊式的軟件開發(fā)方法，靠個人的力量編寫各種小型程序；但是隨著計算機硬件技術的飛速發(fā)展，計算機軟件在各個領域中的作用日益突出，那種多年來被人們沿用的手工作坊式的開發(fā)方法，已經(jīng)在軟件產(chǎn)品的質量、成本及開發(fā)時間等方面無法滿足需求。</p

23、><p>　　3.2 結構化生命周期法簡介</p><p>　　結構化生命周期法是一種傳統(tǒng)的管理信息系統(tǒng)開發(fā)方法，其基本思想是把整個系統(tǒng)開發(fā)過程分成若干個階段，每個階段進行若干活動，每項活動應用一系列標準、規(guī)范、方法和技術，完成一個或多個任務，形成符合給定規(guī)范的產(chǎn)品。 </p><p>　　3.3 本系統(tǒng)開發(fā)方法的選擇</p><p>　　基于以

24、上開發(fā)方法的優(yōu)劣和本系統(tǒng)的實際情況，本系統(tǒng)總體上采用結構化生命周期法進行系統(tǒng)規(guī)則、系統(tǒng)分析和系統(tǒng)設計，但在系統(tǒng)實施階段采用原型法。</p><p>　　第四章 開發(fā)平臺和工具</p><p>　　4.1開發(fā)平臺的選擇</p><p>　　考慮到本系統(tǒng)的性能要求，和現(xiàn)有的條件，我們選擇了WINDOWSXP中文版作為開發(fā)、測試和運行的平臺。因為WINDOWS操作系統(tǒng)是目

25、前應用最廣的操作系統(tǒng)，它以全新的圖形界面，簡單快捷的操作方式，支持多媒體功能等特點而成為軟件發(fā)展的流行趨勢，選用它作為開發(fā)平臺，易于功能的擴展和軟件升級。</p><p>　　4.2 開發(fā)工具的選擇</p><p>　　針對目前世界上流行的大量軟件和開發(fā)工具，經(jīng)過認真分析其優(yōu)缺點，結合計量器具管理系統(tǒng)的需要和目前的硬件環(huán)境，選用微軟WINDOWS平臺下的Visual FoxPro 6.0（

26、簡寫為VF6.0）作為軟件開發(fā)工具。</p><p>　　現(xiàn)在，市場上可以選購的應用開發(fā)產(chǎn)品很多，流行的也有數(shù)十種。目前在我國市場上最為流行、使用最多的可用作做人事管理系統(tǒng)開發(fā)工具的產(chǎn)品有：</p><p>　　Microsoft公司的Visual FoxPro6.0、Visual Basic編程語言、C語言等等</p><p>　　選擇Visual FoxPro6

27、.0有以下幾個優(yōu)點：</p><p>　　1面向對象的開發(fā)語言是專門數(shù)據(jù)庫管理開發(fā)系統(tǒng)。</p><p>　　2開發(fā)數(shù)據(jù)庫代碼量少。</p><p>　　3開發(fā)快捷,效率高,界面美觀。</p><p>　　4適合開此類發(fā)小型數(shù)據(jù)庫。</p><p>　　第五章 系統(tǒng)規(guī)劃和分析</p><p>　

28、　系統(tǒng)規(guī)劃，應根據(jù)組織的目標和發(fā)展戰(zhàn)略以及管理信息系統(tǒng)建設的客觀規(guī)律，并考慮到組織面臨的內外部環(huán)境，科學地制定管理信息系統(tǒng)的發(fā)展戰(zhàn)略和總體方案，合理安排系統(tǒng)建設的進程；它是管理信息系統(tǒng)（MIS）生命周期的第一個階段，是MIS的概念形成時期，這一階段的主要目標，就是制定出MIS的長期發(fā)展方案，決定MIS在整個生命周期內的發(fā)展方向、規(guī)模和發(fā)展進程。它的主要任務是：制定MIS的發(fā)展戰(zhàn)略、確定組織的主要信息需求，形成MIS的總體方案、制定系統(tǒng)建

29、設的資源分配計劃。</p><p>　　5.1 系統(tǒng)的可行性分析</p><p>　　可行性分析是系統(tǒng)分析階段的第二項活動，可行性分析能使新系統(tǒng)達到以最小的開發(fā)成本取得最佳的經(jīng)濟效益?？尚行苑治龅哪康?，是根據(jù)開發(fā)管理信息系統(tǒng)的請求，通過初步調查，對要開發(fā)的管理信息系統(tǒng)從技術上、經(jīng)濟上、資源上和管理上進行是否可行的研究分析。這是一項保證資源合理使用、避免失誤和浪費的重要工作。</p&g

30、t;<p>　　1、經(jīng)濟上的可行性，適合快速桌面級開發(fā)，開發(fā)費用較低。 </p><p>　　2、技術上的可行性，開發(fā)速度快，是開發(fā)小型數(shù)據(jù)庫的前端工。 </p><p>　　3、資源上的可行性，源代碼較少占用內存少。</p><p>　　4、管理上的可行性，適合于小型系統(tǒng)，便于操作。 </p><p>　　5.2 系統(tǒng)

31、的詳細調查</p><p>　　系統(tǒng)的詳細調查目標是在可行性分析的基礎上進一步對原有系統(tǒng)進行全面、深入的調查和分析，弄清原有管理信息系統(tǒng)的運行狀況，發(fā)現(xiàn)其薄弱環(huán)節(jié)，找出要解決問題的實質，確保新系統(tǒng)比原系統(tǒng)更加有效、可靠。具體內容包括：管理業(yè)務狀況的調查分析、數(shù)據(jù)流程的調查分析。</p><p>　　詳細調查之后，繪制出人事管理子系統(tǒng)的業(yè)務流程圖如下</p><p>

32、<b>　　查詢結果</b></p><p><b>　　通過反饋修改</b></p><p><b>　　6 系統(tǒng)設計</b></p><p>　　管理信息系統(tǒng)設計階段的主要目的是將系統(tǒng)分析階段所提出的反映了用戶信息需求的系統(tǒng)邏輯方案轉換成可以實施的基于計算機與通信系統(tǒng)的物理（技術）方案。</

33、p><p>　　6.1 系統(tǒng)設計的依據(jù)</p><p><b>　　1、系統(tǒng)分析的成果</b></p><p><b>　　2、現(xiàn)行技術</b></p><p>　　3、現(xiàn)行信息管理和信息技術的標準、規(guī)范和有關法律制度</p><p><b>　　4、用戶需求</

34、b></p><p><b>　　5、系統(tǒng)運行環(huán)境</b></p><p>　　6.2 系統(tǒng)總體結構設計 </p><p>　　出版社人力資源管理總體流程圖如下：</p><p><b>　　人事管理部分如下：</b></p><p><b>　　身<

35、;/b></p><p>　　6.3 系統(tǒng)界面 </p><p>　　進入界面（身份驗證）</p><p><b>　　主界面</b></p><p><b>　　??</b></p><p><b>　　培訓管理界面：</b></p&g

36、t;<p><b>　　人員基本信息界面：</b></p><p><b>　　招聘管理：</b></p><p><b>　　人員信息管理</b></p><p><b>　　教育經(jīng)歷</b></p><p><b>　　獎懲登記

37、界面</b></p><p><b>　　崗位變動界面</b></p><p>　　其他界面類似不再重復。。。。。。。</p><p>　　第七章 開發(fā)總結與對管理信息系統(tǒng)的展望</p><p><b>　　7.1 開發(fā)總結</b></p><p>　　通過此

38、管理信息系統(tǒng)的開發(fā)，做到了理論聯(lián)系實際，將書本上學到的知識與具體實踐充分結合起來，進一步明確了開發(fā)管理信息系統(tǒng)的方法和思想；既加深了對管理信息系統(tǒng)的認識，又進一步鞏固了以前所學的計算機軟件開發(fā)方面的知識，提高了軟件開發(fā)的水平，從而為今后在實際工作中更好的應用計算機進行信息管理打下了堅實的基礎。</p><p>　　7.2 對管理信息系統(tǒng)的展望</p><p>　　管理信息系統(tǒng)從60年代開

39、始，已經(jīng)經(jīng)歷了電子數(shù)據(jù)處理階段（EDP），事務處理階段，管理信息系統(tǒng)階段（MIS），隨著計算機技術，數(shù)據(jù)處理技術及相關學科的迅猛發(fā)展，現(xiàn)在管理信息系統(tǒng)正朝著自動化，智能化發(fā)展</p><p>　　1、專家系統(tǒng)（ES）。</p><p>　　通過對專家的知識的認識，模擬專家的思維、技巧、和直覺，從而處理與解決問題的信息系統(tǒng)。</p><p>　　2、計算機集成制造系統(tǒng)

40、（CIMS）。</p><p>　　是利用計算機將互相獨立發(fā)展起來的計算機輔助設計系統(tǒng)（CAD）、計算機輔助制造系統(tǒng)（CAM）與管理信息系統(tǒng)（MIS）綜合為一個有機整體，從而達到設計、制造和管理過程自動化的系統(tǒng)。</p><p>　　3、戰(zhàn)略信息系統(tǒng)（SIS）。</p><p>　　是一種把信息技術作為實現(xiàn)企業(yè)戰(zhàn)略目標和競爭武器的信息系統(tǒng)。</p>&

41、lt;p>　　4、執(zhí)行信息系統(tǒng)（EIS）。</p><p>　　是專供高層決策者使用的系統(tǒng)。它綜合了信息報告系統(tǒng)（IRS）和決策支持系統(tǒng)（DSS）的許多特征的一種信息系統(tǒng)。</p><p><b>　　參考文獻</b></p><p>　　[1].吳照云 主編，《管理學原理》，經(jīng)濟管理出版社。</p><p>　　

42、[2].宋立智 主編，《visual Fox Pro中文版數(shù)據(jù)庫編程實戰(zhàn)訓練》人民郵電出版社</p><p>　　[3].張寬海 主編，《管理信息系統(tǒng)概論》，高等教育出版社</p><p><b>　　附件：</b></p><p><b>　　源代碼?</b></p><p><b>　

43、　用戶登陸：</b></p><p>　　確定進入系統(tǒng)：command2_click()</p><p><b>　　i=i+1</b></p><p>　　if thisform.text2.value="123456" </p><p>　　keyb'{CTRL+F4}'

44、;</p><p>　　modi wind screen titl'人力資源管理系統(tǒng)'</p><p>　　do form rsgl\renshi</p><p><b>　　else</b></p><p><b>　　if i<3</b></p><p&

45、gt;　　messagebox("密碼錯，請重新輸入！")</p><p>　　thisform.text2.value=""</p><p>　　thisform.text2.setfocus</p><p><b>　　else</b></p><p>　　messagebox

46、("密碼錯，禁止進入系統(tǒng)！")</p><p>　　thisform.release</p><p><b>　　endif</b></p><p><b>　　endif </b></p><p>　　do form rsgl\renshi</p><p&g

47、t;<b>　　退出系統(tǒng)：</b></p><p>　　command1_click()</p><p>　　YN=MESSAGEBOX("確定退出系統(tǒng)",4+32,"用戶登錄")</p><p><b>　　IF YN==6</b></p><p>　　CL

48、EAR EVENTS </p><p><b>　　QUIT</b></p><p><b>　　ENDIF</b></p><p>　　進入人事管理系統(tǒng)界面：</p><p>　　人員信息管理：page1:</p><p>　　職員基本信息：command1_click()

49、</p><p>　　do form rsgl\jibenxinxi</p><p>　　職員教育經(jīng)歷：command2_click()</p><p>　　do form rsgl\jiaoyujingli</p><p>　　職員個人簡歷：command3_click()</p><p>　　do form rsg

50、l\zhiyuangerenjianli</p><p>　　職員崗位變動：command4_click()</p><p>　　do form rsgl\zhiyuangangweibiandong</p><p>　　職員獎懲登記：command5_click()</p><p>　　do form rsgl\zhiyuanjiangch

51、engdengji</p><p>　　招聘信息管理：page2:</p><p>　　招聘人員基本信息：command1_click()</p><p>　　do form rsgl\zhaopinrenyuanjibenxinxi</p><p>　　應聘人員錄取情況：command2_click()</p><p&g

52、t;　　do form rsgl\yingpinrenyuanluquqingkuang</p><p>　　培訓信息管理：page3:</p><p>　　各部門培訓安排：command1_click()</p><p>　　do form rsgl\gebumenpeixunanpai</p><p>　　員工培訓情況信息：command

53、2_click()</p><p>　　do form rsgl\yuangongpeixunqingkuangxinxi</p><p><b>　　退出：</b></p><p>　　thisform.release</p><p>　　點擊按鈕分別彈出各表單：</p><p>　　增加新記錄

54、：command1_click()</p><p>　　thisform.commandgroup1.enabled=.F.</p><p>　　thisform.command2.enabled=.F.</p><p>　　thisform.command3.enabled=.F.</p><p>　　thisform.command4.e

55、nabled=.T.</p><p>　　if thisform.command1.caption='增加新記錄'</p><p>　　thisform.txt職員編號.enabled=.T.</p><p>　　thisform.txt姓名.enabled=.T.</p><p>　　thisform.txt性別.enabl

56、ed=.T.</p><p>　　thisform.txt出生日期.enabled=.T.</p><p>　　thisform.txt民族.enabled=.T.</p><p>　　thisform.txt文化程度.enabled=.T.</p><p>　　thisform.txt畢業(yè)學校.enabled=.T.</p>

57、<p>　　thisform.txt政治面貌.enabled=.T.</p><p>　　thisform.txt家庭地址.enabled=.T.</p><p>　　thisform.txt家庭電話.enabled=.T.</p><p>　　append blank</p><p>　　thisform.command1.cap

58、tion='增加確認'</p><p>　　thisform.refresh</p><p>　　thisform.txt職員編號.setfocus</p><p><b>　　else</b></p><p>　　get職員編號=alltrim(thisform.txt職員編號.value)</p

59、><p>　　get姓名=alltrim(thisform.txt姓名.value)</p><p>　　get性別=alltrim(thisform.txt性別.value)</p><p>　　get出生日期=alltrim(thisform.txt出生日期.value)</p><p>　　get民族=alltrim(thisform.tx

60、t民族.value)</p><p>　　get文化程度=alltrim(thisform.txt文化程度.value)</p><p>　　get畢業(yè)學校=alltrim(thisform.txt畢業(yè)學校.value)</p><p>　　get政治面貌=alltrim(thisform.txt政治面貌.value)</p><p>　　g

61、et家庭地址=alltrim(thisform.txt家庭地址.value)</p><p>　　get家庭電話=alltrim(thisform.txt家庭電話.value)</p><p>　　if empty(get職員編號) or empty(get姓名) or empty(get性別) or empty(get出生日期) or empty(get民族) or empty(get文

62、化程度) or empty(get畢業(yè)學校) or empty(get政治面貌) or empty(get家庭地址) or empty(get家庭電話)</p><p>　　messagebox("資料不足",48,"錯誤")</p><p><b>　　else</b></p><p>　　thisfo

63、rm.command1.caption='增加新記錄'</p><p>　　tableupdate(.t.)</p><p>　　thisform.txt職員編號.enabled=.F.</p><p>　　thisform.txt姓名.enabled=.F.</p><p>　　thisform.txt性別.enabled=

64、.F.</p><p>　　thisform.txt出生日期.enabled=.F.</p><p>　　thisform.txt民族.enabled=.F.</p><p>　　thisform.txt文化程度.enabled=.F.</p><p>　　thisform.txt畢業(yè)學校.enabled=.F.</p><

65、;p>　　thisform.txt政治面貌.enabled=.F.</p><p>　　thisform.txt家庭地址.enabled=.F.</p><p>　　thisform.txt家庭電話.enabled=.F.</p><p>　　thisform.commandgroup1.enabled=.T.</p><p>　　th

66、isform.command2.enabled=.T.</p><p>　　thisform.command3.enabled=.T.</p><p>　　thisform.command4.enabled=.F.</p><p><b>　　endif</b></p><p><b>　　endif</

67、b></p><p>　　修改記錄：command2_click()</p><p>　　thisform.command1.enabled=.F.</p><p>　　thisform.command3.enabled=.F.</p><p>　　thisform.command4.enabled=.T.</p><

68、;p>　　thisform.commandgroup1.enabled=.F.</p><p>　　if thisform.command2.caption='修改記錄'</p><p>　　thisform.txt職員編號.enabled=.T.</p><p>　　thisform.txt姓名.enabled=.T.</p>

69、<p>　　thisform.txt性別.enabled=.T.</p><p>　　thisform.txt出生日期.enabled=.T.</p><p>　　thisform.txt民族.enabled=.T.</p><p>　　thisform.txt文化程度.enabled=.T.</p><p>　　thisform.

70、txt畢業(yè)學校.enabled=.T.</p><p>　　thisform.txt政治面貌.enabled=.T.</p><p>　　thisform.txt家庭地址.enabled=.T.</p><p>　　thisform.txt家庭電話.enabled=.T.</p><p>　　thisform.command2.caption

71、='修改確認'</p><p>　　thisform.refresh</p><p>　　thisform.txt職員編號.setfocus</p><p><b>　　else</b></p><p>　　thisform.command2.caption='修改記錄'</p>

72、;<p>　　tableupdate(.t.)</p><p>　　thisform.txt職員編號.enabled=.F.</p><p>　　thisform.txt姓名.enabled=.F.</p><p>　　thisform.txt性別.enabled=.F.</p><p>　　thisform.txt出生日期.e

73、nabled=.F.</p><p>　　thisform.txt民族.enabled=.F.</p><p>　　thisform.txt文化程度.enabled=.F.</p><p>　　thisform.txt畢業(yè)學校.enabled=.F.</p><p>　　thisform.txt政治面貌.enabled=.F.</p&g

74、t;<p>　　thisform.txt家庭地址.enabled=.F.</p><p>　　thisform.txt家庭電話.enabled=.F.</p><p>　　thisform.command1.enabled=.T.</p><p>　　thisform.command3.enabled=.T.</p><p>　

75、　thisform.command4.enabled=.F.</p><p>　　thisform.commandgroup1.enabled=.T.</p><p><b>　　endif</b></p><p>　　刪除記錄：command3_click()</p><p>　　get職員編號=alltrim(thi

76、sform.txt職員編號.value)</p><p>　　thisform.txt職員編號.controlsource=''</p><p>　　thisform.txt姓名.controlsource=''</p><p>　　thisform.txt性別.controlsource=''</p>

77、<p>　　thisform.txt出生日期.controlsource=''</p><p>　　thisform.txt民族.controlsource=''</p><p>　　thisform.txt文化程度.controlsource=''</p><p>　　thisform.txt畢業(yè)學校.co

78、ntrolsource=''</p><p>　　thisform.txt政治面貌.controlsource=''</p><p>　　thisform.txt家庭地址.controlsource=''</p><p>　　thisform.txt家庭電話.controlsource=''</p

79、><p>　　use jbxx exclusive</p><p>　　set order to 職員編號</p><p>　　seek get職員編號</p><p><b>　　delete</b></p><p><b>　　pack</b></p><

80、p>　　thisform.txt職員編號.controlsource='jbxx.職員編號'</p><p>　　thisform.txt姓名.controlsource='jbxx.姓名'</p><p>　　thisform.txt性別.controlsource='jbxx.性別'</p><p>　　th

81、isform.txt出生日期.controlsource='jbxx.出生日期'</p><p>　　thisform.txt民族.controlsource='jbxx.民族'</p><p>　　thisform.txt文化程度.controlsource='jbxx.文化程度'</p><p>　　thisfor

82、m.txt畢業(yè)學校.controlsource='jbxx.畢業(yè)學校'</p><p>　　thisform.txt政治面貌.controlsource='jbxx.政治面貌'</p><p>　　thisform.txt家庭地址.controlsource='jbxx.家庭地址'</p><p>　　thisform

83、.txt家庭電話.controlsource='jbxx.家庭電話'</p><p>　　thisform.refresh</p><p>　　thisform.txt職員編號.enabled=.F.</p><p>　　thisform.txt姓名.enabled=.F.</p><p>　　thisform.txt性別.e

84、nabled=.F.</p><p>　　thisform.txt出生日期.enabled=.F.</p><p>　　thisform.txt民族.enabled=.F.</p><p>　　thisform.txt文化程度.enabled=.F.</p><p>　　thisform.txt畢業(yè)學校.enabled=.F.</p&g

85、t;<p>　　thisform.txt政治面貌.enabled=.F.</p><p>　　thisform.txt家庭地址.enabled=.F.</p><p>　　thisform.txt家庭電話.enabled=.F.</p><p>　　取消操作：command4_click()</p><p>　　if thisf

86、orm.command1.caption='增加確認'</p><p>　　thisform.command1.caption='增加新記錄'</p><p>　　thisform.command2.enabled=.T.</p><p>　　thisform.command3.enabled=.T.</p><p

87、>　　thisform.commandgroup1.enabled=.T.</p><p>　　tablerevert(.f.)</p><p><b>　　endif</b></p><p>　　if thisform.command2.caption='修改確認'</p><p>　　thisf

88、orm.command2.caption='修改記錄'</p><p>　　thisform.command1.enabled=.T.</p><p>　　thisform.command3.enabled=.T.</p><p>　　tablerevert(.f.)</p><p><b>　　endif</

89、b></p><p>　　thisform.txt職員編號.enabled=.F.</p><p>　　thisform.txt姓名.enabled=.F.</p><p>　　thisform.txt性別.enabled=.F.</p><p>　　thisform.txt出生日期.enabled=.F.</p><

90、;p>　　thisform.txt民族.enabled=.F.</p><p>　　thisform.txt文化程度.enabled=.F.</p><p>　　thisform.txt畢業(yè)學校.enabled=.F.</p><p>　　thisform.txt政治面貌.enabled=.F.</p><p>　　thisform.t

91、xt家庭地址.enabled=.F.</p><p>　　thisform.txt家庭電話.enabled=.F.</p><p>　　thisform.commandgroup1.enabled=.T.</p><p>　　thisform.command4.enabled=.F.</p><p>　　thisform.refresh<

92、;/p><p>　　退出：command5_click()</p><p>　　thisform.release</p><p>　　命令按鈕組commandgroup1：</p><p>　　上頁：command1_click()</p><p><b>　　skip -1</b></p>

93、;<p><b>　　if bof()</b></p><p>　　messagebox("已是第一個記錄",48,"信息窗口")</p><p>　　this.parent.command1.enabled=.f.</p><p>　　this.parent.command3.enable

94、d=.f.</p><p><b>　　skip</b></p><p><b>　　else</b></p><p>　　this.parent.command1.enabled=.t. </p><p>　　this.parent.command3.enabled=.t.</p>

95、<p><b>　　endif</b></p><p>　　this.parent.command2.enabled=.t.</p><p>　　this.parent.command4.enabled=.t.</p><p>　　thisform.refresh</p><p>　　下頁：command2_c

96、lick()</p><p><b>　　skip</b></p><p><b>　　if eof()</b></p><p>　　messagebox("已是最后一條記錄",48,"信息窗口")</p><p><b>　　skip -1<

97、/b></p><p>　　this.parent.command2.enabled=.f.</p><p>　　this.parent.command4.enabled=.f.</p><p><b>　　else</b></p><p>　　this.parent.command2.enabled=.t.<

98、;/p><p>　　this.parent.command4.enabled=.t.</p><p><b>　　endif</b></p><p>　　this.parent.command1.enabled=.t. </p><p>　　this.parent.command3.enabled=.t.</

99、p><p>　　thisform.refresh</p><p>　　第一頁：command3_click()</p><p><b>　　goto top</b></p><p>　　this.parent.command1.enabled=.f.</p><p>　　this.parent.com

100、mand2.enabled=.t.</p><p>　　this.parent.command4.enabled=.t.</p><p>　　thisform.refresh</p><p>　　最后一頁：command4_click()</p><p>　　goto bottom</p><p>　　this.par