自動(dòng)化辦公系統(tǒng)

1、摘要隨著計(jì)算機(jī)的應(yīng)用和網(wǎng)絡(luò)的普及，辦公自動(dòng)化改變了過(guò)去復(fù)雜、低效的手工 辦公方式，實(shí)現(xiàn)了快捷、全面的信息采集處理，為企業(yè)的管理和決策提供了方便。 辦公自動(dòng)化系統(tǒng)一般采用Internent/Intranet技術(shù)，基于工作流的概念，使企業(yè)內(nèi) 部人員方便地共享信息，高效地協(xié)同工作。本文首先對(duì)辦公自動(dòng)化系統(tǒng)及其發(fā)展 作了簡(jiǎn)單介紹，然后介紹了辦公自動(dòng)化系統(tǒng)的關(guān)鍵技術(shù)asp和sql語(yǔ)言。辦 公自動(dòng)化系統(tǒng)的開(kāi)發(fā)一般需要根據(jù)企業(yè)的需求量身定做。本文設(shè)計(jì)制作了一個(gè)具 有系統(tǒng)登錄、文件傳送及接收和新聞管理等三個(gè)模塊的辦公自動(dòng)化系統(tǒng)。關(guān)鍵詞：B/S結(jié)構(gòu) asp sql語(yǔ)言office automation syst

2、emAstractWith the application of computer and network prevailing, office automation has changed complicated, inefficient manual office in the past, enabling a fast and comprehensive information collection and processing for enterprise management and decision-making convenience. Office automation sys

3、tems are generally used Internent / Intranet technology, based on the concept of workflow, so that internal staff to share information easily and efficiently work together. Firstly, the development of office automation system and made a brief introduction, then introduced the key technologies of off

4、ice automation systemasp and sql language. Thedevelopment of office automation systems generally require tailor-made according to the needs of enterprises. This design produced a system registry, file transmission and reception and information management, office automation system of three modules.ke

5、ywords: Browser/Server asp sql language目錄摘要第一章辦公自動(dòng)化系統(tǒng)研究綜述1.1什么是辦公自動(dòng)化1.2辦公自動(dòng)化系統(tǒng)的發(fā)展演變第二章總體設(shè)計(jì)及關(guān)鍵技術(shù)2.1辦公自動(dòng)化系統(tǒng)總體設(shè)計(jì)2.2關(guān)鍵技術(shù)介紹第三張自動(dòng)化辦公系統(tǒng)的模塊開(kāi)發(fā)3.1系統(tǒng)登錄模塊3.2文件傳送接收模塊3.3新聞管理模塊四.總結(jié)致謝參考文獻(xiàn)第一章辦公自動(dòng)化系統(tǒng)研究綜述1.1什么是辦公自動(dòng)化?信息時(shí)代的到來(lái)使信息大量擁入，企業(yè)在信息處理方面應(yīng)接不暇。傳統(tǒng)的辦公模 式、對(duì)信息的處理方法，早已不能滿足企業(yè)對(duì)信息快速、準(zhǔn)確的處理的要求。一 個(gè)企業(yè)對(duì)信息數(shù)據(jù)的掌握程度、處理能力，體現(xiàn)了一個(gè)企業(yè)對(duì)市場(chǎng)的

6、敏感程度， 數(shù)據(jù)的真實(shí)性、準(zhǔn)確性直接決定著企業(yè)的發(fā)展方向。從傳統(tǒng)的辦公模式向自動(dòng)化 辦公管理模式轉(zhuǎn)變，提高企業(yè)的信息處理能力，以增強(qiáng)企業(yè)的市場(chǎng)競(jìng)爭(zhēng)力，成了 企業(yè)發(fā)展過(guò)程中的首要問(wèn)題。辦公自動(dòng)化（Office Automation,簡(jiǎn)稱OA）是將現(xiàn)代化辦公和計(jì)算機(jī)網(wǎng)絡(luò)功能 結(jié)合起來(lái)的一種新型的辦公方式。傳統(tǒng)的辦公自動(dòng)化系統(tǒng)采用客戶機(jī)和服務(wù) 器結(jié)構(gòu)，即C/S結(jié)構(gòu)，建立在計(jì)算機(jī)局部網(wǎng)絡(luò)基礎(chǔ)上的一種分布式信息處理系 統(tǒng)，是一種人機(jī)系統(tǒng)，其核心設(shè)備是數(shù)據(jù)庫(kù)系統(tǒng)或OA工作站。OA系統(tǒng)包括信 息采集、信息加工、信息傳輸和信息存取等四個(gè)基本環(huán)節(jié)。隨著技術(shù)的發(fā)展，現(xiàn) 代OA系統(tǒng)多采用B/S結(jié)構(gòu)，即Browser

