畢業(yè)論文——企業(yè)公告及資料發(fā)布系統(tǒng)的設(shè)計(jì)與實(shí)現(xiàn)

1、<p>　　企業(yè)公告及資料發(fā)布系統(tǒng)的設(shè)計(jì)與實(shí)現(xiàn)</p><p><b>　　摘 要</b></p><p>　　近年來(lái)，隨著網(wǎng)絡(luò)技術(shù)的迅猛發(fā)展，越來(lái)越多的部門(mén)、企事業(yè)單位都在通過(guò)Internet對(duì)外宣傳自己，同時(shí)為信息需求方提供方便快捷的服務(wù)，實(shí)現(xiàn)企業(yè)資源共享、提高辦公效率、節(jié)減不必要的開(kāi)支。因此，改變傳統(tǒng)的獨(dú)立、零散的信息發(fā)布方式是網(wǎng)絡(luò)信息發(fā)展的必然趨勢(shì)

2、。</p><p>　　本文完整地分析了企業(yè)公告及資料發(fā)布系統(tǒng)的業(yè)務(wù)需求，并介紹了系統(tǒng)的詳細(xì)設(shè)計(jì)與實(shí)現(xiàn)。在此基礎(chǔ)上本系統(tǒng)將ASP技術(shù)作為WEB應(yīng)用程序的重要開(kāi)發(fā)工具實(shí)現(xiàn)了其中的基本功能，包括：文件管理，部門(mén)管理，公告管理，管理員管理和留言簿管理等功能。同時(shí)，系統(tǒng)對(duì)用戶進(jìn)行了分級(jí)管理，提高了系統(tǒng)的安全性。</p><p>　　該系統(tǒng)前臺(tái)界面的設(shè)計(jì)主要采用Microsoft ASP作為開(kāi)發(fā)工具

3、，后臺(tái)數(shù)據(jù)庫(kù)采用SQL_SERVER 2000數(shù)據(jù)庫(kù)設(shè)計(jì)，應(yīng)用服務(wù)器端使用IIS，并利用ADO數(shù)據(jù)庫(kù)的各管理操作，實(shí)現(xiàn)了基于B/S模式開(kāi)發(fā)的企業(yè)公告及資料發(fā)布系統(tǒng)的基本功能及管理功能。</p><p>　　關(guān)鍵詞：B/S模式；ADO；WEB；發(fā)布</p><p>　　The Design and Realization of the Enterprise Bulletin and Datu

4、m Issue System</p><p><b>　　Abstract</b></p><p>　　In recent years, with the rapid development of the computer network, more and more departments and corporations propagandize themselv

5、es through Internet. At the same time, they supply convenient and immediate service to those who has information requirements to realize resource sharing and improve their working efficiency and save their cost. So, it i

6、s an inevitable trend for the development of the Network Information to change the traditional scattered method of issuing information.</p><p>　　How to design and realize the system to issue the bulletin and

7、 the datum, and the status of the business requirement for the system are introduced in this paper. The system takes ASP technology as an important development web tool, and realizes the basic function, such as: file man

8、agement, branch management, bulletin management, administrator management and message board management etc. At the same time, in order to enhance security, the system takes hierarchical management architecture.</p>

9、<p>　　This system mainly uses Microsoft ASP as the development tool, the SQL_SERVER 2000 to design the database on the backstage, IIS as the application server, which connects with the database by the ADO techniqu

10、e. It was realized with the B/S architecture.</p><p>　　Key words: B/S pattern; ADO; WEB; issue</p><p><b>　　目 錄</b></p><p><b>　　論文總頁(yè)數(shù)：28頁(yè)</b></p><p

11、><b>　　1引言1</b></p><p>　　1.1選題背景及意義1</p><p>　　1.2系統(tǒng)特點(diǎn)2</p><p>　　2ASP技術(shù)和SQL Server數(shù)據(jù)庫(kù)訪問(wèn)方法2</p><p>　　2.1ASP技術(shù)2</p><p>　　2.1.1ASP 概述

12、2</p><p>　　2.1.2ASP 的運(yùn)行環(huán)境3</p><p>　　2.1.3ASP 的內(nèi)建對(duì)象3</p><p>　　2.2SQL Server數(shù)據(jù)庫(kù)3</p><p>　　2.2.1SQL Server2000簡(jiǎn)介3</p><p>　　2.2.2ADO組件說(shuō)明4</p>

13、<p>　　3系統(tǒng)分析和設(shè)計(jì)5</p><p>　　3.1需求分析5</p><p>　　3.1.1數(shù)據(jù)流圖5</p><p>　　3.1.2數(shù)據(jù)字典6</p><p>　　3.1.3功能需求6</p><p>　　3.1.4業(yè)務(wù)流程7</p><p>　　3.

14、2總體設(shè)計(jì)7</p><p>　　3.2.1軟件的運(yùn)行環(huán)境設(shè)計(jì)7</p><p>　　3.2.2系統(tǒng)模塊設(shè)計(jì)8</p><p>　　3.2.3系統(tǒng)的流程分析9</p><p>　　3.3概念結(jié)構(gòu)設(shè)計(jì)9</p><p>　　3.4數(shù)據(jù)庫(kù)邏輯結(jié)構(gòu)設(shè)計(jì)11</p><p>　　

15、4系統(tǒng)詳細(xì)設(shè)計(jì)和實(shí)現(xiàn)13</p><p>　　4.1詳細(xì)設(shè)計(jì)13</p><p>　　4.1.1用戶、管理員登陸模塊13</p><p>　　4.1.2公告發(fā)布模塊13</p><p>　　4.1.3提交工作報(bào)告模塊14</p><p>　　4.1.4修改個(gè)人信息15</p>&l

16、t;p>　　4.1.5系統(tǒng)管理模塊15</p><p>　　4.2系統(tǒng)實(shí)現(xiàn)16</p><p>　　4.2.1系統(tǒng)主界面的實(shí)現(xiàn)16</p><p>　　4.2.2ASP訪問(wèn)數(shù)據(jù)庫(kù)實(shí)現(xiàn)17</p><p>　　4.2.3登錄模塊實(shí)現(xiàn)17</p><p>　　4.2.4用戶管理模塊的實(shí)現(xiàn)18&

17、lt;/p><p>　　4.2.5公告管理模塊20</p><p>　　4.2.6文件管理模塊21</p><p>　　4.2.7部門(mén)管理模塊23</p><p>　　4.2.8管理員管理模塊24</p><p>　　5設(shè)計(jì)難題及解決方法24</p><p>　　5.1上傳資料

18、的實(shí)現(xiàn)24</p><p><b>　　結(jié) 論26</b></p><p><b>　　參考文獻(xiàn)26</b></p><p><b>　　致 謝27</b></p><p><b>　　聲 明28</b></p>

19、<p><b>　　引言</b></p><p>　　在科學(xué)技術(shù)飛速發(fā)展的今天，計(jì)算機(jī)技術(shù)作為現(xiàn)代科學(xué)技術(shù)的基礎(chǔ)和核心，已經(jīng)而且將繼續(xù)對(duì)人類(lèi)文明社會(huì)的進(jìn)步與發(fā)展產(chǎn)生深刻影響。當(dāng)前越來(lái)越多的商業(yè)、企事業(yè)單位已經(jīng)將計(jì)算機(jī)技術(shù)應(yīng)用于日常的信息管理工作。科學(xué)的運(yùn)用計(jì)算機(jī)技術(shù)進(jìn)行信息管理不僅可以使管理工作規(guī)范化、系統(tǒng)化、自動(dòng)化而且可以節(jié)省相當(dāng)?shù)娜肆?、物力。它能夠使用戶的管理工作走上良性運(yùn)轉(zhuǎn)軌

