專門人才信息管理系統(tǒng)+vf+完版畢業(yè)論文_第1頁
已閱讀1頁,還剩36頁未讀 繼續(xù)免費(fèi)閱讀

下載本文檔

版權(quán)說明:本文檔由用戶提供并上傳,收益歸屬內(nèi)容提供方,若內(nèi)容存在侵權(quán),請進(jìn)行舉報或認(rèn)領(lǐng)

文檔簡介

1、<p>  專門人才信息管理系統(tǒng)</p><p><b>  摘 要</b></p><p>  人事辦公管理系統(tǒng)是典型的住處辦公系統(tǒng),其開發(fā)主要包括后臺數(shù)據(jù)庫的建立和維護(hù)以及前端應(yīng)用程序的開發(fā)兩個方面。對于前者要求建立起數(shù)據(jù)一致性和完整性強(qiáng)、數(shù)據(jù)安全性好的數(shù)據(jù)庫。而對于后者則要求應(yīng)用程序功能完備,易使用等特點(diǎn)。</p><p> 

2、 經(jīng)過分析,我們使用MICROSOFT公司的VISUAL FoxPro開發(fā)工具利用其提供的各種面向?qū)ο蟮拈_發(fā)工具尤其是數(shù)據(jù)窗口這一能方便而乘法操縱數(shù)據(jù)庫的智能化對象,首先在短時間內(nèi)建立系統(tǒng)應(yīng)用原型,然后,對初始原型系統(tǒng)進(jìn)行需求迭代,不斷修正和改進(jìn),直到形成用戶滿意的可行系統(tǒng)。</p><p>  關(guān)鍵字:人才信息、控件、窗體、域</p><p><b>  ABSTRACT<

3、;/b></p><p>  The system of managing teacher file is a typical application of managing information system (kmow as MIS),which mainly includes building up data-base of consistency and integrality and secur

4、ity of data.the later should make the application powerful and easily used.</p><p>  By looking up lots of datum,we selected Visual FoxPro presented by Microsoft because of its objective tools in Win32. VB o

5、ffered a series of A ctive Xoperating a data-base.It can give you a short–cut to build up a prototype of system application.The prototype could be modified and developed till user s are satisfied with it.</p><

6、p>  Keywords:ActiveX,Form,Field</p><p><b>  前 言</b></p><p>  隨著社會的發(fā)展、科學(xué)技術(shù)的不斷進(jìn)步,計算機(jī)科學(xué)日漸成熟,其強(qiáng)大的功能已為人們深刻認(rèn)識,它已進(jìn)入人類社會的各個領(lǐng)域并發(fā)揮著越來越重要的作用。</p><p>  辦公管理系統(tǒng)是教育單位不可缺少的部分應(yīng)用軟件,它的

7、內(nèi)容對于學(xué)校的決策和管理來說都有至關(guān)重要,所以辦公系統(tǒng)應(yīng)該能夠使學(xué)校的運(yùn)籌天堂。但一直以來人們使用傳統(tǒng)人工的方式辦公,這種辦公系統(tǒng)存在著許多缺點(diǎn),如:效率低、保密性差,另外時間一長,將產(chǎn)生大量的文件和數(shù)據(jù),這對于查找、更新和維護(hù)都有帶來了不少的困難。</p><p>  辦公管理系統(tǒng)作為計算機(jī)應(yīng)用的一部分,使用計算機(jī)對辦公系統(tǒng)進(jìn)行管理,具有著傳統(tǒng)辦公系統(tǒng)所無法比擬的優(yōu)點(diǎn)。例如:檢索迅速、查找方便、可靠性高、存儲量

8、大、保密性好、壽命長、成本低等。這些優(yōu)點(diǎn)能夠極大地提高學(xué)辦公的效率,也是企業(yè)的科學(xué)化、正規(guī)化管理,與世界接軌的重要條件。</p><p>  因此,開發(fā)這樣一套管理軟件成為很有必要的事情,在下面的各章中我們將以開發(fā)一套整體的辦公系統(tǒng)為例,談?wù)勂溟_發(fā)過程和所涉及到的總是及解決方法。</p><p><b>  一、系統(tǒng)設(shè)計</b></p><p>

9、;<b>  開發(fā)設(shè)計思想</b></p><p>  本系統(tǒng)開發(fā)設(shè)計思想:</p><p>  “盡量采用人事現(xiàn)有軟硬件環(huán)境,及先進(jìn)的管理系統(tǒng)開發(fā)方案,從而達(dá)到充分利用人事現(xiàn)有資源,提高系統(tǒng)開發(fā)水平和應(yīng)用效果的目的。</p><p>  “系統(tǒng)應(yīng)符合人事檔案管理的規(guī)定,滿足對人事日常管理的需要,并且應(yīng)具有良好的用戶接口、安全性、通用性、實(shí)用性

10、。</p><p>  “系統(tǒng)采用模塊化程序設(shè)計方法,即便于系統(tǒng)功能的擴(kuò)展與修改,有便于未參與開發(fā)的技術(shù)維護(hù)人員的補(bǔ)充與維護(hù)。</p><p>  “系統(tǒng)應(yīng)具有數(shù)據(jù)庫維護(hù)功能,即使根據(jù)擁護(hù)需求進(jìn)行數(shù)據(jù)的添加、刪除、修改等操作。</p><p><b>  開發(fā)和運(yùn)行環(huán)境</b></p><p>  開發(fā)工具:Visual

11、 FoxPro 6.0;</p><p>  運(yùn)行環(huán)境:Windows 9X、Windows NT 或Windows 2000操作系統(tǒng)。</p><p><b>  1.1系統(tǒng)功能分析</b></p><p>  本系統(tǒng)主要實(shí)用于人事檔案信息管理,主要任務(wù)使用計算機(jī)對人才信息進(jìn)行日常管理,如查詢、修改、添加、刪除以及對查詢結(jié)果進(jìn)行打印等。針對這