7、/Server（瀏覽器/服務(wù)器）結(jié)構(gòu)，是對(duì)C/S 結(jié)構(gòu)的一種變化或者改進(jìn)的結(jié)構(gòu)。在這種結(jié)構(gòu)下，用戶界面完全通過(guò)WWW瀏 覽器實(shí)現(xiàn)，一部分事務(wù)邏輯在前端實(shí)現(xiàn)，但是主要事務(wù)邏輯在服務(wù)器端實(shí)現(xiàn)，形 成所謂3-tier結(jié)構(gòu)。B/S結(jié)構(gòu)，主要是利用了不斷成熟的WWW瀏覽器技術(shù)，結(jié) 合瀏覽器的多種Script語(yǔ)言（VBScript、JavaScript.）和ActiveX技術(shù)，用通用瀏 覽器就實(shí)現(xiàn)了原來(lái)需要復(fù)雜專用軟件才能實(shí)現(xiàn)的強(qiáng)大功能，并節(jié)約了開(kāi)發(fā)成本， 是一種全新的軟件系統(tǒng)構(gòu)造技術(shù)。隨著Windows 98/Windows 2000將瀏覽器技術(shù) 植入操作系統(tǒng)內(nèi)部，這種結(jié)構(gòu)更成為當(dāng)今應(yīng)用軟件的首選體系結(jié)

8、構(gòu)。顯然B/S結(jié) 構(gòu)應(yīng)用程序相對(duì)于傳統(tǒng)的C/S結(jié)構(gòu)應(yīng)用程序?qū)⑹蔷薮蟮倪M(jìn)步。1.2辦公自動(dòng)化系統(tǒng)的發(fā)展演變起步階段（1985年一1993年）：是以結(jié)構(gòu)化數(shù)據(jù)處理為中心，基于文件系統(tǒng) 或關(guān)系型數(shù)據(jù)庫(kù)系統(tǒng)，使日常辦公也開(kāi)始運(yùn)用IT技術(shù)，提高了文件等資料管 理水平。這一階段實(shí)現(xiàn)了基本的辦公數(shù)據(jù)管理（如文件管理、檔案管理等）， 但普遍缺乏辦公過(guò)程中最需要的溝通協(xié)作支持、文檔資料的綜合處理等，導(dǎo) 致應(yīng)用效果不佳。應(yīng)用階段（1993年一2002年）：隨著組織規(guī)模的不斷擴(kuò)大，組織越來(lái)越希望 能夠打破時(shí)間、地域的限制，提高整個(gè)組織的運(yùn)營(yíng)效率，同時(shí)網(wǎng)絡(luò)技術(shù)的迅 速發(fā)展也促進(jìn)了軟件技術(shù)發(fā)生巨大變化，為 OA的應(yīng)用提

9、供了基礎(chǔ)保證，這 個(gè)階段OA的主要特點(diǎn)是以網(wǎng)絡(luò)為基礎(chǔ)、以工作流為中心，提供了文檔管理、 電子郵件、目錄服務(wù)、群組協(xié)同等基礎(chǔ)支持，實(shí)現(xiàn)了公文流轉(zhuǎn)、流程審批、會(huì)議管理、制度管理等眾多實(shí)用的功能，極大地方便了員工工作，規(guī)范了組 織管理、提高了運(yùn)營(yíng)效率。發(fā)展階段OA應(yīng)用軟件經(jīng)過(guò)多年的發(fā)展已經(jīng)趨向成熟，功能也由原先的行政辦 公信息服務(wù)，逐步擴(kuò)大延伸到組織內(nèi)部的各項(xiàng)管理活動(dòng)環(huán)節(jié)，成為組織運(yùn)營(yíng) 信息化的一個(gè)重要組織部分。同時(shí)市場(chǎng)和競(jìng)爭(zhēng)環(huán)境的快速變化，使得辦公應(yīng) 用軟件應(yīng)具有更高更多的內(nèi)涵，客戶將更關(guān)注如何方便、快捷地實(shí)現(xiàn)內(nèi)部各 級(jí)組織、各部門以及人員之間的協(xié)同、內(nèi)外部各種資源的有效組合、為員工 提供高效的協(xié)