20、道，從而為其快速發(fā)展奠定基礎(chǔ)。因此各企事業(yè)單位對(duì)與本行業(yè)相關(guān)管理軟件的需求也十分迫切，公告發(fā)布及資料上傳系統(tǒng)的建立，為各級(jí)信息管理決策提供了信息支持，從根本上改善了管理人員的勞動(dòng)條件和工作性質(zhì)，是信息管理手段現(xiàn)代化的重要標(biāo)志。</p><p>　　網(wǎng)絡(luò)發(fā)布公告及上傳資料是現(xiàn)在也是將來(lái)部門(mén)、企事業(yè)單位提高辦公效率和機(jī)構(gòu)精簡(jiǎn)改革趨勢(shì)的一個(gè)必然需要。它不僅可以實(shí)現(xiàn)企業(yè)內(nèi)部資源共享、提高辦公效率、節(jié)減不必要的開(kāi)支，而且能

21、使企業(yè)向外部發(fā)布產(chǎn)品、人才供求信息，以取得更多的商機(jī)和更多的優(yōu)秀人才；向內(nèi)部發(fā)布重要通知或公告,實(shí)現(xiàn)內(nèi)、外網(wǎng)有機(jī)結(jié)合。同時(shí)實(shí)現(xiàn)遠(yuǎn)程信息交流，解決異地辦公的局限性問(wèn)題。</p><p><b>　　選題背景及意義</b></p><p>　　在科學(xué)技術(shù)飛速發(fā)展的今天，計(jì)算機(jī)技術(shù)作為現(xiàn)代科學(xué)技術(shù)的基礎(chǔ)和核心，已經(jīng)而且將繼續(xù)對(duì)人類(lèi)文明社會(huì)的進(jìn)步與發(fā)展產(chǎn)生深刻影響。當(dāng)前越來(lái)越

22、多的商業(yè)、企事業(yè)單位已經(jīng)將計(jì)算機(jī)技術(shù)應(yīng)用于日常的信息管理工作。科學(xué)的運(yùn)用計(jì)算機(jī)技術(shù)進(jìn)行信息管理不僅可以使管理工作規(guī)范化、系統(tǒng)化、自動(dòng)化而且可以節(jié)省相當(dāng)?shù)娜肆?、物力。它能夠使用戶的管理工作走上良性運(yùn)轉(zhuǎn)軌道，從而為其快速發(fā)展奠定基礎(chǔ)。因此各企事業(yè)單位對(duì)與本行業(yè)相關(guān)管理軟件的需求也十分迫切，公告發(fā)布及資料上傳系統(tǒng)的建立，為各級(jí)信息管理決策提供了信息支持，從根本上改善了管理人員的勞動(dòng)條件和工作性質(zhì)，是信息管理手段現(xiàn)代化的重要標(biāo)志。</p&

23、gt;<p>　　網(wǎng)絡(luò)發(fā)布公告及上傳資料是現(xiàn)在也是將來(lái)部門(mén)、企事業(yè)單位提高辦公效率和機(jī)構(gòu)精簡(jiǎn)改革趨勢(shì)的一個(gè)必然需要。Internet逐漸進(jìn)入到人們的生活當(dāng)中，人們可以在閑暇時(shí)盡情地遨游在網(wǎng)絡(luò)中，而Internet又是以網(wǎng)站的形式體現(xiàn)出來(lái)的。通過(guò)網(wǎng)站的訪問(wèn)，人們可以進(jìn)行電子郵件的發(fā)送、文件傳輸、遠(yuǎn)程登陸、網(wǎng)上查詢(xún)和網(wǎng)上交流等，足不出戶便可知道外面的新聞動(dòng)態(tài)。當(dāng)然企事業(yè)單位更離不開(kāi)信息網(wǎng)絡(luò)傳播的方式。因?yàn)槠髽I(yè)也已不再滿足傳統(tǒng)、

24、獨(dú)立、零散的信息發(fā)布方式了，企業(yè)要的是協(xié)同工作、綜合、集成化的解決方案。而網(wǎng)絡(luò)是解決由于物理距離造成的信息交流不暢、協(xié)商溝通不便的辦公瓶頸問(wèn)題的最佳方式。網(wǎng)絡(luò)信息時(shí)代將人從繁瑣、無(wú)序、低端的工作中解放出來(lái)從事核心事務(wù)，整體提高了單位辦事效率和對(duì)信息的可控性，降低辦公成本，提高執(zhí)行力，使信息交流更加暢通。同時(shí)實(shí)現(xiàn)遠(yuǎn)程信息交流，解決異地辦公的局限性問(wèn)題。</p><p><b>　　系統(tǒng)特點(diǎn)</b&g

25、t;</p><p>　　蓬勃發(fā)展的網(wǎng)絡(luò)也順理成章地將ASP作為WEB應(yīng)用程序的重要開(kāi)發(fā)工具。采用WEB技術(shù)實(shí)現(xiàn)B/S（瀏覽器/服務(wù)器）結(jié)構(gòu)的管理系統(tǒng)是信息網(wǎng)絡(luò)傳播的發(fā)展趨勢(shì)。網(wǎng)絡(luò)信息時(shí)代將人從繁瑣、無(wú)序、低端的工作解放出來(lái)從事核心事務(wù)，整體提高了單位辦事效率和對(duì)信息的可控性，降低辦公成本，提高執(zhí)行力，操作簡(jiǎn)單、易于維護(hù)的需求使信息交流更加暢通。同時(shí)實(shí)現(xiàn)遠(yuǎn)程信息交流，解決異地辦公的局限性問(wèn)題。其具體特點(diǎn)如下：&l

26、t;/p><p>　　(1) 通用性：基于先進(jìn)的系統(tǒng)模型，使得系統(tǒng)能夠適用于不同行業(yè)、不有規(guī)模的用戶。</p><p>　　(2) 易用性：B/S結(jié)構(gòu)使用戶端不必安裝任何軟件，只要有瀏覽器并連接到Internet即可使用，免除了非專(zhuān)業(yè)人員維護(hù)系統(tǒng)的困難。</p><p>　　(3) 實(shí)時(shí)性:所有數(shù)據(jù)均實(shí)時(shí)處理，也可實(shí)時(shí)查詢(xún)。</p><p>　　

27、(4) 將企業(yè)內(nèi)聯(lián)網(wǎng)和互聯(lián)網(wǎng)有機(jī)結(jié)合，提供企業(yè)內(nèi)部信息化的網(wǎng)絡(luò)平臺(tái)。</p><p>　　(5) 為企業(yè)異地辦公提供全面可靠的安全解決方案。</p><p>　　ASP技術(shù)和SQL Server數(shù)據(jù)庫(kù)訪問(wèn)方法</p><p><b>　　ASP技術(shù)</b></p><p><b>　　ASP 概述</b&