12、些要求,得出該專門人才管理系統(tǒng)的功能如下:該系統(tǒng)主要有輸入、查詢、添加、刪除以及輸出打印五個模塊組成。</p><p><b>  輸入模塊</b></p><p>  該模塊包括建立用戶信息和人才信息輸入。</p><p><b>  查詢模塊</b></p><p>  該模塊包括用戶查詢和人才

13、姓名查詢。</p><p><b>  刪除模塊</b></p><p>  該模塊主要實(shí)現(xiàn)人才信息的刪除和用戶信息的刪除。</p><p><b>  輸出打印模塊</b></p><p>  該模塊主要實(shí)現(xiàn)查詢結(jié)果進(jìn)行輸出打印。</p><p>  在本系統(tǒng)的編制過程中,

14、結(jié)合以上實(shí)際要求,將本系統(tǒng)分為用戶管理、檔案登記、檔案管理、檔案檢索四部分。</p><p>  “用戶管理”主要是對系統(tǒng)用戶進(jìn)行添加、刪除等常規(guī)管理。</p><p>  “檔案登記”主要是用來輸入專門人才的自然情況、專業(yè)特長和成就成果等數(shù)據(jù)的輸入窗口。</p><p>  “檔案管理”主要是用來維護(hù)或顯示與專門人才檔案有關(guān)的全部數(shù)據(jù)的窗口。</p>

15、<p>  “檔案檢索”主要是為專門人才進(jìn)行檢索的一個輸入窗口。</p><p><b>  系統(tǒng)功能模塊設(shè)計</b></p><p>  本系統(tǒng)的功能分為如下幾大模塊:</p><p><b>  主接口模塊</b></p><p>  該模塊提供本系統(tǒng)的主接口,是本系統(tǒng)唯一的入口和出

16、口。給接口提供用戶選擇并調(diào)用各子模塊。在進(jìn)入本接口以前須核對用戶名和密碼。</p><p><b>  人才信息管理模塊</b></p><p>  該模塊提供對人事信息的添加、修改、刪除、按人才姓名和人事查詢以及對查詢結(jié)果的打印。進(jìn)行必要的錯誤檢驗(yàn)機(jī)制,并給出相應(yīng)的錯誤提示。</p><p><b>  人事部信息管理模塊</

17、b></p><p>  該模塊提供對人事部信息的添加、修改、刪除、人事部信息查詢以及對查詢結(jié)果的打印。進(jìn)行必要的錯誤檢驗(yàn)機(jī)制,并給出相應(yīng)的錯誤提示。</p><p><b>  用戶管理模塊</b></p><p>  該模塊提供對本系統(tǒng)用戶的添加、刪除和密碼修改等功能。主要包括添加用戶子模塊、刪除用戶子模塊和修改密碼子模塊組成。對該模

18、塊進(jìn)行了必要的安全驗(yàn)證。賦予用戶不同的權(quán)限,防止越權(quán)操作,以增強(qiáng)系統(tǒng)的安全性。</p><p>  采用模塊化設(shè)計思想,可以大大提高設(shè)計的效率,并且可以最大限度地減少不必要的錯誤。其系統(tǒng)結(jié)構(gòu)框圖1所示。</p><p><b>  1.2庫設(shè)計</b></p><p>  數(shù)據(jù)庫在一個信息管理系統(tǒng)中占有非常重要的地位,數(shù)據(jù)庫設(shè)計的好壞將直接對系

19、統(tǒng)的效率以及實(shí)現(xiàn)的效果產(chǎn)生影響。合理的數(shù)據(jù)庫結(jié)構(gòu)設(shè)計可以提高數(shù)據(jù)存儲的效率保證數(shù)據(jù)的完整和一致。</p><p>  同時,合理的數(shù)據(jù)庫結(jié)構(gòu)也將有利于程序的實(shí)現(xiàn)。</p><p>  1.3數(shù)據(jù)庫需要分析</p><p>  根據(jù)人事部的需求和約束條件調(diào)查分析</p><p>  數(shù)據(jù)庫概念結(jié)構(gòu)設(shè)計根據(jù)系統(tǒng)數(shù)據(jù)流程圖,用E—R圖來說明人才信息

20、管理系統(tǒng)的數(shù)據(jù)庫概念結(jié)構(gòu)模式。</p><p><b>  初始關(guān)系模式:</b></p><p>  數(shù)據(jù)庫邏輯結(jié)構(gòu)設(shè)計將以上數(shù)據(jù)庫概念結(jié)構(gòu)轉(zhuǎn)換為如下初始關(guān)系模式:</p><p>  rcda(編號、姓名、出生日期、性別、黨員否、工資現(xiàn)狀、工作簡歷、照片)</p><p>  cjda(編號、成果名稱、成果類別、成果

21、出處)</p><p>  zytc(編碼、專業(yè)、專業(yè)年限、職稱、英語水平)</p><p>  sysmz(SI(編碼)、S2(程序員名稱)、S3(密碼))</p><p>  其中,標(biāo)有下劃線的字段表示為該數(shù)據(jù)表的主關(guān)鍵詞。上面的實(shí)體以及實(shí)體之間關(guān)系的基礎(chǔ)上,經(jīng)過規(guī)范化處理形成數(shù)據(jù)庫中的表之間的關(guān)系。</p><p>  專門人才管理系統(tǒng)

