【正文】 1 第 1章 系統(tǒng)功能概述 設(shè)計(jì)目的及意義 掌握數(shù)據(jù)庫(kù)的創(chuàng)建方法。在系統(tǒng)的實(shí)施概況中給出了系統(tǒng)的開(kāi)發(fā)環(huán)境、系統(tǒng)的運(yùn)行與維護(hù)、系統(tǒng)的安全性與可靠性設(shè)計(jì)。在系統(tǒng)的設(shè)計(jì)中，詳細(xì)的展現(xiàn)了系統(tǒng)的各個(gè)功能模塊、所需的數(shù)據(jù)庫(kù)表及表字段、系統(tǒng)菜單的設(shè)計(jì)等。首先對(duì)現(xiàn)行人事 檔案 管理系統(tǒng)進(jìn)行分析，并找出其存在的問(wèn)題，并提出解決方案 ， 主要講述了程序的總體設(shè)計(jì)、詳細(xì)設(shè)計(jì)階段 ， 對(duì)程序進(jìn)行不斷修正和改進(jìn) 。該程序通過(guò) VB 的 ADO 數(shù)據(jù)對(duì)象來(lái)實(shí)現(xiàn) VB 前臺(tái)與后臺(tái) SQL SERVER 數(shù)據(jù)庫(kù)的連接 ,并具有典型的數(shù)據(jù)庫(kù)應(yīng)用系統(tǒng)的特征 ,完成了系統(tǒng)結(jié)構(gòu)與現(xiàn)實(shí)生活的緊密結(jié)合。 沈陽(yáng)理工大學(xué)課程設(shè)計(jì)專用紙 No 沈陽(yáng)理工大學(xué) i 摘 要 由于計(jì)算機(jī)技術(shù)的飛速發(fā)展 ,數(shù)據(jù)庫(kù)技術(shù)作為數(shù)據(jù)管理的一個(gè)有效的手段 ,在各行各業(yè)中得到越來(lái)越廣泛的應(yīng)用。因此 ,本文圍繞一個(gè) “ 人事 檔案 管理系統(tǒng) ” 程序的設(shè)計(jì)和應(yīng)用系統(tǒng)的開(kāi)發(fā)課題為背景 ， 詳細(xì)介紹了以 VB 和 SQL SERVER 為語(yǔ)言編寫管理系統(tǒng)的過(guò)程。 該程序在設(shè)計(jì)過(guò)程中嚴(yán)格遵循軟件工程學(xué)的方法 ,用分階段的生命周期計(jì)劃嚴(yán)格管理 ，逐一介紹開(kāi)發(fā)本系統(tǒng)的步驟：系 統(tǒng)分析、系統(tǒng)設(shè)計(jì)、系統(tǒng)實(shí)現(xiàn)、系統(tǒng)實(shí)施。 在系統(tǒng)結(jié)構(gòu)設(shè)計(jì)中先后用數(shù)據(jù)流圖、系統(tǒng)的功能結(jié)構(gòu)圖分析了系統(tǒng)所需要的各種數(shù)據(jù)。在系統(tǒng)的實(shí)現(xiàn)中，給出了系統(tǒng)的界面登錄、實(shí)現(xiàn)表單中相應(yīng)的功能控件的事件代碼等。 同時(shí) 利用 SQL SERVER的強(qiáng)大數(shù)據(jù)庫(kù)功能 ,直到形成一個(gè)完善的可行性系統(tǒng) .優(yōu)美、秀麗的界面 ,方便實(shí)用的查詢與維護(hù)功能共同構(gòu)成了“人事 檔案 管理系統(tǒng) ” 。 掌握用一種語(yǔ)言（如 VB）開(kāi)發(fā)數(shù)據(jù)庫(kù)應(yīng)用程序的方法 。本系統(tǒng)根據(jù)企業(yè)管理的一些實(shí)際情況而編制的一套自動(dòng)化 、 界面設(shè)計(jì)良好 、 體現(xiàn)人本主義原 則 、 系統(tǒng)效率較高、靈活方便、快捷迅速，適用于大量數(shù)據(jù) 、 采用動(dòng)態(tài)鏈接 的人事 檔案管理系統(tǒng)。 功能模塊劃分 在主控窗體中（ MID 窗體）點(diǎn)擊各菜單實(shí)現(xiàn) 登錄 人事檔案 管理系統(tǒng) 。 存入檔案管理：用于輸入員工的檔案信息，包括檔案編號(hào)、職員編號(hào)、檔案類型 、檔案存放位置、檔案存放日期等。鏈接檔案修改模塊可修改存入檔案信息。該模塊不能修改已輸入的檔案信息 可刪除已存入檔案信息 。 檔案查詢：根據(jù)檔案編號(hào)、職員編號(hào)、檔案類型、檔案存放位置、檔案存放日期來(lái)查詢檔案信息。本系統(tǒng)主要有兩部分組成，一部分是數(shù)據(jù)庫(kù)設(shè)計(jì)部分，另一部分為窗體設(shè)計(jì)部分。 啟動(dòng)封面窗體 （ 主窗體 ） 的時(shí)候要求：圖片背景、歡迎類文字， 主控窗體設(shè)計(jì)為 MDI 窗體，含有主菜單： [文件 ]、 [幫助 ]。 [幫助 ]菜單包含以下子菜單及其功能： [關(guān)于 ]：顯示 版權(quán)對(duì)話框。 員工 登陸成功進(jìn)入 [查詢 ]窗體進(jìn)行條件查詢。 [檔案存入 ]窗體可以 瀏覽和錄入各 檔案 信息。 單擊 [返回 ]按鈕，可以關(guān)閉本窗體，返回 [檔案存入與轉(zhuǎn)出 ]窗體。在文本框中輸入要查詢的內(nèi)容，單擊 [查詢 ]按鈕，查詢結(jié)果用網(wǎng)格控件顯示 。 管理員帳號(hào)： （ 管理員帳號(hào) 、密碼） 。 檔案轉(zhuǎn)出 信息 ： （檔案編號(hào)、轉(zhuǎn)出日期、轉(zhuǎn)出目的地、轉(zhuǎn)出事由）其中， “ 檔案編號(hào) ”是外碼，參照 檔案存入 信息表主碼“ 檔案 編號(hào)”。 CREATE TABLE 管理員注冊(cè) (管理員帳號(hào) CHAR(40) PRIMARY KEY, 密碼 CHAR(40), )。 CREATE TABLE 轉(zhuǎn)出 (檔案編號(hào) CHAR(40), 轉(zhuǎn)出日期 DATETIME, 轉(zhuǎn)出目的地 CHAR(60), 轉(zhuǎn)出事由 CHAR(100), FOREIGN KEY(檔案編號(hào) )REFERENCES 存入 (檔案編號(hào) ) )。 第 3 章 系統(tǒng)各功能模塊的詳細(xì)設(shè)計(jì) 進(jìn)入系統(tǒng)頁(yè)面 窗體設(shè)計(jì)為 MDI 窗體，含有主菜單： [文件 ]、 [幫助 ]。 [幫助 ]菜單包含以下子菜單及其功能： [關(guān)于 ]：顯示 版權(quán)對(duì)話框。隱藏 Form1 End Sub 沈陽(yáng)理工大學(xué)課程設(shè)計(jì)專用紙 No 沈陽(yáng)理工大學(xué) 9 登錄頁(yè)面 員工登錄 員工 登陸界 面：“ 職員編號(hào) ”、“密碼”均由 Label 控件輸入，背景設(shè)為透明，之后介紹的界面中的字符均由此方法輸入，故將不做說(shuō)明。按鈕由 CommandButton 設(shè)置，選擇由 OptionButton 添加 Adodc （ Visible=False），用來(lái)與數(shù)據(jù)庫(kù)相連。’’ 39。’非法用戶時(shí)運(yùn)行 counter = counter + 1 If counter 3 Then 39。39。 jia ru msg$ = 用戶不存在或密碼錯(cuò)誤！是否注冊(cè)？注冊(cè) 單擊 是 + vbCrLf + 否則 單擊 否 Title$ = 操作進(jìn)程確認(rèn) x = MsgBox(msg$, vbYesNo + 32, Title$) If x = 6 Then = True ElseIf x = 7 Then MsgBox 請(qǐng)重新輸入！ MsgBox 您總共有三次操作機(jī)會(huì)！ = = 員工登錄 .Show End If End If If counter = 3 Then MsgBox 重試次數(shù)已到，即將退出本系統(tǒng) ! End Exit Sub End If End If 39。39。添加 沈陽(yáng)理工大學(xué)課程設(shè)計(jì)專用紙 No 沈陽(yáng)理工大學(xué) 11 End If If = True Then 39。 沈陽(yáng)理工大學(xué)課程設(shè)計(jì)專用紙 No 沈陽(yáng)理工大學(xué) 12 圖 合法用戶登錄 用戶不合法時(shí)，運(yùn)行結(jié)果見(jiàn)圖 示?！?39?！欠ㄓ脩魰r(shí)運(yùn)行 counter = counter + 1 If counter 3 Then 39。39。 jia ru msg$ = 用戶不存在或密碼錯(cuò)誤！是否注冊(cè)？注冊(cè) 單擊 是 + vbCrLf + 否則 單擊 否 Title$ = 操作進(jìn)程確認(rèn) x = MsgBox(msg$, vbYesNo + 32, Title$) If x = 6 Then = True ElseIf x = 7 Then MsgBox 請(qǐng)重新輸入！ MsgBox 您總共有三次操作機(jī)會(huì)！ = = 管理員登錄 .Show End If End If If counter = 3 Then MsgBox 重試次數(shù)已到，即將退出本系統(tǒng) ! End Exit Sub End If End If 39。39。添加 End If If = True Then 39。 檔案 存入與轉(zhuǎn)出頁(yè)面 圖 檔案存入與轉(zhuǎn)出 沈陽(yáng)理工大學(xué)課程設(shè)計(jì)專用紙 No 沈陽(yáng)理工大學(xué)