28、gt;</p><p>　　ASP（ACTIVE SERVER PAGES）是一套微軟開(kāi)發(fā)的服務(wù)器端腳本環(huán)境，它內(nèi)含于IIS5.0和6.0之中，通過(guò)ASP我們可以結(jié)合html網(wǎng)頁(yè)、ASP指令和ACTIVEX元件建立動(dòng)態(tài)、交互且高效的WEB服務(wù)器應(yīng)用程序。有了ASP你就不必?fù)?dān)心客戶的瀏覽器是否能運(yùn)行ASP所編寫(xiě)的代碼，因?yàn)樗械某绦蚨紝⒃诜?wù)器端執(zhí)行，包括所有嵌在普通中的腳本程序。當(dāng)程序執(zhí)行完畢后，服務(wù)器僅將執(zhí)行的

29、結(jié)果返回給客戶瀏覽器，這樣也就減輕了客戶端瀏覽器的負(fù)擔(dān)，大大提高了交互的速度。以下是ASP所獨(dú)具的一些特點(diǎn)：　 　</p><p>　　以下是 ASP 獨(dú)具的一些特點(diǎn)：</p><p>　　(1) 使用 VBScript、JScript 等簡(jiǎn)單易懂的腳本語(yǔ)言，同時(shí)結(jié)合 HTML代碼，即可快速地完成網(wǎng)站的應(yīng)用程序。</p><p>　　(2) 使用普通的文本編輯器，如

30、 Windows 的記事本，即可進(jìn)行編輯設(shè)計(jì)，還可運(yùn)用 Dreamweaver 所見(jiàn)即所得的網(wǎng)頁(yè)編輯軟件快捷方便地進(jìn)行編輯，易學(xué)易用。</p><p>　　(3) 與瀏覽器無(wú)關(guān)，用戶端只要使用可執(zhí)行HTML代碼的瀏覽器，即可瀏覽 ASP 所設(shè)計(jì)的網(wǎng)頁(yè)內(nèi)容。ASP所使用的腳本語(yǔ)言（VBScript、JScript）均在 Web 服務(wù)器端執(zhí)行，用戶端的瀏覽器不需要能夠執(zhí)行這些腳本語(yǔ)言。</p><

31、p>　　(4) ASP 能與任何 ActiveX Scripting 語(yǔ)言相容。ActiveXServer Components（ActiveX 服務(wù)器元件）具有無(wú)限可擴(kuò)充性?？梢允褂?Visual Basic、Delphi、Java、Visual C++等編程語(yǔ)言來(lái)編寫(xiě)你所需要的 ActiveX Server Components。</p><p>　　(5) Active Server Pages 的源

32、程序，不會(huì)被傳到客戶端瀏覽器，因而可以避免所寫(xiě)的源程序被他人竊取或隨意篡改，也提高了程序的安全性。ASP 優(yōu)于其它編程語(yǔ)言的是，ASP 是一種“無(wú)須編程”的軟件開(kāi)發(fā)工具，即是說(shuō)簡(jiǎn)單易用，用簡(jiǎn)單的幾個(gè)語(yǔ)句，即可對(duì)數(shù)據(jù)庫(kù)進(jìn)行操作。</p><p><b>　　ASP 的運(yùn)行環(huán)境</b></p><p>　　目前 ASP 可運(yùn)行在三種環(huán)境下：</p><

33、p>　　(1) WINDOWS NT server 4.0 運(yùn)行 IIS 3.0(Internet Information Server)以上。</p><p>　　(2) WINDOWS NT workstation 4.0 運(yùn)行 Peer Web Server 3.0 以上。</p><p>　　(3) WINDOWS 95/98 運(yùn)行 PWS(Personal Web Serv

34、er)。其中以 NT server 上的 IIS 功能最強(qiáng)，提供了對(duì) ASP 的全面支持，是創(chuàng)建高速、穩(wěn)定的 ASP 主頁(yè)的最佳選擇。</p><p><b>　　ASP 的內(nèi)建對(duì)象</b></p><p>　　ASP 提供了六個(gè)內(nèi)建對(duì)象，供用戶直接調(diào)用：</p><p>　　(1) Application對(duì)象：負(fù)責(zé)管理所有會(huì)話信息，可用來(lái)在指

35、定的應(yīng)用程序的所有用戶之間共享信息。</p><p>　　(2) Session 對(duì)象：存貯特定用戶的會(huì)話信息，只被該用戶訪問(wèn)，當(dāng)用戶在不同 WEB 頁(yè)面跳轉(zhuǎn)時(shí)，Session 中的變量在用戶整個(gè)會(huì)話過(guò)程中一直保存。Session對(duì)象需 cookie 支持。</p><p>　　(3) Request 對(duì)象：從用戶端取得信息傳遞給服務(wù)器，是 ASP 讀取用戶輸入的主要方法。</p&g

36、t;<p>　　(4) Response 對(duì)象：服務(wù)器將輸出內(nèi)容發(fā)送到用戶端。</p><p>　　(5) Server 對(duì)象：提供對(duì)服務(wù)器有關(guān)方法和屬性的訪問(wèn)。</p><p>　　(6) Object Context 對(duì)象：IIS 4.0 新增的對(duì)象，用來(lái)進(jìn)行事務(wù)處理。此項(xiàng)功能需得到 MTS(Microsoft Transcation Server)管理的支持。</

37、p><p>　　SQL Server數(shù)據(jù)庫(kù)</p><p>　　SQL Server2000簡(jiǎn)介</p><p>　　SQL Server2000是Microsoft公司推出的關(guān)系型網(wǎng)絡(luò)數(shù)據(jù)為管理系統(tǒng)，一般工作于Microsoft公司的操作系統(tǒng)平臺(tái)上，如Microsoft Windows2000/2003/XP.</p><p>　　Micros

38、oft SQL Server2000是具有分布式數(shù)據(jù)庫(kù)和數(shù)據(jù)倉(cāng)庫(kù)功能，支持客戶機(jī)/服務(wù)器結(jié)構(gòu)，并能夠進(jìn)行分布式事務(wù)處理和聯(lián)機(jī)分析處理，它提供了豐富的管理工具以支持?jǐn)?shù)據(jù)的安全性管理、完整性管理和作業(yè)管理。其功能主要有以下四類(lèi)：</p><p>　　數(shù)據(jù)庫(kù)管理功能：是SQL Server為數(shù)據(jù)庫(kù)存服務(wù)器、數(shù)據(jù)庫(kù)、數(shù)據(jù)庫(kù)文件及作業(yè)提供的創(chuàng)建和維護(hù)功能，以及保證數(shù)據(jù)的安全性和完整性功能。</p><p

39、>　　網(wǎng)絡(luò)連接功能：提供客戶機(jī)與服務(wù)器的連接工具、數(shù)據(jù)通信工具和郵件系統(tǒng)的結(jié)構(gòu)及Web頁(yè)面功能。</p><p>　　應(yīng)用程序開(kāi)發(fā)工具：提供Transact-SQL、應(yīng)用程序接口及應(yīng)用程序的設(shè)計(jì)和優(yōu)化功能。</p><p>　　用戶信息存取工具：提供給非專(zhuān)業(yè)人員信息存取工具，使非專(zhuān)業(yè)人員通過(guò)可視化操作即可實(shí)現(xiàn)查詢(xún)等處理。</p><p><b>　　