22、數(shù)據(jù)庫中各個表的設(shè)計結(jié)果如下面的幾個表格所示。每個表格表示數(shù)據(jù)庫中的一個表。</p><p>  Sysmz數(shù)據(jù)表的結(jié)構(gòu)</p><p>  Cjda數(shù)據(jù)表的結(jié)構(gòu)</p><p>  Zytc數(shù)據(jù)表的結(jié)構(gòu) </p><p><b>  數(shù)據(jù)庫結(jié)構(gòu)的實(shí)現(xiàn)</b></p><p>  在需求分析

23、、概念結(jié)構(gòu)設(shè)計的繼承上得到數(shù)據(jù)庫的邏輯結(jié)構(gòu)之后,就可以在VinsualFoxPr 6.0數(shù)據(jù)庫系統(tǒng)中實(shí)現(xiàn)該邏輯結(jié)構(gòu)。</p><p><b>  創(chuàng)建項(xiàng)目</b></p><p>  在創(chuàng)建數(shù)據(jù)庫之前,先創(chuàng)建一個名為“人才檔案”的項(xiàng)目,保存在磁盤中。保存在磁盤中。保存目錄為C:\人才檔案。</p><p>  創(chuàng)建rcgl項(xiàng)目的數(shù)據(jù)庫</

24、p><p><b>  創(chuàng)建數(shù)據(jù)庫</b></p><p>  打開“人才檔案”項(xiàng)目后,在項(xiàng)目管理器中展開數(shù)據(jù)文件夾,選中數(shù)據(jù)庫,單擊右側(cè)的“新建”按鈕,將數(shù)據(jù)庫的名稱設(shè)為“rcgl”并將其存儲在C:\人才檔案 \rc\rcgl.dbc。</p><p>  2、為名稱為“rcgl”的數(shù)據(jù)庫添加數(shù)據(jù)表</p><p> ?。?/p>

25、1) 在數(shù)據(jù)庫設(shè)計器中單擊鼠標(biāo)右鍵,選擇“新建表”,并將新建表存儲為C:\人才檔案\rc\cjda.dbf。在彈出的表設(shè)計器中填寫表的內(nèi)容。</p><p> ?。?) 根據(jù)圖4所示表格給出的數(shù)據(jù),設(shè)置表中字段。</p><p> ?。?) 字段設(shè)置完成后,單擊“確定”按鈕后為表“cjda”輸入數(shù)據(jù)。</p><p> ?。?) 數(shù)據(jù)輸入完成后,就完成了對系統(tǒng)用戶記

26、錄表的設(shè)置。接下來繼續(xù)建交其它表。</p><p> ?。?) 依據(jù)同樣的步驟建立表“rcda”,將其保存在C:\人才檔案\rc\rcda.dbf。然后輸入數(shù)據(jù),完成對人事部記錄表的建立。</p><p>  (6)所示表格完成對人才記錄表的建立,將其保存在C:\人才檔案\rc\zytc.dbf三個表創(chuàng)建完畢后,數(shù)據(jù)庫的結(jié)構(gòu)設(shè)計就實(shí)現(xiàn)了。</p><p><b

27、>  二、應(yīng)用程序的設(shè)計</b></p><p>  采用模塊化設(shè)計思想,根據(jù)本系統(tǒng)的實(shí)際情況,經(jīng)過多次改進(jìn),得出本系統(tǒng)的完整結(jié)構(gòu)框圖。</p><p>  2.1附屬窗體的設(shè)計</p><p>  (一) 歡迎界面的設(shè)計</p><p>  歡迎接口是用戶進(jìn)入本系統(tǒng)所接觸的第一個程序接口。該部分的設(shè)計類似計算機(jī)的啟動。當(dāng)程

28、序開始載面運(yùn)行后按下任意鍵或者單擊鼠標(biāo)既可進(jìn)入身份驗(yàn)證窗體,如果沒有任何動作,設(shè)定時間后,自動進(jìn)入身份驗(yàn)證窗體。</p><p>  1.新建一表單,將其保存在C:\人才檔案\welcome.scx設(shè)置窗體的Picture屬性為:c:\人才檔案\1.jpg;</p><p>  caption 屬性為“人才檔案”</p><p>  Autocenter 屬性為“.

29、T.真”;</p><p>  Alwaysontop 屬性設(shè)為“.T.真”;</p><p>  Borderstyle屬性為“0-無邊框”;</p><p>  Controlbox屬性為“.F.-假”;</p><p>  Movable屬性為“.F.-假”; </p><p>  Showwindow 屬性為

30、“2-作為頂層窗體”;</p><p>  sizebox屬性為“.F.-假”;</p><p>  titlebar屬性為“.F.-假”;</p><p>  2.在該窗體上新建2個label控件:</p><p>  控件label1:屬性Caption為“歡迎使用”</p><p>  屬性Backstyle為“

31、o-透明”</p><p>  屬性FontName 為“隸書”</p><p>  屬性FontSize為“24”</p><p>  屬性Height為“49”</p><p>  屬性Left為“96”</p><p>  控件Lable2:ntk 屬性Caption為“專門人才管理系統(tǒng)”</p>

32、<p>  屬性Backstyle為“0-透明”</p><p>  屬性FontName為“隸書”</p><p>  屬性FontSize為“24”</p><p>  屬性Height為“61”</p><p>  屬性Left為“48”</p><p>  2.在該窗體上添加控件Timer.</

33、p><p>  設(shè)置控件Timer的 Inerval屬性為“5000”,其含義為每隔5000ms觸發(fā)一次Timer Event事件。</p><p>  2.代碼設(shè)計在窗體的KeyPress事件中添加代碼:</p><p>  do form student\forms\yz</p><p>  thisform.release</p>

34、;<p><b>  代碼說明:</b></p><p>  這一段代碼實(shí)現(xiàn)了當(dāng)按下任意鍵時程序自動進(jìn)入身份驗(yàn)證窗體的功能。</p><p>  在窗體的MouseDown事件中添加代碼:</p><p>  do form student\forms\yz</p><p>  thisform.relea