10、作工作平臺(tái)。第二章辦公自動(dòng)化系統(tǒng)總體設(shè)計(jì)和關(guān)鍵技術(shù)介紹2.1辦公自動(dòng)化系統(tǒng)總體設(shè)計(jì)設(shè)計(jì)目標(biāo)本系統(tǒng)是針對(duì)中小型企業(yè)內(nèi)部辦公自動(dòng)化的要求進(jìn)行設(shè)計(jì)的，主要實(shí)現(xiàn)如下 目標(biāo)：口系統(tǒng)采用人機(jī)對(duì)話方式，界面清晰、信息查詢靈活、方便、快捷、準(zhǔn)確、 數(shù)據(jù)存儲(chǔ)安全可靠?？谙到y(tǒng)運(yùn)行穩(wěn)定、安全可靠?？趯?shí)現(xiàn)了各類發(fā)文信息、公共信息的強(qiáng)大的管理能力?？谕晟频男侣劰芾硐到y(tǒng)，方便用戶對(duì)新聞的查看。模塊功能介紹系統(tǒng)主要包括以下功能模塊：系統(tǒng)登錄模塊：主要用于用戶登錄管理。文件收發(fā)模塊：主要包括收文管理、發(fā)文管理、文件批示管理。新聞管理模塊：主要包括顯示新聞、保存新聞、查看新聞。2.2關(guān)鍵技術(shù)介紹2.2.1 ASPASP是Act

11、ive Server Page （活動(dòng)服務(wù)頁(yè)面）的縮寫，是Microsoft公司開(kāi)發(fā)的Web服務(wù)器端腳本開(kāi)發(fā)環(huán)境，利用它可以生成動(dòng)態(tài)、高效的Web應(yīng)用程序。ASP網(wǎng)頁(yè)可以包含HTML標(biāo)記、普通文本、腳本命令以及 COM組件等，一 般用VBScript和JavaScript為腳本語(yǔ)言。利用ASP可以向網(wǎng)頁(yè)中添加交互式 內(nèi)容（如在線表單），也可以創(chuàng)建使用 HTML網(wǎng)頁(yè)作為用戶界面的 Web應(yīng) 用程序。與HTML相比，ASP網(wǎng)頁(yè)具有以下特點(diǎn)：（1）利用ASP可以實(shí)現(xiàn)突破靜態(tài)網(wǎng)頁(yè)的一些功能限制，實(shí)現(xiàn)動(dòng)態(tài)網(wǎng)頁(yè)技術(shù)；ASP文件是包含在HTML代碼所組成的文件中的，易于修改和測(cè)試；服務(wù)器上的ASP解釋程序會(huì)

12、在服務(wù)器端執(zhí)行 ASP程序，并將結(jié)果以H TML格式傳送到客戶端瀏覽器上，因此使用各種瀏覽器都可以正常瀏覽 AS P所產(chǎn)生的網(wǎng)頁(yè)；ASP提供了一些內(nèi)置對(duì)象，使用這些對(duì)象可以使服務(wù)器端腳本功能更強(qiáng)。例如可以從Web瀏覽器中獲取用戶通過(guò)HTML表單提交的信息，并在 腳本中對(duì)這些信息進(jìn)行處理，然后向Web瀏覽器發(fā)送信息；ASP可以使用服務(wù)器端ActiveX組件來(lái)執(zhí)行各種各樣的任務(wù)，例如存 取數(shù)據(jù)庫(kù)、發(fā)送Email或訪問(wèn)文件系統(tǒng)等。由于服務(wù)器是將ASP程序執(zhí)行的結(jié)果以HTML格式傳回客戶端瀏覽器， 因此使用者不會(huì)看到ASP所編寫的原始程序代碼，可防止 ASP程序代碼被 竊取。 方便連接ACCESS與S

