【正文】 NAME Like 39。按所選類別查詢 sql = sql + and WDBT Like 39。% amp。% amp。 time1 amp。 time2 amp。 Private Sub Cmd_cx_Click() 39。 本模塊能 方便用戶快速定位 找到自己所需的文檔。保存按鈕可用 End Sub End If 39。設(shè)置文件類型 = 文件 (*.*)|*.*| 文檔文件 (*.doc)|*.doc|Excel 文件(*.excel)|*.excel|Powerpoint 文件 (*.ppt)|*.ppt|RTF 格式文件 (*.rtf)|*.rtf| 純文本格式(*.txt)|*.txt|caj 格式 (*.caj)|*.caj|pdf 格式 (*.pdf)|*.pdf 39。加大了文獻(xiàn)存儲(chǔ)的信息量，湖南科技大學(xué)本科生畢業(yè)設(shè)計(jì)（論文） 21 方便用 戶 找到自己所需的各方面的文檔； 圖 文獻(xiàn)信息添加界面設(shè)計(jì)圖 文件信息添加模塊。關(guān)閉數(shù)據(jù)表 End Sub 4）文獻(xiàn)信息添加模塊 文獻(xiàn) 添加界面如 圖 所示。如果記錄集大于零則執(zhí)行 = (MC) 39。 amp。調(diào)用過程 MsgBox 信息保存成功 , 64, 提示信息 = = 39。 39。 39。打開 tb_wdlb 表 If 0 Then 39。 amp。調(diào)用過程 End If End If End Sub c）保存模塊。 (1) amp。, Cnn, adOpenKeyset If 0 Then 39。刪除按鈕 打開數(shù)據(jù)表 select*fromtb_DocumentwhereSSLB=39。 Private Sub Cmd_Add_Click() 39。點(diǎn)擊添加按鈕，輸入類別名及備注，點(diǎn)擊保存按鈕，把信息存入數(shù)據(jù)庫。文檔信息添加 Case 5 Call DocDel 39。退出系統(tǒng) Dim c, path c = MsgBox(您確認(rèn)要退出個(gè)人文檔管理系統(tǒng)嗎 ?, 33, 提示信息 ) If c = vbOK Then End End If End Sub g）工具欄模塊。 \, vbNormalFocus) End End Sub f）調(diào)用數(shù)據(jù)刷新模塊 Private Sub SJSX_Click() 39。 開 始結(jié) 束選 擇 文 件是 否 刪 除 文 件文 件 已 刪除添 加 日 志 信 息打 開數(shù) 據(jù)是否 圖 刪除文獻(xiàn)流程圖 c）調(diào)用文獻(xiàn)查詢模塊 Private Sub CXWD_Click() 39。由菜單欄和工具欄組成，其中菜單欄包括基礎(chǔ)信息設(shè)置，文獻(xiàn)管理，系統(tǒng)設(shè)置，和退出 系統(tǒng)。將用戶選擇的名稱賦給 Name1 變量 (2).Text = 當(dāng)前操作員： + (xm) 39。 amp。程序接收用戶輸入的數(shù)據(jù)；連接數(shù)據(jù)源，如果數(shù)據(jù)庫的記錄集大于零；則繼續(xù)對(duì)所輸入的用戶名及密碼進(jìn)行校驗(yàn)，判斷輸入的數(shù)據(jù)是否正確；如正確，則登錄成功，同時(shí)操作員姓名顯示在主窗體的狀態(tài)欄中；否則根據(jù)校驗(yàn)結(jié)果提示沒有此用戶信息或用戶密碼輸入不正確，請(qǐng)重新輸入；最后關(guān)閉數(shù)據(jù)庫連接。登錄界面設(shè)置了用戶要進(jìn)入系統(tǒng) 時(shí) ， 進(jìn)行身份驗(yàn)證， 14 即需要輸入正確合法的操作員 名 字 和密碼。根據(jù) 操作員對(duì) 數(shù)據(jù) 進(jìn)行的 操作類型的不同， 調(diào)用的操作過程也 不同。因此 當(dāng)進(jìn)行 刪除操作 時(shí) ， 操作員一定要謹(jǐn)慎處理，確定是要?jiǎng)h除數(shù)據(jù)才可以進(jìn)行此操作，以確保數(shù)據(jù)的完整和正確性 。而且對(duì)于基礎(chǔ)數(shù)據(jù) 其中如果有其它相聯(lián)系的數(shù)據(jù) ， 則先要 將 與其相關(guān)的數(shù)據(jù)一一列出 ，并且提示只有將所有 的 數(shù)據(jù)都 刪除時(shí) 才可以對(duì)此數(shù)據(jù) 進(jìn)行刪除操作。 當(dāng)需要 錄入 新添加 數(shù)據(jù)時(shí)，調(diào)用業(yè)務(wù)層 中與其相關(guān)的 數(shù)據(jù)模塊，并向其 傳遞相關(guān) 的數(shù)據(jù) 參數(shù)。如沒有符合條件的文件，則顯示無。當(dāng) 調(diào)用相應(yīng)的查詢時(shí)，出現(xiàn)查詢界面。同時(shí)根據(jù)管理員 為用戶設(shè)置的操作 權(quán)限，操作員 可以使用與其 相應(yīng)的 功能 權(quán)限。用戶可 任一選擇菜單欄和工具欄的所有 功能， 并 點(diǎn)擊相應(yīng)的按鈕，可直接 進(jìn)入 到與之相應(yīng)的 功能界面。當(dāng)用戶需要查詢，打印，或者備份恢復(fù)文件時(shí)，從數(shù)據(jù)庫中的存儲(chǔ)文件獲得。 表 文獻(xiàn)信息添加表 名稱 字段名稱 類型 長度 類別名 lname char 10 文檔名 wname varchar 50 文檔類型 type string 20 作者名 name char 10 入庫時(shí)間 rukudate datetime 8 備注 remark txt 100 5） 文獻(xiàn)信息查詢表 如 表 所示 ， 文獻(xiàn)信息查詢表包含類別名，文檔名，文檔類型，作者名及入庫時(shí)間。類別名為長度為 10 個(gè)字節(jié)以內(nèi)的字符串。入庫時(shí)間用來表示文檔入庫的時(shí)間，用戶可跟據(jù)文檔入庫時(shí)間來進(jìn)行查詢。 湖南科技大學(xué)本科生畢業(yè)設(shè)計(jì)（論文） 10 表 用戶基本信息表 名稱 字段名稱 類型 長度 用戶 ID id int 4 用戶名 name char 10 用戶密碼 password varchar 20 用戶 角色 type char 10 2） 文獻(xiàn)基本信息表 如 表 所示 ， 文獻(xiàn)基本信息表包括文獻(xiàn) ID，類別名，文檔名，文檔類型，作者名，入庫時(shí)間，及對(duì)文獻(xiàn)的相關(guān)備注。用戶基本信息表包括用戶 ID，用戶名，用戶密碼，用戶角色，以及用戶注冊(cè)的時(shí)間。 文 檔 名文 獻(xiàn) 查 詢?nèi)?庫 時(shí) 間類 別 名文 檔 類 型作 者 名 圖 文獻(xiàn)類別信息實(shí)體屬性圖 系統(tǒng) ER 圖 如 錯(cuò)誤 !未找到引用源。 個(gè) 人 文 獻(xiàn) 管 理 系 統(tǒng)基 礎(chǔ) 信 息 設(shè) 置 文 獻(xiàn) 管 理系 統(tǒng) 設(shè) 置退 出 系 統(tǒng)刪除文獻(xiàn)密碼修改添加文獻(xiàn)文獻(xiàn)類別管理日志管理用戶管理權(quán)限設(shè)置數(shù)據(jù)刷新打印查詢文獻(xiàn) 圖 系統(tǒng)功能模塊層次圖 系統(tǒng)的實(shí)體屬性圖 1) 用戶基本信息實(shí)體圖 如 錯(cuò)誤 !未找到引用源。 7） 文獻(xiàn)導(dǎo)出：可以在本系統(tǒng)主功能界面上顯示要查看的文檔，同時(shí)可以將不同格式的文檔轉(zhuǎn)化為標(biāo)準(zhǔn)文檔。 3） 權(quán)限設(shè)置：對(duì)用戶權(quán)限的分配與管理，保證數(shù)據(jù)的安全性。同時(shí)為了保護(hù)文檔的統(tǒng)計(jì)信息以防外流，所以本設(shè)計(jì)設(shè)計(jì)不支持模糊查找。 3） 添加、修改、刪除文檔：對(duì)于每個(gè)文檔都可以指定其存儲(chǔ)地，對(duì)于文檔的存儲(chǔ)文件可以修改其文件類型。 根據(jù)對(duì)電子文獻(xiàn)文檔管理的一般操作， 個(gè)人文獻(xiàn)管理系統(tǒng)主要實(shí)現(xiàn)的功能應(yīng)該有： 1） 操作員管理功能：向系統(tǒng)中添加操作員。 目前，許多 用戶擁有支持本系統(tǒng)的應(yīng)用平臺(tái)。database=student。 VB 訪問數(shù)據(jù)庫的步驟 1）定義數(shù)據(jù)庫組件 Dim conn As New 其中 conn 為連接對(duì)象 Dim reco As New 其中 reco 為結(jié)果集對(duì)象 2）打開 連接 數(shù)據(jù)庫 driver={sql server}。 湖南科技大學(xué)本科生畢業(yè)設(shè)計(jì)（論文） 5 4） Fields：返回單一數(shù)據(jù)字段 5） Parametes：表示 Command 對(duì)象的參數(shù)。 adLockOptimistic 3 開放式記錄鎖定（逐條）。 表 Recordset 對(duì)象的 LockType 屬性的設(shè)置表 常量 值 說明 adLockReadOnly 1 默認(rèn)值，只讀。 它提供了以下七種對(duì)象： 1） Connection： 連接 數(shù)據(jù)庫。數(shù)據(jù)庫 不僅 是 能 存儲(chǔ)數(shù)據(jù) ，而且能 對(duì)數(shù)據(jù)進(jìn)行 相關(guān)的 操作 及顯示其相應(yīng)的操作結(jié)果 。 而 創(chuàng)建 的 自定義報(bào)表 則可根據(jù)設(shè)計(jì)需求來用于 打印或輸出數(shù)據(jù)庫中的 相關(guān) 信息。 關(guān)系型數(shù)據(jù)庫的實(shí)現(xiàn) Access 是 一種關(guān)系數(shù)據(jù)庫 的 工具， 同時(shí)也是 開發(fā) 人員所選 的 較 通用的數(shù)據(jù)庫之一。其 主要有三種方式，即 Access 數(shù)庫引擎、 Microsoft ODBC 驅(qū)動(dòng)程序 以及 第三方 ODBC 驅(qū)動(dòng)程序。 把 Visual Basic 作為數(shù)據(jù)庫前端 的設(shè)計(jì)平臺(tái) ， 可以把 所選擇的數(shù)據(jù)項(xiàng)按用戶的要求顯示出來。 3）可擴(kuò)充性 Visual Basic 是一種可以擴(kuò)充的語言， 在其 數(shù)據(jù)庫應(yīng)用方面 尤甚 。 利用 這些 控件， 編程人員 只要編寫少量的代碼甚至不 用 編寫任何代碼就可以 直接 訪問數(shù)據(jù)庫， 從而 對(duì)數(shù)據(jù)庫進(jìn)行瀏覽。 第六 章對(duì)本系統(tǒng)的總結(jié)以及日后的發(fā)展前景進(jìn)行描述及展望。 第二章主要描述 本設(shè)計(jì)所用的編程環(huán)境的選擇，有關(guān) VB 語言的簡單介紹和所使用的數(shù)據(jù)庫的簡要概述，以及還有開發(fā)工具的相關(guān)主要基礎(chǔ)技術(shù)的一些介紹。 此外， 使用 ODBC（開放式數(shù)據(jù)庫連接）進(jìn)行對(duì)數(shù)據(jù)源的連接， SQL 結(jié)構(gòu)化查詢語言用于實(shí)現(xiàn)查詢功能。 個(gè)人文獻(xiàn)管理系統(tǒng)的介紹 個(gè)人文獻(xiàn)管理系統(tǒng)主要實(shí)現(xiàn)如下幾部分功能：可以對(duì)不同類型的文獻(xiàn)進(jìn)行錄入和刪除；不同格式的文獻(xiàn)可以導(dǎo)出標(biāo)準(zhǔn)的文獻(xiàn) 參考信息 文檔；根據(jù)不同要 求（如時(shí)間，作者，類別，文獻(xiàn)名稱）對(duì)于錄入的參考文獻(xiàn)進(jìn)行查詢 ，或者 對(duì)于錄入的文獻(xiàn)建立文件夾及 對(duì)相應(yīng)的備注信息進(jìn)行管理；能夠?qū)ξ墨I(xiàn)數(shù)據(jù)進(jìn)行及時(shí)刷新，數(shù)據(jù)備份和對(duì)日志進(jìn)行清除和管理以及對(duì)文檔進(jìn)行查詢打印。如此眾多的資料為研究工作者提供了巨大的方便，能夠保證當(dāng)前的研究 工作站在最前沿的科技基礎(chǔ)上，同時(shí)避免大量重復(fù)低效能的工作。 關(guān)鍵字 ：控件；窗體；數(shù)據(jù)庫 ABSTRACT A personal file managing system is a typical application of managing information system (known as MIS). Which mainly includes building up database of backend and developing the application interface of frontend. The former constructs database with consistency and integrality and security. The later should make the application powerful and easy when used. By looking up lots of datum, the system selected VISUAL BASIC and ACCESS2020 presented by MICROSOFT because of its objective tools in Win32. VB offered a series of ActiveX operating a database. It can give you a shortcut to build up a prototype of system application. This designing of main function is to look for documents, add and remove documents, and to export and printing of documents in various formats. It also can set userrights to the user and recovery and backup data. Users are convenient to quickly find and print a document which meets users daily required. Keywords: ActiveX。 本文設(shè)計(jì)了一個(gè) “個(gè)人文獻(xiàn)管理系統(tǒng) ”， 并使用 MICROSOFT 公司的 VISUAL BASIC 和 ACCESS 2020 作為它的 開發(fā)工具 。 湖 南 科 技 大 學(xué) 畢 業(yè) 設(shè) 計(jì)（ 論 文 ） 題目 個(gè)人文獻(xiàn)管理系統(tǒng) 作者 劉軍花 學(xué)院 計(jì)算機(jī)科學(xué)與工程學(xué)院 專業(yè) 計(jì)算機(jī)科學(xué)與技術(shù) 學(xué)號(hào) 0905010128 指導(dǎo)教師 胡勇華 二〇一三 年六 月四 日 湖 南 科 技 大 學(xué) 畢業(yè)設(shè)計(jì)（論文）任務(wù)書 計(jì)算機(jī)科學(xué)與工程 學(xué) 院 計(jì)算機(jī)科學(xué)與技術(shù) 系（教研室） 系（教研室）主任 : （簽名） 年 月 日 學(xué)生姓名 : 劉軍花 學(xué)號(hào) : 0905010128 專業(yè) : 計(jì)算機(jī)科學(xué)與技術(shù) 1 設(shè)計(jì)（論文）題目及專題： 個(gè)人文獻(xiàn)管理系統(tǒng) 2 學(xué)生設(shè)計(jì)（論文）時(shí)間：自 年 月 日開始至 年 月