35、se</p><p><b>  代碼說明:</b></p><p>  這一段代碼實(shí)現(xiàn)了當(dāng)單擊鼠標(biāo)時程序自動進(jìn)入身份驗(yàn)證窗體的功能。</p><p>  在Timer的Timer Event事件中添加代碼:</p><p>  do form student\forms\yz</p><p> 

36、 thisform.release</p><p><b>  代碼說明:</b></p><p>  這一段代碼實(shí)現(xiàn)了在鼠標(biāo)和鍵盤無動作發(fā)生時,程序在規(guī)定時間后自動進(jìn)入身份驗(yàn)證窗體。</p><p>  這樣,這一部分的工作就完成了,進(jìn)行測試運(yùn)行,沒有錯誤。</p><p>  2.2身份驗(yàn)證窗體的設(shè)計</p&g

37、t;<p>  身份驗(yàn)證窗體的設(shè)計主要是為了系統(tǒng)的安全性考慮。用戶只有輸入正確的用戶名和口令,才能進(jìn)入系統(tǒng)。同時設(shè)置了錯誤檢測機(jī)制,能夠根據(jù)不同的情況,給出相應(yīng)的錯誤提示。</p><p><b>  具體實(shí)現(xiàn)步驟如下:</b></p><p>  新建一表單,將其保存為C:\人才檔案\yz.scx設(shè)Caption屬性為“身份驗(yàn)證”,</p>

38、<p>  為該窗體添加4個Label控件,其屬性設(shè)置分別為:</p><p>  Label1: 屬性Caption為“專門人才檔案”;</p><p>  屬性 Backstyle為“0-透明”;</p><p>  屬性 FontName為“宋體”;</p><p>  屬性 FontBold 為“ T-真”;</p

39、><p>  屬性FontSize為“24”;</p><p>  屬性 Height為“36”;</p><p>  屬性 Left為“71”;</p><p>  屬性 Top為“24”;</p><p>  屬性 Width為“233”;</p><p>  Label2:屬性Caption為

40、“檔案管理系統(tǒng)V1.0”;</p><p>  屬性Backstyle為“0-透明”;</p><p>  屬性 FontName為“宋體”;</p><p>  屬性FontSize為“16”;</p><p>  屬性 Left為“91”;</p><p>  屬性 Height為“24”;</p>

41、<p>  屬性 Top為“69”;</p><p>  屬性 Width為“192”;</p><p>  3. Label3: 屬性Caption為“請輸入用戶名”;</p><p>  屬性 Backstyle為“0-透明”;</p><p>  屬性 FontName為“宋體”;</p><p>  

42、屬性 FontSize為“14”;</p><p>  屬性 Height為“24”;</p><p>  屬性 Left為“25”;</p><p>  屬性 Top為“115”;</p><p>  屬性 Width為“116”;</p><p><b>  4.Label4:</b><

43、/p><p>  屬性Caption為“請輸入密碼”;</p><p>  屬性 Backstyle為“0-透明”;</p><p>  屬性 FontName為“宋體”;</p><p>  屬性 FontSize為“14”;</p><p>  屬性 Height為“24”;</p><p

44、>  屬性 Left為“44”;</p><p>  屬性 Top為“157”;</p><p>  屬性 Width為“97”;</p><p>  為該窗體添加2個Text控件。其中Text1用來輸入用戶名,Text2用來輸入用戶密碼,其屬性設(shè)置分別為:</p><p>  Text1: 屬性FontSize為“11”;&l

45、t;/p><p>  屬性Height為“25”;</p><p>  屬性Left為“153”;</p><p>  屬性Top為“114”;</p><p>  屬性Width為“145”;</p><p>  Text2: 屬性PasswordChar為“*”;</p><p>  屬性Fon

46、tSize為“11”;</p><p>  屬性Height為“25”;</p><p>  屬性Left為“153”;</p><p>  屬性Top為“157”;</p><p>  屬性 Width為“145”;</p><p>  4.為該窗體添加3個Command控件,其屬性設(shè)置分別為:</p>

47、<p>  Command1: 屬性Caption為“確定”;</p><p>  屬性FontSize為“12”;</p><p>  屬性Height為“25”;</p><p>  屬性Left為“44”;</p><p>  屬性Top為“204”;</p><p>  屬性Width為“60”;&

48、lt;/p><p>  Command2: 屬性Caption為“取消”;</p><p>  屬性FontSize為“12”;</p><p>  屬性Height為“25”;</p><p>  屬性Left為“144”;</p><p>  屬性Top為“204”;</p><p>  屬性

49、Width為“60”;</p><p>  Command3: 屬性Caption為“退出”;</p><p>  屬性FontSize為“12”;</p><p>  屬性Height為“25”;</p><p>  屬性Left為“276”;</p><p>  屬性Top為“204”;</p>&l

50、t;p>  屬性Width為“60”;</p><p><b>  代碼設(shè)計</b></p><p>  (1)在窗體的Init事件中添加代碼:</p><p>  public rank</p><p><b>  public cn</b></p><p><

51、b>  cn=0</b></p><p><b>  rank=0</b></p><p><b>  代碼說明:</b></p><p>  設(shè)置兩個全局變量cn和rank,其中rank用來存放用戶權(quán)限,以區(qū)別不同權(quán)限用戶的不同操作;cn用來存放輸入次數(shù),當(dāng)輸入超大型過三次時,自動退出窗體,以維護(hù)系統(tǒng)安

52、全。</p><p>  (2)在Command1 的Click事件中添加代碼:</p><p>  use data\userinfo</p><p>  inname=alltrim(thisform.text1.value)</p><p>  inpswd=alltrim(thisforn,text2.value)</