40、ADO組件說(shuō)明</b></p><p>　　ADO技術(shù)是ASP訪問(wèn)數(shù)據(jù)庫(kù)的一個(gè)關(guān)鍵技術(shù)。</p><p>　　ADO的全稱(chēng)即activex data object(activex數(shù)據(jù)對(duì)象),是微軟公司開(kāi)發(fā)的一組優(yōu)化的訪問(wèn)數(shù)據(jù)庫(kù)的專(zhuān)用對(duì)象集，它提供了編程語(yǔ)言和統(tǒng)一數(shù)據(jù)訪問(wèn)方式OLE DB的一個(gè)中間層。允許開(kāi)發(fā)人員編寫(xiě)訪問(wèn)數(shù)據(jù)的代碼而不用關(guān)心數(shù)據(jù)庫(kù)是如何實(shí)現(xiàn)的，而只用關(guān)心到數(shù)據(jù)庫(kù)的

41、連接。通過(guò)在 Web 服務(wù)器上設(shè)置 ODBC 和 OLEDB 可連接多種數(shù)據(jù)庫(kù)：如 ORACLE、SQL SERVER、ACCESS 等，是對(duì)目前微軟所支持的數(shù)據(jù)庫(kù)進(jìn)行操作的最有效和最簡(jiǎn)單直接的方法。訪問(wèn)數(shù)據(jù)庫(kù)的時(shí)候，關(guān)于SQL的知識(shí)不是必要的，但是特定數(shù)據(jù)庫(kù)支持的SQL命令仍可以通過(guò)ADO中的命令對(duì)象來(lái)執(zhí)行。它為ASP提供了完整的站點(diǎn)數(shù)據(jù)庫(kù)解決方案，它作用在服務(wù)器端，提供含有數(shù)據(jù)庫(kù)信息的主頁(yè)內(nèi)容，通過(guò)執(zhí)行sql命令，讓用戶在瀏覽器畫(huà)面

42、中輸入，更新和刪除站點(diǎn)數(shù)據(jù)庫(kù)的信息。ADO主要包括connection，recordset和command等七個(gè)對(duì)象和四個(gè)集合, 它們的主要功能如下 ：</p><p>　　ADO 組件主要提供了以下七個(gè)對(duì)象和四個(gè)集合來(lái)訪問(wèn)數(shù)據(jù)庫(kù)。</p><p>　　(1) Connection對(duì)象：建立與后臺(tái)數(shù)據(jù)庫(kù)的連接；該對(duì)象提供了一種高效方便安全的數(shù)據(jù)庫(kù)連接方案。</p><p

43、>　　(2) Command 對(duì)象：對(duì)象對(duì)數(shù)據(jù)庫(kù)下達(dá)行動(dòng)查詢(xún)指令，以及執(zhí)行SQL server的存儲(chǔ)過(guò)程，訪問(wèn)數(shù)據(jù)庫(kù)；</p><p>　　(3) Parameters 對(duì)象和 Parameters 集合：為 Command 對(duì)象提供數(shù)據(jù)和參數(shù)；</p><p>　　(4) RecordSet 對(duì)象：存放訪問(wèn)數(shù)據(jù)庫(kù)后的數(shù)據(jù)信息，是最常用的對(duì)象；</p><p>

44、;　　(5) Field 對(duì)象和 Field 集合：提供對(duì) RecordSet 中當(dāng)前記錄的各個(gè)字段進(jìn)行訪問(wèn)的功能；</p><p>　　(6) Property對(duì)象和 Properties 集合：提供有關(guān)信息，供 Connection、Command、RecordSet、Field 對(duì)象使用；</p><p>　　(7) Error 對(duì)象和 Errors 集合：提供訪問(wèn)數(shù)據(jù)庫(kù)時(shí)的錯(cuò)誤信息

45、。</p><p><b>　　系統(tǒng)分析和設(shè)計(jì)</b></p><p><b>　　需求分析</b></p><p>　　由于企業(yè)均以文件發(fā)布、收集，工作報(bào)告，信息檔案等為主要信息傳遞方式。通過(guò)對(duì)現(xiàn)代企業(yè)信息傳遞的調(diào)查，發(fā)現(xiàn)有相當(dāng)一部分中、小型企業(yè)仍以傳統(tǒng)的通過(guò)紙張為媒介的方式來(lái)傳遞信息。盡管各個(gè)企業(yè)單位部門(mén)的業(yè)務(wù)和職能各

46、不相同，管理方法不同，且企業(yè)內(nèi)部的具體需求也存在差異，但經(jīng)與各管理人員交流后，他們都認(rèn)識(shí)到應(yīng)該具備，且必須具備與企業(yè)發(fā)展相適應(yīng)的網(wǎng)絡(luò)信息傳遞方法的必要性。比如，提交工作報(bào)告，它能使企業(yè)各個(gè)部門(mén)實(shí)現(xiàn)信息資料互通,在不同的地方把自己的工作計(jì)劃，工作總結(jié)等資料同時(shí)通過(guò)網(wǎng)絡(luò)提交給管理人員，避免了以紙張交流信息的繁瑣過(guò)程。這樣才能提高工作效率，協(xié)調(diào)各項(xiàng)工作，促進(jìn)建立和諧人際關(guān)際，使企業(yè)內(nèi)部信息更加快捷流通。我們就提出一種新的信息傳遞方法，既能滿足

47、當(dāng)前企業(yè)需要，操作簡(jiǎn)單，易于維護(hù)，且為二次開(kāi)發(fā)提供了可擴(kuò)充性。如何實(shí)現(xiàn)利用現(xiàn)代網(wǎng)絡(luò)技術(shù)傳遞信息，成為解決問(wèn)題的關(guān)鍵。</p><p>　　企業(yè)網(wǎng)絡(luò)信息傳遞一般流程為信息輸入→信息管理→信息分類(lèi)別管理→信息輸出。</p><p><b>　　數(shù)據(jù)流圖</b></p><p>　　根據(jù)的數(shù)據(jù)流向，即可畫(huà)出系統(tǒng)數(shù)據(jù)流圖。如圖3-1所示：</p&

48、gt;<p>　　圖3-1系統(tǒng)數(shù)據(jù)流圖</p><p><b>　　數(shù)據(jù)字典</b></p><p>　　根據(jù)系統(tǒng)數(shù)據(jù)流圖可以給出相關(guān)處理信息的數(shù)據(jù)字典，以便查詢(xún)數(shù)據(jù)流圖中的數(shù)據(jù)項(xiàng)。下面指出了查看用戶信息的數(shù)據(jù)字典如表3-1。</p><p>　　表3-1查看用戶信息的數(shù)據(jù)字典</p><p><b&

49、gt;　　功能需求</b></p><p>　　一般情況下，企業(yè)內(nèi)的信息涉及到企業(yè)的機(jī)密，在企業(yè)信息利用網(wǎng)絡(luò)傳遞信息過(guò)程中，首先應(yīng)確保整個(gè)交流過(guò)程的安全性，即需要一個(gè)專(zhuān)門(mén)的驗(yàn)證用戶的合法性，防止非法用戶侵入，實(shí)行權(quán)限控制、存儲(chǔ)和傳輸加密以及電子簽名，這樣來(lái)保證的安全性。安全性控制這個(gè)先決性條件解決后，企業(yè)對(duì)內(nèi)、對(duì)外的信息傳遞才能更好地實(shí)現(xiàn)。比如：公告發(fā)布和提交工作報(bào)告。對(duì)于公告發(fā)布企業(yè)管理人員能及時(shí)向

