【正文】 企業(yè)檔案管理系統(tǒng) 摘要 企業(yè)員工的檔案管理是企業(yè)員工管理的一個重要內(nèi)容。當(dāng)今社會人員流動越來越頻繁，使得檔案管理工作也變得越來越復(fù)雜。如何管理好企業(yè)員工的信息，成為企業(yè)管理中一個大的問題。如果能實現(xiàn)檔案管理的自動化，無疑將給公司管理部門帶來很大的方便。 本檔案管理系統(tǒng)為企業(yè)單位和個人提供信息咨詢、檔案檢索、檔案存取、工資調(diào)整、依據(jù)檔案出具各類證明材料等服務(wù)，能夠滿足現(xiàn)代企業(yè)對員工檔案管理的需要。 本系統(tǒng)以 ，后臺數(shù)據(jù)庫選擇 ACCESS2020，操作系統(tǒng)為 WINDOWS2020。 關(guān)鍵詞： 檔案管理， ， ADO Abstract The file management of the business enterprise employee is an important content for business enterprise management. Today the increment of floating population makes the file management bee more and more plex, How to manage staff’s information is being a big problem for business enterprise management. If the automation of file management can be realized, it is helpful for the manage department of enterprise. The file management can provide the service of information consulting, file inquiring, file access, and provide the service of giving evidence for employee. It can meet the file management’s demands of modern enterprise management. This system is designed for windows 98, and the develop language is Visual basic , the database management system is Access2020. Key words: File management, Visual Basic, ADO 第一章 應(yīng)用背景 引言 企業(yè)員工的檔案管理是企業(yè)員工管理的一個重要內(nèi)容。隨著時代的進(jìn)步，企業(yè)也逐漸變得龐大起來；當(dāng)今社會人員流動越來越頻繁，使得檔案管理工作也變的越來越復(fù)雜。如何管理好企業(yè)員工的信息，成為企業(yè)管理中一個大的問題。如果能實現(xiàn)檔案管理的自動化，無疑將給公司管理部門帶來很大的方便。 由于檔案管理 的極端重要性，在不同的歷史時期產(chǎn)生了不同的、相對于那個時代最完備的檔案管理技術(shù)與管理制度。近代檔案學(xué)已經(jīng)是一門完善的、體系嚴(yán)密的科學(xué)。雖然檔案學(xué)面臨信息化的沖擊與挑戰(zhàn)，但是我們必須清醒地看到，新一代檔案學(xué)尚未產(chǎn)生，檔案管理信息化還存在大量未解決的難題。因此，處理好檔案管理信息化中的管理創(chuàng)新和原有檔案管理制度之間的矛盾是我們面臨的首要挑戰(zhàn) 。 原有檔案管理制度的核心一是為了快速查詢、應(yīng)用，二是為了確保檔案安全。同時，對歷史檔案管理現(xiàn)狀難于改變的特點，必然使檔案管理不可避免地走向管理方式的多元化。 檔案管理系統(tǒng)向深 層應(yīng)用發(fā)展時，會出現(xiàn)與其它應(yīng)用系統(tǒng)整合的情況，如文檔管理一體化。對于這類整合，重要的是處理好整合應(yīng)用項目與檔案管理特有的、獨立性要求的矛盾。例如，檔案管理中對文件標(biāo)題有權(quán)改動，這必然使公文、檔案一體化管理系統(tǒng)的設(shè)計復(fù)雜化。采取管理創(chuàng)新和合理技術(shù)是檔案管理與其它信息系統(tǒng)整合的可行的解決方案。 企業(yè)職工檔案管理是隨著人事制度改革應(yīng)運而生的一項新的工作。近年來，隨著人事制度的改革及企事業(yè)單位實行勞動合同制，用人單位擁有了用人自主權(quán)。但由于一些企業(yè)的改制，人事的更迭，以及人事檔案的多頭管理，造成了部分檔案的流失，也 造成了效率低，辦事難的情況。最初的檔案管理，都是靠人力來完成的。當(dāng)企業(yè)規(guī)模比較小的時候，人力可以完成，隨著企業(yè)的規(guī)模越來越大，企業(yè)員工的數(shù)目越來越多，依然維持著人力進(jìn)行檔案管理，必然會造成工作效率低，工作錯誤增高的問題。 企業(yè)檔案管理就是把分散在企事業(yè)單位的職工檔案實行統(tǒng)一、集中、規(guī)范的收集管理，建立分類編號管理、電腦存儲查詢等現(xiàn)代化、專業(yè)化的管理系統(tǒng)。檔案管理為企業(yè)單位和個人提供信息咨詢、檔案檢索、檔案存取、工資調(diào)整、依據(jù)檔案出具各類證明材料等服務(wù)；為企業(yè)單位和個人提供檔案的收集、整理、保管服務(wù)。 企業(yè)檔 案管理的對象是企業(yè)、企業(yè)化管理的人事單位及職工本人。 企業(yè)檔案管理的自動化是當(dāng)今社會的發(fā)展趨勢。檔案信息錄入項目齊全、完整、系統(tǒng)，這些無疑是現(xiàn)代企業(yè)檔案管理系統(tǒng)的要求?，F(xiàn)代化的企業(yè)檔案管理系統(tǒng)中靈活使用了表格對檔案分門別類，組成企業(yè)檔案管理系統(tǒng)，可以方便地查詢、閱讀、修改、交流和重復(fù)使用。 主要功能 開發(fā)企業(yè)檔案管理系統(tǒng)的總體任務(wù)是實現(xiàn)企業(yè)員工檔案管理的系統(tǒng)化和自動化。 檔案管理為企業(yè)單位和個人提供信息咨詢、檔案檢索、檔案存取、工資調(diào)整、依據(jù)檔案出具各類證明材料等服務(wù)；為企業(yè)單位和個人提供檔案的收集 、整理、保管服務(wù)。 本系統(tǒng)的主要功能如下： 職工檔案管理部分：有關(guān)企業(yè)員工各種信息的輸入，包括員工基本檔案、家庭成員、工作記錄、獎懲情況、職稱評定、培訓(xùn)記錄、調(diào)動記錄等。這一部分要完成的主要功能是員工信息的添加、修改、刪除、查詢。 部門管理部分：職工所在部門的信息輸入，包括部門名稱、部門負(fù)責(zé)人以及部門聯(lián)系電話等。這一部分完成的主要功能是部門信息的添加、修改、刪除、查詢等。 系統(tǒng)維護(hù)部門：操作員設(shè)置、操作員權(quán)限設(shè)置、修改密碼等。 第二章 ADO 技術(shù)介紹 ADO 的介紹 ADO 是 ActiveX Data Object 的縮寫，它是 Microsoft數(shù)據(jù)庫應(yīng)用程序開發(fā)的新接口，是Microsoft 新的數(shù)據(jù)訪問技術(shù)，是建立在 OLE DB之上的高層數(shù)據(jù)庫訪問技術(shù)。 ADO 被設(shè)計用來同新的數(shù)據(jù)庫訪問層 OLE DB Provider一起協(xié)同工作，以提供通用數(shù)據(jù)庫訪問（ Universal Data Access）。 OLE DB是一個低層的數(shù)據(jù)庫訪問接口，用它可以訪問各種數(shù)據(jù)庫，包括傳統(tǒng)的關(guān)系型數(shù)據(jù)庫，以及電子郵件系統(tǒng)及自定義的商業(yè)對象。 即使對 OLE DB、 COM不了解也能輕松使用 ADO，因為它非常簡單易用，甚至 比 DAO都要容易使用，并不失靈活性。 ADO 提供了一個熟悉的，高層的對 OLE DB的自動封裝接口。如同 RDO對象是 ODBC驅(qū)動程序一樣，不同的數(shù)據(jù)庫要求它們自己的 OLE DB 提供者（ OLE DB Provider）。雖然目前 OLE DB提供者比較少，但微軟正積極推廣該技術(shù)，并打算用 OLE DB 取代 ODBC。 ADO 向 Visual Basic 程序員提供了很多好處，包括易于使用、熟悉的界面、高速度以及較低的內(nèi)存占用（已實現(xiàn) 的 需要占用 342KB 內(nèi)存，大約是 的 60%）。同傳統(tǒng)的數(shù)據(jù)對象層次（ DAO 和 RDO）不同， ADO可以獨立創(chuàng)建。因此可以創(chuàng)建一個“ Connection”對象，但是可以有多個，獨立的“ Recordset”對象來使用它，另外 ADO 針對客戶 /服務(wù)器以及 Web 應(yīng)用程序作了優(yōu)化。 ADO 最基本的操作流程：初始化 COM 庫，引入 ADO 庫定義文件；用 Connection 對象連接數(shù)據(jù)庫；利用建立好的連接，通過 Connection、 Command對象執(zhí)行 SQL 命令，或利用Recordset 對象取得結(jié)果記錄集進(jìn)行查詢、處理；使用完畢后關(guān)閉連接 釋放對象。 ADO 的對象 —— Connection 這是 ADO最大的特點，也是 DAO對象所沒有的。每一次引用數(shù)據(jù)庫可以建立一個連接對象，然后在其之上建立多個 RecordSet，方便遠(yuǎn)程連接操作。 建立一個 Connection的方法很簡單，下面例子主要介紹了 Connection對象的創(chuàng)建、連接數(shù)據(jù)庫以及關(guān)閉連接的方法： Sub ConnectionExample1() Dim n As ADODB. Connection Set n=New ADODB. Connection ＇通過 ODBC DSN打開數(shù)據(jù)庫 ＂ Push＂ ,＂ sa＂ ,＂＂ ＇檢查是否成功建立連接對象 If =adStateOpen Then MsgBox＂ Wele to Pushs！＂ Else MsgBox＂ Pubs today.＂ End If ＇關(guān)閉連接對象． End Sub 表 21 Connection對象屬性列表 屬性 功能 ConnectionString 打開 Connection 的參數(shù)設(shè)置。主要有 以下幾項： Provider、 File Name、 Remote Provider、 Remote Server、 URL DefaultDatabase 定義 Connection對象的缺省數(shù)據(jù)庫 Provider 定義對象的數(shù)據(jù)庫 OLE DB的提供者，如 SQL Server之類 State 當(dāng)前狀態(tài)，只讀。主要返回值為 adStateOpen或 adStateExecuting 表 22 Connection對象方法列表 方法 功能 BeginTrans 開始一個新的處理事物 RollbackTrans 放棄當(dāng)前所有的處理事物并開啟一個新的事物 Cancel 終止當(dāng)前的數(shù)據(jù)庫操作 Close 關(guān)閉釋放 Connection對象 Execute 執(zhí)行 SQL語句，或者查詢 Open 打開 Connection對象 命令對象 —— Command Command對象也是 ADO的特色之一。一般用于大量數(shù)據(jù)的操作或者是對數(shù)據(jù)庫表單結(jié)構(gòu)的操作。 Command的重要屬性如表 23所示，重要方法如表 24所示。 表 23 Command對象的屬性列表 屬性 功能 ActiveCinnection 指定當(dāng)前命令對象屬于哪個 Command CommandStream 指定提供命令參數(shù)的流 CommandText 指定參數(shù) Dialect 指定參數(shù)的語法規(guī)范 State Command對象運行狀態(tài) 表 24 Command對象方法列表 方法 功能 Cancel 放棄操作 CreateParameter 創(chuàng)建參數(shù) Execute 執(zhí)行參數(shù) 數(shù)據(jù)集對象 —— Recordset Recordset 對象表示的是來自基本表或者命令執(zhí)行結(jié)果的記錄全集，任何時候，Recordset對象所指的當(dāng)前記錄均為集合內(nèi)的單個記錄。 可使用 Recordset對象操作來自提供者的數(shù)據(jù)，使用 ADO時，通過 Recordset對象可對幾乎所有數(shù)據(jù)進(jìn)行操作。所以 Recordset對象均使用記錄（行）和字段（列）進(jìn)行結(jié)構(gòu)。由于提供者所支持的功能不同，某些 Recordset方法或?qū)傩杂锌赡軣o效。 打開 Recordset時，當(dāng)前記錄位于第一個記錄（如果有），并且 BOF和 EOF 屬性被設(shè)置成 False。如果沒有記錄， BOF和 EOF屬性設(shè)置是 True。 假設(shè)提供者支持相關(guān)的功能，可以使用 MoveFirst、 MoveLast、 MoveNext和 MovePrevious方法以及 Move 方法，和 AbsolutePosition、 AbsolutePage和 Filter 屬性來重新確定當(dāng)前記錄的位置。僅向前 Recordset對象只支持 MoveNext方法。當(dāng)使用 Move方法訪問每個記錄（或枚舉 Recordset）時，可用 BOF和 EOF屬性查看移動是否超過 Recordset的開始或者結(jié)尾。 Recordset對象可支持兩類更新：立即更新和批更新。使用立即更新，一旦調(diào)用 Update方法，對數(shù)據(jù)的所有更改將被立即寫入基本數(shù)據(jù) 源。也可以使用 AddNew和 Update方法將值的數(shù)組作為參數(shù)傳遞，同時更新記錄的若干字段。 如果提供者支持批更新，可以使提供者將多個記錄的更改寸入緩存，然后使用UpdateBatch 方法在單個調(diào)用中將它們傳給數(shù)據(jù)庫。這種情況應(yīng)用于使用 AddNew、 Update和 Delete方法所做的更改。調(diào)用 UpdateBatch方法后，可以使用 Status屬性檢查任何數(shù)據(jù)沖突并加以解決。 字段對象 —— Field Field 對象代表使用普通數(shù)據(jù)類型的數(shù)據(jù)的列。 Recordset對象含有由 Field對象組成的 Field集合。每個 Field對象對應(yīng)與 Recordset中的一列，其重要屬性如表 25所示，重要方法如表 26所示。 表 25 Field對象屬性列表 屬性 功能 Name 返回字段名 DefinedSize 返回已聲明的字段大小 Value 查看或更改字段中的數(shù)據(jù) Actualsize 返回給定字段中數(shù)據(jù)的實際大小 NativeError 指示給定 Erro