53、p><p>  set order to user-id</p><p>  seek inname</p><p>  if!found()</p><p><b>  cn=cn+1</b></p><p>  cMessageTiter=‘專門人才系統(tǒng)’</p><p>

54、  CMessageText=‘用戶名錯誤,請重新輸入’</p><p>  nDialogType=4+32</p><p>  nAnswer=messagebox(cMessageText,nDialogType,cMessageTitle)</p><p><b>  do case</b></p><p>  

55、case nAnswer=6</p><p>  thisform.text1.value=“</p><p>  thisform.text1.setfocus</p><p>  case nAnswer=7</p><p>  messagebox(“請勿非法進(jìn)入”,48“警告”)</p><p>  thisf

56、orm,release</p><p><b>  endcase</b></p><p><b>  if cn=3</b></p><p>  thisform.release</p><p><b>  endif</b></p><p><

57、b>  else</b></p><p>  if user-pwd!=inpswd</p><p><b>  cn=cn+1</b></p><p>  cMessageTitle=‘專門人才系統(tǒng)’</p><p>  cMessageText=‘密碼錯誤,請重新輸入’</p><

58、;p>  nDialogType=4+32</p><p>  nanswer=messagebox(cMessageText,nDialogType,cMessageTitle)</p><p><b>  do case</b></p><p>  case nAnswer=6</p><p>  thisfo

59、rm.text2.value=“</p><p>  thisform.text2.setfocus</p><p>  case nAnswer=7</p><p>  messagebox(“請勿非法進(jìn)入”,48“警告”)</p><p>  thisform,release</p><p><b>  

60、endcase</b></p><p><b>  if cn=3</b></p><p>  thisform.release</p><p><b>  endif</b></p><p><b>  else</b></p><p> 

61、 rank=userinfo.user-rank</p><p>  do form forms\main</p><p>  thisform.release</p><p><b>  endif </b></p><p><b>  endif</b></p><p>

62、<b>  代碼說明:</b></p><p>  當(dāng)用戶名和密碼完全與userinfo表中的記錄一致時,將表中該用戶名的權(quán)限賦值給全局變量rank,同時釋放本窗體并進(jìn)入下一窗體操作;當(dāng)用戶名或密碼與記錄不一致時,彈出系統(tǒng)住處對話框予以警告。當(dāng)輸入操作超過3次時,自動退出該窗體,以維護(hù)系統(tǒng)安全。</p><p>  在Command2的Click事件中添加代碼:<

63、;/p><p>  thisform.text1.value=”</p><p>  thisform.text,value=”</p><p>  thisrorm.text1.setfocus</p><p><b>  代碼說明:</b></p><p>  將兩個文本框的內(nèi)容清空,等待下次輸入

64、。</p><p>  在Command3 的 Click事件中添加代碼:</p><p>  thisform.release</p><p>  至此,身份驗(yàn)證窗體的設(shè)計已經(jīng)完成。進(jìn)行代碼測試,正常。</p><p>  系統(tǒng)主窗體的設(shè)計系統(tǒng)主窗體的主要功能是引導(dǎo)用戶進(jìn)入各功能模塊以及退出系統(tǒng)。具體的操作步驟如下:</p>

65、<p>  新建一表單,將其保存為C:\人才檔案\main,scx設(shè)置窗體的Picture</p><p>  屬性為:c:\人才檔案pic\未標(biāo)題1.jpg;</p><p>  caption屬性為“專門人才管理系統(tǒng)”</p><p>  Autocenter屬性為“T-真”</p><p>  Alwaysontop屬性設(shè)為“

66、T-真”</p><p>  Showwindow 屬性為“2-作為頂層窗體”;</p><p>  2.為該表單添加5個Command 控件,其屬性設(shè)置為:</p><p>  Command1:屬性Caption 為“檔案管理”;</p><p>  屬性FontSize為“12”</p><p>  屬性Le

67、ft為“48”</p><p>  屬性Height為“32”</p><p>  屬性Top為“101”</p><p>  屬性Width為“96”</p><p>  Command2:屬性Caption 為“檔案登記”;</p><p>  屬性FontSize為“12”</p><p>

68、;  屬性Left為“48”</p><p>  屬性Height為“32”</p><p>  屬性Top為“143”</p><p>  屬性Width為“96”</p><p>  Command3:屬性Caption 為“用戶管理”;</p><p>  屬性FontSize為“12”</p>&

69、lt;p>  屬性Left為“48”</p><p>  屬性Height為“32”</p><p>  屬性Top為“185”</p><p>  屬性Width為“96”</p><p>  Command4:屬性Caption 為“退出”;</p><p>  屬性FontSize為“12”</p&g

70、t;<p>  屬性Left為“48”</p><p>  屬性Height為“32”</p><p>  屬性Top為“101”</p><p>  屬性Width為“96”</p><p>  Command5:屬性Caption 為“關(guān)于”;</p><p>  屬性FontSize為“12”<

71、;/p><p>  屬性Left為“12”</p><p>  屬性Height為“25”</p><p>  屬性Top為“12”</p><p>  屬性Width為“36”</p><p><b>  代碼設(shè)計:</b></p><p>  在command1的click

72、 事件中添加代碼:</p><p>  do form forms\xig1</p><p>  thisform.release</p><p>  在command2的click 事件中添加代碼:</p><p>  do form forms\jxbgl</p><p>  thisform.release<

73、;/p><p>  在command3的click 事件中添加代碼:</p><p>  do form forms\yhgl</p><p>  thisform.release</p><p>  在command4的click 事件中添加代碼:</p><p>  thisform.release</p>