50、外部發(fā)布產(chǎn)品、人才供求信息，以取得更多的商機(jī)和更多的優(yōu)秀人才，實(shí)現(xiàn)網(wǎng)絡(luò)信息服務(wù)的遠(yuǎn)程交流，并在企業(yè)內(nèi)部對(duì)各級(jí)部門(mén)職工發(fā)布管理信息及近期部門(mén)的工作安排，重大會(huì)議及活動(dòng)。對(duì)于提交工作報(bào)告即文件資料上傳，文件資料上傳是企業(yè)信息化中一個(gè)非常重要的功能之一,它能使企業(yè)各個(gè)部門(mén)實(shí)現(xiàn)信息資料互通,在不同的地方把企業(yè)需要的通知、公告、文件、檔案等資料同時(shí)上傳到一個(gè)服務(wù)器上，每個(gè)部門(mén)不需要人為的到別的部門(mén)提取資料，而在網(wǎng)上就能通過(guò)對(duì)方上傳的文件進(jìn)行下載，

51、對(duì)企業(yè)內(nèi)遠(yuǎn)程工作來(lái)說(shuō)，只要把處理好的文檔資料，通過(guò)WEB服務(wù)器實(shí)現(xiàn)及時(shí)上傳，也同樣可以共享信息資料，了解企業(yè)內(nèi)部當(dāng)前的工作進(jìn)度與狀況。而不是傳統(tǒng)意義上的先在客戶或辦事點(diǎn)整理好文檔后再回到公司交紿相關(guān)部門(mén)，</p><p><b>　　業(yè)務(wù)流程</b></p><p>　　通過(guò)以上的數(shù)據(jù)流圖的數(shù)據(jù)流向分析和簡(jiǎn)單的功能需求分析，我們可以得到實(shí)現(xiàn)該系統(tǒng)的業(yè)務(wù)流程。</

52、p><p>　　本系統(tǒng)采用基于數(shù)據(jù)庫(kù)的動(dòng)態(tài)信息發(fā)布技術(shù)，可以實(shí)現(xiàn)企業(yè)發(fā)布最新消息，個(gè)人提交工作報(bào)告，實(shí)現(xiàn)管理員及用戶分級(jí)化的管理，以確保企業(yè)信息的安全性。</p><p>　　企業(yè)公告及資料發(fā)布貫穿于企業(yè)信息傳遞的整個(gè)過(guò)程，在這個(gè)過(guò)程中，各項(xiàng)業(yè)務(wù)都有自己的操作流程。企業(yè)的用戶主要有管理員、企業(yè)員工、訪客，他們以不同的身份登錄系統(tǒng)，會(huì)分配到不同的權(quán)限。</p><p>　

53、　以管理員身份登錄系統(tǒng)之后，可以發(fā)布企業(yè)新聞，維護(hù)員工的基本信息，維護(hù)企業(yè)運(yùn)轉(zhuǎn)基本信息，維護(hù)業(yè)務(wù)的安排，維護(hù)企業(yè)待解決問(wèn)題提議方案，對(duì)企業(yè)的用戶進(jìn)行管理，創(chuàng)建企業(yè)員工的登錄賬號(hào)，修改用戶密碼；對(duì)企業(yè)的部門(mén)、用戶提交的工作報(bào)告、公告信息、管理員、留言薄進(jìn)行管理。只有管理員賦于了企業(yè)員工的登錄賬號(hào)和基本信息、任職安排之后，員工才能正常登錄系統(tǒng)，進(jìn)行用戶權(quán)限的操作。</p><p>　　在管理員創(chuàng)建了員工的登錄賬號(hào)之后

54、，員工可以根據(jù)管理員設(shè)定的賬號(hào)、密碼登錄，成功登錄后可以對(duì)自己的個(gè)人信息進(jìn)行修改，可以查看企業(yè)通知，同時(shí)查看自己任職的信息，工作安排，提交個(gè)人工作報(bào)告等，并可以通過(guò)留言板提出對(duì)企業(yè)的意見(jiàn)和建議，以促進(jìn)企業(yè)以人為本的和諧發(fā)展。</p><p><b>　　總體設(shè)計(jì)</b></p><p><b>　　軟件的運(yùn)行環(huán)境設(shè)計(jì)</b></p>

55、<p>　　為了保證系統(tǒng)運(yùn)行的效率和可靠性，服務(wù)器端應(yīng)具有較高軟硬件配置，客戶端的要求不需要很高。此應(yīng)用程序可廣泛運(yùn)行于Internet，也適用于內(nèi)部的局域網(wǎng)。運(yùn)行配置要求如表3-2：</p><p>　　表3-2運(yùn)行配置要求</p><p><b>　　系統(tǒng)模塊設(shè)計(jì)</b></p><p>　　根據(jù)功能需求分析和業(yè)務(wù)流程分析，對(duì)系

56、統(tǒng)各功能進(jìn)行集中、分塊，按照結(jié)構(gòu)化程序設(shè)計(jì)的要求，本系統(tǒng)的系統(tǒng)功能模塊圖如圖3-2所示：</p><p>　　圖3-2 企業(yè)公告及資料發(fā)布系統(tǒng)功能模塊示意圖</p><p><b>　　系統(tǒng)的流程分析</b></p><p>　　整個(gè)系統(tǒng)流程設(shè)計(jì)是根據(jù)系統(tǒng)從初始錄入數(shù)據(jù)階段到對(duì)其它功能模塊進(jìn)行操作時(shí)的流程，如圖3-3系統(tǒng)流程圖：</p&g

57、t;<p>　　圖3-3 系統(tǒng)流程圖</p><p><b>　　概念結(jié)構(gòu)設(shè)計(jì)</b></p><p>　　針對(duì)以上對(duì)系統(tǒng)的需求分析，為了更好地對(duì)系統(tǒng)的總體要求及各權(quán)限用戶的有更加明確的方向，現(xiàn)將系統(tǒng)E—R圖表述如圖3－4：</p><p>　　圖3-4系統(tǒng)E—R圖</p><p>　　系統(tǒng)E—R圖的各實(shí)體

58、的屬性如下：</p><p>　　用戶信息(如圖3-5)：編號(hào)，姓名，密碼，所在部門(mén)，電話，電子郵件， 地址</p><p>　　文件信息(如圖3-6)：文件號(hào)，文件名，文件內(nèi)容，發(fā)送時(shí)間，文件類(lèi)型，所屬部門(mén)，主題，路徑</p><p>　　公告信息(如圖3-7)：編號(hào)，公告標(biāo)題，內(nèi)容，發(fā)送時(shí)間</p><p>　　管理員信息(如圖3-8)：

59、編號(hào)，密碼，姓名</p><p>　　留言薄信息(如圖3-9)：編號(hào)，標(biāo)題，留言者姓名，內(nèi)容，留言時(shí)間</p><p>　　部門(mén)信息(如圖3-10)：部門(mén)名，負(fù)責(zé)人，聯(lián)系方式</p><p>　　根據(jù)各實(shí)體的屬性，得到各實(shí)體的數(shù)據(jù)表關(guān)系圖如下：</p><p>　　用戶信息表關(guān)系圖： </p><p><b>

60、;　　圖3-5用戶信息</b></p><p><b>　　文件信息表關(guān)系圖：</b></p><p><b>　　圖3-6文件信息</b></p><p><b>　　公告信息表關(guān)系圖：</b></p><p><b>　　圖3-7公告信息</b&