13、QL數(shù)據(jù)庫(kù).2.2.2 sql 語(yǔ)言SQL(Structured Query Language)結(jié)構(gòu)化查詢語(yǔ)言，是一種數(shù)據(jù)庫(kù)查詢和程序設(shè) 計(jì)語(yǔ)言，用于存取數(shù)據(jù)以及查詢、更新和管理關(guān)系數(shù)據(jù)庫(kù)系統(tǒng)。它允許用戶在 高層數(shù)據(jù)結(jié)構(gòu)上工作，不要求用戶指定對(duì)數(shù)據(jù)的存放方法，也不需要用戶了 解具體的數(shù)據(jù)存放方式，所以具有完全不同底層結(jié)構(gòu)的不同數(shù)據(jù)庫(kù)系統(tǒng)可以 使用相同的SQL語(yǔ)言作為數(shù)據(jù)輸入與管理的接口。它以記錄集合作為操作對(duì) 象，所有SQL語(yǔ)句接受集合作為輸入，返回集合作為輸出，這種集合特性允 許一條SQL語(yǔ)句的輸出作為另一條SQL語(yǔ)句的輸入，所以SQL語(yǔ)句可以嵌 套，這使他具有極大的靈活性和強(qiáng)大的功能，在多

14、數(shù)情況下，在其他語(yǔ)言中 需要一大段程序?qū)崿F(xiàn)的功能只需要一個(gè)SQL語(yǔ)句就可以達(dá)到目的，這也意味 著用SQL語(yǔ)言可以寫出非常復(fù)雜的語(yǔ)句。第三章辦公自動(dòng)化系統(tǒng)的模塊開(kāi)發(fā)3.1系統(tǒng)登錄模塊系統(tǒng)登錄模塊主要用于驗(yàn)證用戶登錄系統(tǒng)時(shí)輸入的用戶名、密碼、驗(yàn)證碼是 否正確，如果正確用戶進(jìn)入系統(tǒng)，否則將不能進(jìn)入此系統(tǒng)。系統(tǒng)登錄頁(yè)面的設(shè)計(jì) 效果如圖所示。系統(tǒng)登錄頁(yè)面所涉及的HTML表單元素如表所示。系統(tǒng)登錄頁(yè)面所涉及的HTML表單元素名稱類型含義重要屬性formlForm表單action=check.asp?action=login method=POST”admin_nametext用戶名onFocus=this

15、.select();”onmouseover=this.style.background=#EAEAEA;”onmouseout=this.style.background=#FFFFFF”admin_passpassword密碼onFocus=this.select();”onmouseover=this.style.background=#EAEAEA;”onmouseout=this.style.background=#FFFFFF”verifycodetext驗(yàn)證碼onFocus=this.select();”onmouseover=this.style.background=#EAE

16、AEA;”onmouseout=this.style.background=#FFFFFF” size=6 maxlength=4”verifycode2hidden隱藏域value=”submitsubmit【登錄】按鈕class=input value=登錄”submit2reset【重填】按鈕value=重填”class=input”系統(tǒng)登錄頁(yè)面所涉及到的程序代碼如下：%dim verifycode,verifycode2verifycode=trim(Request.Form(verifycode)獲取輸入驗(yàn)證碼的值verifycode2=trim(Request.Form(verif

17、ycode2)應(yīng)用 Trim 函數(shù)替換字符串左右空格符if verifycodeverifycode2 then判斷輸入的驗(yàn)證碼與隨機(jī)產(chǎn)生的驗(yàn)證碼是否一致response.writealert(您輸入的驗(yàn)證碼不正 確。);response.writelocation.href=index.asp”elsesession(verifycode)=清空驗(yàn)證碼%if request(action)=login then 判斷表單是否接收到值 admin_name=request(admin_name)接收用戶名 admin_pass=request(admin_pass)接收用戶密碼username