74、<p>  在command5的click 事件中添加代碼:</p><p>  do form forms\gy</p><p>  thisform.release</p><p>  至此,系統(tǒng)主窗體創(chuàng)建完畢。</p><p>  2.3系統(tǒng)版權(quán)窗口的設(shè)計</p><p>  本表單主要是說明系統(tǒng)的

75、版權(quán)信息,在單擊鼠標(biāo)或發(fā)生按鍵動作的關(guān)閉。</p><p>  新建一表單,將其保存為 C:\人才檔案\gy.scx,</p><p>  屬性caption為“專門人才管理系統(tǒng)”;</p><p>  Autocenter屬性為“T-真”;</p><p>  Alwaysontop屬性設(shè)為“T-真”;</p><p&g

76、t;  Controlbox屬性為“F-假”;</p><p>  Sizebox屬性為“F-假”;</p><p>  屬性Left為“72”;</p><p>  屬性Height為“170”;</p><p>  屬性Top為“14”;</p><p>  屬性Width為“375”;</p>&l

77、t;p>  為該表單添加4個Label控件,其屬性設(shè)置如下:</p><p>  Label1:屬性Caption為“三門峽職業(yè)技術(shù)學(xué)院”;</p><p>  屬性Backstyle為“0-透明”;</p><p>  屬性FontName為“華文彩云”;</p><p>  屬性Height為“33”;</p><

78、;p>  屬性Left為“60”;</p><p>  屬性Top為“33”;</p><p>  屬性Width為“254”;</p><p>  Label2:屬性Caption為“專門人才管理系統(tǒng)V1.0”;</p><p>  屬性Backstyle為“0-透明”;</p><p>  屬性FontNam

79、e為“楷體_GB2312”;</p><p>  屬性FontSize為“18”;</p><p>  屬性Left為“24”;</p><p>  屬性Height為“29”;</p><p>  屬性Top為“65”;</p><p>  屬性Width為“326”;</p><p>  L

80、abel3:屬性Caption為“版權(quán)所有”;</p><p>  屬性Backstyle為“0-透明”;</p><p>  屬性FontName為“隸書”;</p><p>  屬性FontSize為“15”;</p><p>  屬性Left為“68”;</p><p>  屬性Height為“25”;</

81、p><p>  屬性Top為“120”;</p><p>  屬性Width為“82”;</p><p>  Label4:屬性Caption為“歡迎使用”;</p><p>  屬性Backstyle為“0-透明”;</p><p>  屬性FontName為“隸書”;</p><p>  屬性F

82、ontSize為“15”;</p><p>  屬性Left為“224”;</p><p>  屬性Height為“25”;</p><p>  屬性Top為“120”;</p><p>  屬性Width為“82”;</p><p><b>  代碼設(shè)計:</b></p><

83、p>  在窗體的KeyPress事件中添加代碼:</p><p>  thisform.release</p><p>  在窗體的MouseDown事件中添加代碼:</p><p>  thisform.release</p><p>  這樣,系統(tǒng)版權(quán)窗口的設(shè)計就完成了。</p><p>  到這里,系統(tǒng)的一

84、些相關(guān)窗體已經(jīng)設(shè)計完畢。接下來,便要設(shè)計各個功能模塊。</p><p>  三、用戶管理模塊的設(shè)計</p><p>  該模塊提供對本系統(tǒng)用戶的添加、刪除和密碼修改等功能。主要包括修改密碼窗體、刪除用戶窗體和添加用戶窗體組成。具體設(shè)計步驟如下:</p><p>  3.1用戶管理主窗體的設(shè)計</p><p>  新建一表單,將其保存為C:\人

85、才檔案\yhg1.scx設(shè)置窗體的Picture屬性為c:\人才檔案pic\未標(biāo)題2.jpg;</p><p>  caption屬性為“專門人才管理系統(tǒng)用戶管理”</p><p>  Autocenter屬性為“T-真“;</p><p>  Alwaysontop屬性設(shè)為“T-真“;</p><p>  為該表單添加5個Command控件

86、,其屬性設(shè)置為</p><p>  Command1:屬性Caption為“修改密碼”;</p><p>  屬性FontSize為“12”;</p><p>  屬性Left為“48”;</p><p>  屬性Height為“32”;</p><p>  屬性Top為“101”;</p><p&

87、gt;  屬性Width為“96”;</p><p>  Command2:屬性Caption為“添加用戶”;</p><p>  屬性FontSize為“12”;</p><p>  屬性Left為“48”;</p><p>  屬性Height為“32”;</p><p>  屬性Top為“143”;</p&

88、gt;<p>  屬性Width為“96”;</p><p>  Command3:屬性Caption為“刪除用戶”;</p><p>  屬性FontSize為“12”;</p><p>  屬性Left為“48”;</p><p>  屬性Height為“32”;</p><p>  屬性Top為“1

89、85”;</p><p>  屬性Width為“96”;</p><p>  Command4:屬性Caption為“退出”;</p><p>  屬性FontSize為“12”;</p><p>  屬性Left為“324”;</p><p>  屬性Height為“32”;</p><p>

90、  屬性Top為“216”;</p><p>  屬性Width為“48”;</p><p>  Command5:屬性Caption為“關(guān)于”;</p><p>  屬性FontSize為“12”;</p><p>  屬性Left為“12”;</p><p>  屬性Height為“25”;</p>

91、<p>  屬性Top為“12”;</p><p>  屬性Width為“36”;</p><p><b>  代碼設(shè)計:</b></p><p>  在窗體的Init事件中添加代碼:</p><p><b>  if rank=2</b></p><p>  co

92、mmand2.enabled=“F-假”</p><p>  command3.enabled=“F-假”</p><p><b>  endif</b></p><p>  在command1的click事件中添加代碼:</p><p>  do form forms\xgmima</p><p&g