61、gt;</p><p><b>　　管理員信息關(guān)系圖：</b></p><p><b>　　圖3-8管理員信息</b></p><p><b>　　留言薄信息關(guān)系圖：</b></p><p><b>　　圖3-9留言薄信息</b></p>&

62、lt;p><b>　　部門(mén)信息表關(guān)系圖：</b></p><p><b>　　圖3-10部門(mén)信息</b></p><p><b>　　數(shù)據(jù)庫(kù)邏輯結(jié)構(gòu)設(shè)計(jì)</b></p><p>　　通過(guò)需求分析和E-R圖的關(guān)系模型結(jié)構(gòu)分析以后，需要將數(shù)據(jù)庫(kù)概念結(jié)構(gòu)轉(zhuǎn)化為SQL Server 2000數(shù)據(jù)庫(kù)系統(tǒng)所

63、支持的實(shí)際數(shù)據(jù)模型，也就是數(shù)據(jù)庫(kù)的邏輯結(jié)構(gòu)。在實(shí)體以及實(shí)體之間關(guān)系的基礎(chǔ)上，形成數(shù)據(jù)庫(kù)中的表格以及各個(gè)表格之間的關(guān)系。企業(yè)公告及資料上傳系統(tǒng)數(shù)據(jù)庫(kù)中共有六張表：用戶信息表如表3-3、管理員信息表如表3-4、上傳文件信息表如表3-5、公告發(fā)布信息表如表3-6、留言薄如表3-7、部門(mén)信息表如表3-8。</p><p>　　下面分別介紹這些表的物理結(jié)構(gòu)：</p><p>　　表3-3用戶信息表(

64、Userinforma)</p><p>　　表3-4管理員信息表(addminforma) </p><p>　　表3-5上傳文件信息表(doc_informa)</p><p>　　表3-6公告信息表(gginforma) </p><p>　　表3-7留言薄(message) </p><p>　　表3-8部門(mén)信

65、息表(dep)</p><p><b>　　系統(tǒng)詳細(xì)設(shè)計(jì)和實(shí)現(xiàn)</b></p><p><b>　　詳細(xì)設(shè)計(jì)</b></p><p>　　用戶、管理員登陸模塊</p><p>　　在企業(yè)公告及資料（公文）發(fā)布系統(tǒng)中，用戶及管理員登陸模塊用來(lái)驗(yàn)證用戶的合法性，防止非法用戶侵入、權(quán)限控制、存儲(chǔ)和傳輸加密

66、以及電子簽名，以確保系統(tǒng)的安全性。一般情況下，企業(yè)內(nèi)所處理的信息涉及企業(yè)的機(jī)密，而且不同的辦公人員對(duì)辦公信息的處理權(quán)限也是不同的，因此，安全性控制功能應(yīng)該是系統(tǒng)得以投入使用的先決條件。其具體實(shí)現(xiàn)流程圖如圖4-1：</p><p>　　圖4-1登陸模塊流程圖</p><p><b>　　公告發(fā)布模塊</b></p><p>　　了解到市場(chǎng)及企業(yè)的

67、需要，系統(tǒng)管理員及時(shí)向外部發(fā)布產(chǎn)品、人才供求信息，以取得更多的商機(jī)和更多的優(yōu)秀人才。實(shí)現(xiàn)網(wǎng)絡(luò)信息服務(wù)的遠(yuǎn)程交流。系統(tǒng)管理員在企業(yè)內(nèi)部發(fā)布重要通知或公告。各級(jí)部門(mén)職工管理信息的發(fā)布及近期部門(mén)的工作安排，重大會(huì)議及活動(dòng)。單位內(nèi)部職員通過(guò)點(diǎn)擊查看企業(yè)內(nèi)部所發(fā)部的緊急通知，會(huì)議通知等消息。查看的內(nèi)容包括公告主題、公告發(fā)布人、公告發(fā)布時(shí)間、公告內(nèi)容等詳細(xì)內(nèi)容，滿足企業(yè)內(nèi)部信息交流。其具體實(shí)現(xiàn)流程圖如圖4-2：</p><p&g

68、t;　　圖4-2公告模塊流程圖</p><p><b>　　提交工作報(bào)告模塊</b></p><p>　　提交工作報(bào)告即文件上傳。文件上傳是企業(yè)信息化中一個(gè)非常重要的功能之一,它能使企業(yè)各個(gè)部門(mén)實(shí)現(xiàn)信息資料互通,在不同的地方把企業(yè)需要的通知、公告、文件、檔案等資料同時(shí)上傳到一個(gè)服務(wù)器上，每個(gè)部門(mén)不需要人為的到別的部門(mén)提取資料，而在網(wǎng)上就能通過(guò)對(duì)方上傳的文件進(jìn)行下載，另

69、外還對(duì)上傳和下載實(shí)現(xiàn)編號(hào)、權(quán)限和分類(lèi)管理即分部門(mén)管理，使用文件共享更加安全合理。文件上傳下載實(shí)現(xiàn)的不僅僅是資料意義上的共享，還可以有效降低企業(yè)成本、提高效率。該軟件是基于B/S結(jié)構(gòu)模式開(kāi)發(fā)的，任何能連入Internet網(wǎng)絡(luò)的計(jì)算機(jī)都能登錄該系統(tǒng)，在異地或外地，甚至與公司間相隔千里辦公，只要把處理好的文檔資料，通過(guò)WEB服務(wù)器實(shí)現(xiàn)既時(shí)上傳，也一樣可以共享信息資料，讓企業(yè)內(nèi)部當(dāng)前的工作進(jìn)度與狀況。而不是傳統(tǒng)意義上的先在客戶或辦事點(diǎn)整里好文檔

70、后再回到公司交給相關(guān)部門(mén)，最后在與客戶進(jìn)行聯(lián)系，這樣既增加了企業(yè)成本開(kāi)銷(xiāo)和負(fù)擔(dān)，也大大降低了工作效率。而且上傳的格式文件除支持.doc文件外，還支持其它多種格式，比如上傳視頻文件、音樂(lè)文件、工具軟件等，都是可以根據(jù)實(shí)際需要而進(jìn)行的?？偟膩?lái)說(shuō)，文件上傳就是一個(gè)實(shí)現(xiàn)資源共享，提高企業(yè)信息化的有效途徑</p><p>　　圖4-3提交工作報(bào)告流程圖</p><p><b>　　修改個(gè)人

71、信息</b></p><p>　　此模塊部分用來(lái)確保用戶信息的安全，登陸用戶可修改自已的個(gè)人信息資料，如電話號(hào)碼，登錄密碼等。</p><p><b>　　系統(tǒng)管理模塊</b></p><p>　　對(duì)于任何一個(gè)管理系統(tǒng)來(lái)說(shuō)，系統(tǒng)管理部分是整個(gè)系統(tǒng)的核心操作部分。當(dāng)然對(duì)于企業(yè)公告及資料（公文）發(fā)布系統(tǒng)也是如此。系統(tǒng)管理的好與否決定著整