18、=trim(request(admin_name)應(yīng)用 Trim 函數(shù)去掉左右 空格符password=trim(request(admin_pass)for i=1 to len(username)應(yīng)用len函數(shù)計(jì)算出用戶名的長(zhǎng)度 user=mid(username,i,1)判斷用戶名中是否含有非法字符if user= or user=%” or user= or user=& or user=| thenresponse.write &alert(您的用戶名含 有非法字符，請(qǐng)重新輸入！ ); & history.back() & ”response.endend ifnextfor i=1

19、 to len(password)判斷用戶密碼中是否含有非法字符pass=mid(password,i,1)if pass= or pass=% or pass= or upass=& or pass=l thenresponse.write vscript language=JavaScript & alert(您的密碼含 有非法字符，請(qǐng)重新輸入！ ); & history.back() & response.endend ifnext%set rs=server.createobject(adodb.recordset)sql=select * from users where usern

20、ame=&admin_name& and userpwd=&admin_pass&rs.open sql,conn,1,3if rs.eof then 判斷輸入的用戶名、密碼或驗(yàn)證碼是否正確response.write 對(duì)不起，您輸入的用戶名、密碼或驗(yàn)證碼有誤，從重新輸入，謝謝!本軟件建議您使用IE6.0以上版本，分辨率：1024*768否則一切后果與本軟件無(wú)關(guān)，特此聲明！ elsesession(admin_name)=request(admin_name)創(chuàng)建 session 階段變量response.Redirect(admin.asp)跳轉(zhuǎn)到指定的動(dòng)態(tài)頁(yè)end ifrs.closese

21、t rs=nothingconn.close關(guān)閉已打開(kāi)的記錄集set conn=nothing將不用的對(duì)象釋放掉end ifend if%系統(tǒng)登錄頁(yè)面的運(yùn)行結(jié)果如圖所示。3.2文件收發(fā)管理模塊日常管理模塊主要包括收文管理、發(fā)文管理、文件批示管理。3.2.1收文管理模塊收文管理主要用于顯示發(fā)文人、審批人、發(fā)文日期、發(fā)文標(biāo)題，通過(guò)單擊“發(fā) 文標(biāo)題”超鏈接，可以打開(kāi)收文的詳細(xì)信息頁(yè)面。收文信息以分頁(yè)形式進(jìn)行顯示。收文管理頁(yè)面所涉及到的程序代碼如下： maxpage then requestpage=maxpage end if if not requestpage=1 then rs.move (r

22、equest1)*rs.pagesize end if for i=1 to rs.pagesize and not rs.eof % f a href=#onClick=window.open(shouxian.asp?id=,”,scrollbars=yes, width=510,height=500) 3.2.2發(fā)文管理模塊發(fā)文管理主要包括發(fā)布發(fā)文、發(fā)文刪除兩部分。發(fā)布發(fā)文管理的相關(guān)程序代碼如下：%if request(post)=true then判斷表單是否提交call wri調(diào)用wri自定義函數(shù)end iffunction wriif request(title) and requ

23、est(content) then判斷發(fā)文的標(biāo)題、內(nèi)容是否為空set rs=server.CreateObject(adodb.recordset)sql=select * from fajian”rs.open sql,conn,1,3打開(kāi)記錄集rs.AddNewrs(title)=request(title)rs(content)=request(content)rs(name)=session(admin_name)rs(shen)=0添加發(fā)文屬于未審核rs(time)=now()根據(jù)計(jì)算機(jī)系統(tǒng)設(shè)定的日期和時(shí)間返回當(dāng)前的日期和時(shí)間值rs.updaters.closeresponse.Re

24、direct(chenggong.htm)跳轉(zhuǎn)到指定的動(dòng)態(tài)頁(yè)elseresponse.Write(alert(請(qǐng)把信息填寫完整)end ifend function%除了發(fā)布發(fā)文功能同時(shí)也設(shè)置了刪除發(fā)文的功能，單擊“刪除”超鏈接將刪 除指定的發(fā)文信息。發(fā)文刪除的程序代碼如下：%if request(del) then 判斷接收的del值不能等于空call delend iffunction delsql2=delete from fajian where id=&request(del)conn.Execute(sql2)執(zhí)行 sql 2 語(yǔ)句end function%a href=fagua

25、n.asp?del=&p= 刪除 3.2.3批示管理模塊批示管理主要包括發(fā)文批示、發(fā)文修改、發(fā)文刪除，只有當(dāng)用戶是超級(jí)用戶 才有權(quán)限進(jìn)行批示管理，普通用戶沒(méi)有此權(quán)限。當(dāng)審批之后，發(fā)文在收文管理頁(yè) 面中才能夠顯示出來(lái)。批示管理頁(yè)面所涉及到的程序代碼如下：%call case1if request(del) and (ps(shenhe)=1 or ps(chaoji)=1) then 判斷 用戶是否有權(quán)限刪除發(fā)文call delend iffunction delsql2=delete from fajian where id=&request(del)conn.Execute(sql2)執(zhí)行

26、sql 2 語(yǔ)句end functionif request(shen) and (ps(shenhe)=1 or ps(chaoji)=1) then判斷用戶是否有權(quán)限進(jìn)行審核call upend iffunction upset rs1=server.CreateObject(adodb.recordset)sql1=select * from fajian where id=&request(id)rs1.open sql1,conn,1,3rs1(shen)=request(shen)是否審核rs1(sname)=session(admin_name)獲取操作用戶名rs1.update

27、rs1.closeend function% 已審核a href=piguan.asp?shen=1&id= onClick=return confirm(確定審核嗎？)審核通過(guò)鼠標(biāo)單擊事件實(shí)現(xiàn)彈出提示框修改發(fā)文進(jìn)行修改所涉及到的程序代碼如下%call case1 驗(yàn)證用戶身份，此時(shí)調(diào)用inc/yan.asp文件,select case1set rs1=server.CreateObject(adodb.recordset)sql1=select * from fajian where id=&request(id)rs1.open sql1,conn,1,1 session(id)=rs1(

28、id) if rs1(shen)1 then判斷是否已審核if request(post)=true then判斷是否已接收表單的值call wri end if function wriif request(title) and request(content) then 判斷是否接收到值 set rs=server.CreateObject(adodb.recordset)sql=select * from fajian where id=&session(id)通過(guò) session(id)查找相關(guān)記錄rs.open sql,conn,1,3打開(kāi)記錄集rs(title)=request(t

29、itle)接收添加的標(biāo)題rs(content)=request(content)接收添加的內(nèi)容rs(time)=now()獲取當(dāng)前系統(tǒng)日期和時(shí)間rs.update rs.close response.Redirect(chenggong.htm)跳轉(zhuǎn)到發(fā)文修改成功頁(yè)面 elseresponse.Write(alert(請(qǐng)把信息填寫完整 ) end if end function if request(id)= then response.Redirect(piguan.asp) end if%3.3新聞管理模塊設(shè)計(jì)新聞管理模塊主要包括顯示新聞、保存新聞、查看新聞等功能。3.3.1顯示新聞為了便

30、于用戶管理新聞信息，NewsList.asp以表格形式顯示新聞名稱，并在 后面顯示修改鏈接和刪除復(fù)選框，代碼如下：%設(shè)置SQL語(yǔ)句，查詢表News中的新聞信息，讀取到rs對(duì)象中Dim rsSet rs = Server. CreateObject(ADODB.RecordSet”)Sql =Select * From News Order By CreateDate DescDim n 用來(lái)保存記錄數(shù)量 rs.Open sql,Conn,l,l，如果rs為空，則顯示提示信息If rs.EOF ThenResponse.Write 目 前還沒(méi)有新聞。Else 生成表格設(shè)置每頁(yè)記錄數(shù)量為15rs.

31、PageSize = 15設(shè)置并讀取頁(yè)碼參數(shù)pageiPage = CLng (Request (page”)If ipage rs.PageCount Then iPage = rs.PageCountEnd ifRowCount = rs.PageSize，依次顯示新聞信息Do While Not rs.EOF And RowCount 0 n = n+1rs.MoveNext()，控制每頁(yè)顯示記錄的數(shù)量RowCount = RowCount - 1Loop顯示頁(yè)碼鏈接If rs.PageCount 1 thenResponse.Write “分頁(yè)：For i= 1to rs.PageCo

32、untResponse.Write Response.Write &i&NextResponse.Write ”End ifEnd if%3.3.2保存新聞%Dim StriAction得到動(dòng)作參數(shù)，如果add則表示創(chuàng)建新聞，如果update則表示更改新聞StrAction = Request.QueryString( action)取得新聞?lì)}目、內(nèi)容和提交人用戶名Title = Trim(Request(title)Content =changechr (Trim(Requst(content)Poster =Session(admin_id)If strAction = “add Then，在數(shù)據(jù)庫(kù)表Board中插入新的新聞信息Sql =“Insertinto News (News Title, Content, CreateDa