93、t;  thisform.release</p><p>  在command2的click事件中添加代碼:</p><p>  do form forms\tjuser</p><p>  thisform.release</p><p>  在command3的click事件中添加代碼:</p><p>  do

94、form forms\scuser</p><p>  thisform.release</p><p>  在command4的click事件中添加代碼:</p><p>  thisform.release</p><p> ?。?)在command1的click事件中添加代碼:</p><p>  do form

95、 forms\gy</p><p>  thisform.release</p><p>  至此,用戶管理主窗體創(chuàng)建完畢。</p><p>  3.2修改密碼窗體的設(shè)計</p><p>  密碼修改窗體的設(shè)計主要是為了系統(tǒng)的安全性考慮。在用戶輸入正確的用戶名和口令后,修改本用戶密碼。同時設(shè)置了錯誤檢測機(jī)制,能夠根據(jù)不同的情況,給出相應(yīng)的錯誤

96、提示。</p><p><b>  具體實(shí)現(xiàn)步驟如下:</b></p><p>  1.新建一表單,將其保存為C:\人才檔案\xgmima.scx設(shè)</p><p>  Caption屬性為“修改密碼”。屬性Caption為“修該密碼”;</p><p>  Autocenter 屬性為“T-真”;</p>

97、<p>  Alwaysontop屬性為“T-真”;</p><p>  屬性Left為“164”;</p><p>  屬性Height為“285”;</p><p>  屬性Top為“30”;</p><p>  屬性Width為“334”;</p><p>  2.為該窗體添加6個Labe1控件,其屬

98、性設(shè)置分別為:</p><p>  Label1:屬性Caption為“專門人才檔案”;</p><p>  屬性Backstyle為“0-透明”;</p><p>  屬性FontName為“宋體”;</p><p>  屬性Fontbold為“T-真”;</p><p>  屬性FontSize為“24”;<

99、/p><p>  屬性Height為“36”;</p><p>  屬性Left為“51”;</p><p>  屬性Top為“13”;</p><p>  屬性Width為“233”;</p><p>  Label2:屬性Caption為“檔案管理系統(tǒng)V1.0”;</p><p>  屬性Bac

100、kstyle為“0-透明”;</p><p>  屬性FontName為“宋體”;</p><p>  屬性FontSize為“16”;</p><p>  屬性Left為“71”;</p><p>  屬性Height為“24”;</p><p>  屬性Top為“58”;</p><p> 

101、 屬性Width為“192”;</p><p>  Label3:屬性Caption為“請輸入用戶名”;</p><p>  屬性Backstyle為“0-透明”;</p><p>  屬性FontName為“宋體”;</p><p>  屬性FontSize為“12”;</p><p>  屬性Left為“38”;&

102、lt;/p><p>  屬性Height為“20”;</p><p>  屬性Top為“100”;</p><p>  屬性Width為“98”;</p><p>  Label4:屬性Caption為“請輸入密碼”;</p><p>  屬性Backstyle為“0-透明”;</p><p>  

103、屬性FontName為“宋體”;</p><p>  屬性FontSize為“12”;</p><p>  屬性Left為“37”;</p><p>  屬性Height為“20”;</p><p>  屬性Top為“136”;</p><p>  屬性Width為“98”;</p><p> 

104、 Label5:屬性Caption為“請輸入新密碼”;</p><p>  屬性Backstyle為“0-透明”;</p><p>  屬性FontName為“宋體”;</p><p>  屬性FontSize為“12”;</p><p>  屬性Left為“37”;</p><p>  屬性Height為“20”;&

105、lt;/p><p>  屬性Top為“168”;</p><p>  屬性Width為“98”;</p><p>  Label6:屬性Caption為“請確認(rèn)新密碼”;</p><p>  屬性Backstyle為“0-透明”;</p><p>  屬性FontName為“宋體”;</p><p>

106、;  屬性FontSize為“12”;</p><p>  屬性Left為“42”;</p><p>  屬性Height為“20”;</p><p>  屬性Top為“201”;</p><p>  屬性Width為“82”;</p><p>  為該窗體添加4個Text控件。其中Text1用來輸入用戶名,Text2

107、用來輸入用戶的原密碼,Text3用來輸入用戶的新密碼Text4用來確認(rèn)用戶輸入的新密碼其屬性設(shè)置分別為:</p><p>  Text1:屬性FontSize為“11”;</p><p>  屬性Left為“153”;</p><p>  屬性Height為“25”;</p><p>  屬性Top為“92”;</p><

108、p>  屬性Width為“145”;</p><p>  Text2:屬性PasswordChar為“*”;</p><p>  屬性FontSize為“11”;</p><p>  屬性Left為“153”;</p><p>  屬性Height為“25”;</p><p>  屬性Top為“128”;<

109、/p><p>  屬性Width為“145”;</p><p>  Text3:屬性PasswordChar為“*”;</p><p>  屬性FontSize為“11”;</p><p>  屬性Left為“153”;</p><p>  屬性Height為“25”;</p><p>  屬性To

110、p為“163”;</p><p>  屬性Width為“145”;</p><p>  Text4:屬性PasswordChar為“*”;</p><p>  屬性FontSize為“11”;</p><p>  屬性Left為“153”;</p><p>  屬性Height為“25”;</p><

111、;p>  屬性Top為“198”;</p><p>  屬性Width為“145”;</p><p>  為該窗體添加3個Command控件,其屬性設(shè)置分別為:</p><p>  Command1:屬性Caption“確定”;</p><p>  屬性FontSize為“12”;</p><p>  屬性Lef

112、t為“49”;</p><p>  屬性Height為“25”;</p><p>  屬性Top為“250”;</p><p>  屬性Width為“60”;</p><p>  Command2:屬性Caption“取消”;</p><p>  屬性FontSize為“12”;</p><p>