72、個(gè)系統(tǒng)的是否穩(wěn)定。那么，對(duì)于企業(yè)公告及資料（公文）發(fā)布系統(tǒng)的系統(tǒng)管理模塊部分應(yīng)做好如下的管理工作：</p><p><b>　　（1）公告信息管理</b></p><p>　　公告信息管理是管理員對(duì)首面公告信息的修改、刪除、更新的操作。管理員可以通過(guò)從數(shù)據(jù)庫(kù)的公告信息表中提取出數(shù)據(jù)，將公告信息發(fā)布到首頁(yè)，以便企業(yè)中職員及部門(mén)能及時(shí)看到，以免錯(cuò)過(guò)緊急事務(wù)。</p&

73、gt;<p><b>　　（2）用戶信息管理</b></p><p>　　系統(tǒng)管理員能夠查詢(xún)?cè)诼氂脩?，添加新增用戶的信息、刪除離職人員的信息、更新在職人員需修改的相關(guān)信息，同時(shí)關(guān)賦予用戶所具有的操作權(quán)限。</p><p><b>　　（3）部門(mén)信息管理</b></p><p>　　部門(mén)是企業(yè)生存的一個(gè)載體。系

74、統(tǒng)管理員對(duì)部門(mén)有添加、修改、刪除的管理功能，同時(shí)能夠?qū)Σ块T(mén)發(fā)送資料（公文），并對(duì)部門(mén)所上傳的資料（公文）能做相應(yīng)的回復(fù)的。</p><p><b>　　（4）文件信息管理</b></p><p>　　系統(tǒng)管理員文件具有添加、修改、刪除的操作的權(quán)限。并同時(shí)各部門(mén)的文件進(jìn)行分類(lèi)的管理。以致確保各部門(mén)的資料信息準(zhǔn)確性和安全性，管理員能夠?qū)⒏鱾€(gè)不同部門(mén)上傳及所能下載到的資料（

75、公文）分類(lèi)分別存放到各個(gè)部門(mén)的文件夾當(dāng)中。其具體實(shí)現(xiàn)流程圖如圖4-4：</p><p>　　圖4-4系統(tǒng)管理模塊流程圖</p><p><b>　　系統(tǒng)實(shí)現(xiàn)</b></p><p><b>　　系統(tǒng)主界面的實(shí)現(xiàn)</b></p><p>　　通過(guò)以上詳細(xì)的需求分析，及各模塊的設(shè)計(jì)要求，現(xiàn)將各部分功能的

76、相關(guān)界面截圖及實(shí)現(xiàn)代碼進(jìn)行詳細(xì)說(shuō)明。系統(tǒng)主界面截圖如圖4-5：</p><p><b>　　圖4－5系統(tǒng)主界面</b></p><p>　　ASP訪問(wèn)數(shù)據(jù)庫(kù)實(shí)現(xiàn)</p><p>　　對(duì)于動(dòng)態(tài)系統(tǒng)的實(shí)現(xiàn)，ASP訪問(wèn)數(shù)據(jù)庫(kù)的一個(gè)關(guān)鍵技術(shù)是ADO技術(shù)，主要的操作就是對(duì)數(shù)據(jù)庫(kù)中數(shù)據(jù)的操作，在對(duì)數(shù)據(jù)的操作之前必前先與數(shù)據(jù)庫(kù)建立連接。</p>

77、<p><b>　　<% </b></p><p>　　set conn=server.createobject("adodb.connection")</p><p>　　conn.connectionstring="dsn=xh;uid=xh;pwd=xh"</p><p><

78、b>　　conn.open</b></p><p>　　set rs=server.CreateObject("adodb.recordset")</p><p><b>　　%> </b></p><p><b>　　登錄模塊實(shí)現(xiàn) </b></p><p

79、>　　用戶登陸(ulandok.asp)</p><p>　　用戶登錄時(shí)采用的身份驗(yàn)證算法如圖4-6所示：</p><p>　　圖4－6用戶身份驗(yàn)證</p><p><b>　　其實(shí)現(xiàn)代碼：</b></p><p>　　while not rs.eof </p><p>　　user=t

80、rim(Request.form("username")) '獲取用戶名</p><p>　　password=trim(Request.form("password")) '獲取密碼</p><p>　　if (trim(rs("name"))=user and password=trim(r

81、s("password"))) then </p><p>　　'判斷輸入的用戶名與密碼是否正確</p><p>　　session("name")=rs("name")</p><p>　　response.redirect "fram.asp" '登陸成功跳轉(zhuǎn)至

82、fram.asp</p><p><b>　　else</b></p><p>　　rs.movenext</p><p><b>　　end if</b></p><p><b>　　wend </b></p><p>　　response.Write

83、"輸入錯(cuò)誤，請(qǐng)重新輸入！"</p><p><b>　　用戶管理模塊的實(shí)現(xiàn)</b></p><p>　　添加用戶(adduserdb.asp)</p><p>　　'--------------接受數(shù)據(jù)----------- </p><p>　　user_name=trim(Reque

84、st.Form("username")) '用戶名</p><p>　　pwd=trim(request.Form("password1")) '密碼</p><p>　　okpwd=trim(request.Form("password2")) '確認(rèn)密碼</p><p>　　bu

85、siness=trim(request.Form("business")) '職務(wù)</p><p>　　department=trim(request.Form("department")) '所屬部門(mén)</p><p>　　E_mail=trim(request.Form("Email")) '電子郵件

86、</p><p>　　phone=trim(request.Form("phone")) '聯(lián)系電話</p><p>　　address=trim(request.Form("place")) '住址</p><p>　　if E_mail="" then</p><p&

87、gt;　　E_mail="未知"</p><p><b>　　end if</b></p><p>　　在添加新用戶的信息時(shí)，如果是這幾種信息未加入時(shí)，則添加成功的頁(yè)面中這一條用戶信息顯示為“未知”。</p><p>　　if phone="" then</p><p>　　pho

88、ne="未知"</p><p><b>　　end if</b></p><p>　　if place="" then</p><p>　　place="未知"</p><p><b>　　end if</b></p><

89、;p>　　if user_name="" or pwd="" or okpwd="" or business="" or department="" then </p><p>　　Response.write"<script>alert(""信息輸入不完整,請(qǐng)重新輸

90、入! "");location.href=""adduser.asp"";</script>"</p><p><b>　　else</b></p><p>　　if pwd=okpwd then</p><p>　　'判斷在添加用戶時(shí)輸入的密碼與確認(rèn)密碼

91、是否一致，如果一致則將新輸入的用戶信息插入到用戶信息表（userinforma）中,否則不能添加。</p><p>　　conn.execute("insert into userinforma values('"&user_name&"','"&pwd&"','"&busi

92、ness&"','"&department&"','"&E_mail&"','"&phone&"','"&address&"')")</p><p><b>　　

93、else</b></p><p>　　Response.write"<script>alert(""兩次密碼輸入不一致,請(qǐng)重新輸入! "");location.href=""user.asp"";</script>"</p><p><b>　　

94、end if</b></p><p><b>　　end if</b></p><p><b>　　%></b></p><p>　　修改用戶信息(modifyuser.asp)</p><p>　　在企業(yè)中為了能確保用戶個(gè)人信息的安全性及準(zhǔn)確性，用戶有權(quán)更改自己的個(gè)人信息。&l

95、t;/p><p>　　if pwd1=pwd2 then</p><p>　　'判斷在用戶在修改個(gè)人的資料信息時(shí)輸入的密碼與確認(rèn)密碼是否一致，如果一致則將允許用戶修改個(gè)人的資料信息,否則不能修改。</p><p>　　set rst=server.CreateObject("adodb.recordset")</p><p