113、;  屬性Left為“136”;</p><p>  屬性Height為“25”;</p><p>  屬性Top為“250”;</p><p>  屬性Width為“60”;</p><p>  Command3:屬性Caption“退出”;</p><p>  屬性FontSize為“12”;</p>

114、<p>  屬性Left為“229”;</p><p>  屬性Height為“25”;</p><p>  屬性Top為“250”;</p><p>  屬性Width為“60”;</p><p><b>  代碼設(shè)計</b></p><p>  在Command1的Click事件中

115、添加代碼:</p><p>  use student\data\userinfo</p><p>  cx=alltrim(thisform.text1.value)</p><p>  cy=alltrim(thisform.text2.value)</p><p>  pwd=alltrim(thisform.text3.value)&

116、lt;/p><p>  ppp=alltrim(thisform.text4.value)</p><p>  set order to user_id</p><p><b>  seek cx</b></p><p>  if len(cx)=0</p><p>  cMessageTitle=’

117、專門人才系統(tǒng)’</p><p>  cMessageText=’請輸入用戶名’</p><p>  nDialogType=4+32</p><p>  nAnswer=messagebox(cMessageText,nDialogType,cMessageTitle)</p><p><b>  do case</b>

118、</p><p>  case nAnswer=6</p><p>  thisform.text1.value=’’</p><p>  thisform.text1.setfocus</p><p>  case nAnswer=7</p><p>  cMessageTitle=’專門人才系統(tǒng)’</p>

119、;<p>  cMessageText=’不要亂來’</p><p>  messagebox(cMessageText,nDialogType,cMessageTitle)</p><p>  thisform.release</p><p><b>  endcase</b></p><p><b

120、>  else</b></p><p>  if len(cy)=0</p><p>  cMessageTitle=’專門人才系統(tǒng)’</p><p>  cMessageText=’請輸入密碼’</p><p>  nDialogType=4+32</p><p>  nanswer=message

121、box(cMessageText,nDialogType,cMessageTitle)</p><p><b>  do case</b></p><p>  case nAnswer=6</p><p>  thisform.text2.value=’’</p><p>  thisform.text2.setfocu

122、s</p><p>  case nAnswer=7</p><p>  cMessageTitle=’專門人才系統(tǒng)’</p><p>  cMessageText=’不要亂來’</p><p>  messagebox(cMessageText,nDialogType,cMessageTitle)</p><p> 

123、 thisform.release</p><p><b>  endcase</b></p><p><b>  else</b></p><p>  if len(pwd)=0</p><p>  cMessageTitle=’專門人才系統(tǒng)’</p><p>  cMes

124、sageText=’請輸入新密碼’</p><p>  nDialogType=4+32</p><p>  nanswer=messagebox(cMessageText,nDialogType,cMessageTitle)</p><p><b>  do case</b></p><p>  case nAnswe

125、r=6</p><p>  thisform.text3.value=’’</p><p>  thisform.text3.setfocus</p><p>  case nAnswer=7</p><p>  cMessageTitle=’專門人才系統(tǒng)’</p><p>  cMessageText=’不要亂來’&

126、lt;/p><p>  messagebox(cMessageText,nDialogType,cMessageTitle)</p><p>  thisform.release</p><p><b>  endcase</b></p><p><b>  else</b></p>&l

127、t;p>  if len(ppp)=0</p><p>  cMessageTitle=’專門人才系統(tǒng)’</p><p>  cMessageText=’請輸入密碼’</p><p>  nDialogType=4+32</p><p>  nanswer=messagebox(cMessageText,nDialogType,cMes

128、sageTitle)</p><p><b>  do case</b></p><p>  case nAnswer=6</p><p>  thisform.text4.value=’’</p><p>  thisform.text4.setfocus</p><p>  case nAns

129、wer=7</p><p>  cMessageTitle=’專門人才系統(tǒng)’</p><p>  cMessageText=’不要亂來’</p><p>  messagebox(cMessageText,nDialogType,cMessageTitle)</p><p>  thisform.release</p><

130、p><b>  endcase</b></p><p><b>  else</b></p><p>  if alltrim(userinfo.user_id)!=cx</p><p>  cMessageTitle=’專門人才系統(tǒng)’</p><p>  cMessageText=’用戶名錯

溫馨提示

  • 1. 本站所有資源如無特殊說明,都需要本地電腦安裝OFFICE2007和PDF閱讀器。圖紙軟件為CAD,CAXA,PROE,UG,SolidWorks等.壓縮文件請下載最新的WinRAR軟件解壓。
  • 2. 本站的文檔不包含任何第三方提供的附件圖紙等,如果需要附件,請聯(lián)系上傳者。文件的所有權(quán)益歸上傳用戶所有。
  • 3. 本站RAR壓縮包中若帶圖紙,網(wǎng)頁內(nèi)容里面會有圖紙預(yù)覽,若沒有圖紙預(yù)覽就沒有圖紙。
  • 4. 未經(jīng)權(quán)益所有人同意不得將文件中的內(nèi)容挪作商業(yè)或盈利用途。
  • 5. 眾賞文庫僅提供信息存儲空間,僅對用戶上傳內(nèi)容的表現(xiàn)方式做保護(hù)處理,對用戶上傳分享的文檔內(nèi)容本身不做任何修改或編輯,并不能對任何下載內(nèi)容負(fù)責(zé)。
  • 6. 下載文件中如有侵權(quán)或不適當(dāng)內(nèi)容,請與我們聯(lián)系,我們立即糾正。
  • 7. 本站不保證下載資源的準(zhǔn)確性、安全性和完整性, 同時也不承擔(dān)用戶因使用這些下載資源對自己和他人造成任何形式的傷害或損失。

評論

0/150

提交評論