96、>　　rst.open "update userinforma set pwd='"&pwd1&"',E_mail='"&E_mail&"',address='"&address&"',phone='"&phone&"

97、9; where user_name='"&user_name&"'",conn</p><p>　　set rst=nothing</p><p><b>　　else</b></p><p>　　Response.write"<script>alert(

98、""兩次密碼輸入不一致,請(qǐng)重新輸入! "");location.href=""modifyinformation.asp"";</script>" </p><p><b>　　end if</b></p><p><b>　　刪除用戶信息</b&g

99、t;</p><p>　　sql="delete from userinforma where user_name='"&user_name&"'"</p><p>　　conn.execute sql</p><p><b>　　公告管理模塊</b></p>

100、<p>　　公告管理模塊是實(shí)現(xiàn)首面公告信息的管理，當(dāng)有新的公告由管理員添加到數(shù)據(jù)庫(kù)時(shí)，首頁(yè)的公告信息會(huì)自動(dòng)更新，方便企業(yè)內(nèi)部能及時(shí)獲得公告消息。</p><p><b>　　添加首頁(yè)公告</b></p><p><b>　　<%</b></p><p>　　rs.PageSize = 25</p&

101、gt;<p>　　rs.CursorLocation = 3 '記錄下載到瀏覽器端</p><p>　　rs.open sql,conn, 2,2</p><p>　　pre = true</p><p>　　last = true</p><p>　　page = trim(Request.QueryString(&

102、quot;page")</p><p>　　if len(page) = 0 then</p><p>　　intpage = 1</p><p>　　pre = false</p><p><b>　　else</b></p><p>　　if cint(page) =< 1 t

103、hen</p><p>　　intpage = 1</p><p>　　pre = false</p><p><b>　　else</b></p><p>　　if cint(page) >= rs.PageCount then 'pagecount返回recordset對(duì)象的分頁(yè)總數(shù)</p&g

104、t;<p>　　intpage = rs.PageCount</p><p>　　last = false</p><p><b>　　else</b></p><p>　　intpage = cint(page)</p><p><b>　　end if</b></p>

105、<p><b>　　end if</b></p><p><b>　　end if</b></p><p>　　if not rs.eof then</p><p>　　rs.AbsolutePage = intpage '當(dāng)recordset對(duì)象有設(shè)置分頁(yè)時(shí)，absolutepage會(huì)返回目前的頁(yè)碼

106、</p><p><b>　　end if</b></p><p>　　for i=1 to rs.PageSize '擋recordset對(duì)象內(nèi)有設(shè)置分頁(yè)時(shí)，pagesize為每頁(yè)的記錄條數(shù)</p><p>　　if rs.EOF or rs.BOF then exit for</p><p><b&

107、gt;　　%> </b></p><p><b>　　修改首頁(yè)公告代碼：</b></p><p>　　response.buffer=true '設(shè)置啟用瀏覽器的緩沖處理</p><p>　　Response.Expires=0 '指定放入緩存區(qū)的網(wǎng)頁(yè)的逾期時(shí)間為0</

108、p><p>　　title=request.form("title") '從表單中獲取標(biāo)題</p><p>　　id=request.form("id") '從表單中獲取編號(hào)</p><p>　　context=request.form("neirong")</

109、p><p>　　rs.open "select * from gginforma where id='"&id&"'" ,conn,3,2</p><p>　　rs("title")=title '將表單中修改的值保存到數(shù)據(jù)記錄中</p><p

110、>　　rs("context")=context</p><p>　　rs.update </p><p><b>　　刪除公告:</b></p><p>　　id=Request("id") '獲取公告編號(hào)</p><p>　　delsql="d

111、elete from gginforma where id='"&id&"'"</p><p>　　conn.execute delsql</p><p><b>　　文件管理模塊</b></p><p>　　保存上傳文件(add_docok.asp)</p><

112、p><b>　　<%</b></p><p>　　set conn=server.createobject("adodb.connection")</p><p>　　conn.connectionstring="dsn=xh;uid=xh;pwd=xh"</p><p><b>　

113、　conn.open</b></p><p>　　dim filepath '定義文件路徑變量</p><p>　　dim fileext '定義文件簡(jiǎn)介變量</p><p>　　dim file_subject '定義文件主題變量</p><p><b>　　dim sql<

114、/b></p><p><b>　　dim msg</b></p><p>　　dim errflag '定義出錯(cuò)標(biāo)識(shí)</p><p>　　dim errnumber</p><p>　　dim savepath '定義文件保存路徑變量</p><p>　　

115、dim maxfilesize '定義文件大小</p><p><b>　　dim bm</b></p><p>　　savepath="savepath" '虛擬路徑（后面不加“/”）符號(hào)</p><p>　　maxfilesize=5*1024 限制上傳的文件為5MB</p><

116、;p>　　errflag=false</p><p>　　filepath=savepath '使用虛擬路徑進(jìn)行賦值</p><p>　　filepath=server.MapPath(filepath) '將虛擬路徑轉(zhuǎn)換為磁盤(pán)路徑</p><p>　　fileext==GetFromVal("filee

117、xt") '取得文件介紹</p><p>　　errnumber==GetFromVal("errnumber")</p><p>　　bm=GetFromVal("bm") '取得部門(mén)名</p><p>　　errnumber=cint(errnumber)</p>

118、;<p>　　if len(trim(file_subject))=0 then</p><p>　　response.Write"文件主題不能為空！"</p><p>　　response.End</p><p><b>　　end if </b></p><p>　　if len(t

119、rim(fileext))=0 then</p><p>　　fileext="無(wú)簡(jiǎn)介！"</p><p><b>　　end if</b></p><p>　　upfilename=SaveFile("fruit",filepath,maxfilesize,errnumber,1) '保存并取

120、得文件名</p><p>　　select case trim(upfilename)</p><p>　　case "patherror"</p><p>　　msg="錯(cuò)誤：指定的路徑不存在!"</p><p>　　errflag=true</p><p>　　case &q

121、uot;refilerror"</p><p>　　msg="錯(cuò)誤：文件不存在!"</p><p>　　errflag=true</p><p>　　case "sizeerror"</p><p>　　msg="錯(cuò)誤：文件超出指定長(zhǎng)度！"</p><p

122、>　　errflag=true</p><p>　　case "fileerror"</p><p>　　msg="錯(cuò)誤：被限制上傳的文件格式"</p><p>　　errflag=true</p><p><b>　　case else</b></p><

123、;p><b>　　msg=""</b></p><p>　　errflag=false</p><p>　　end select</p><p>　　if not errflag then '在上傳文件沒(méi)有錯(cuò)誤情況下，把得到的文件信息保存到數(shù)據(jù)庫(kù)中</p><p>　　sql=&qu

124、ot;insert into docinformation (doc_name,context,doc_size,dep,path)_</p><p>　　values("sql=sql&"('"&file_subject&"','"&fileext&"','"&a

125、mp;savepath&"','"&bm&"','"&persize&"')"</p><p>　　conn.execute(sql)</p><p><b>　　end if </b></p><p>&

126、lt;b>　　end if </b></p><p>　　conn.close</p><p>　　set conn=nothing</p><p>　　if errflag then</p><p>　　response.Write "alert('"&msg&"