【正文】 錄條數(shù) if or then exit for % 修改 首頁(yè) 公告 代碼： =true 39。 ,conn,3,2 rs(title)=title 39。pwd=xh dim filepath 39。使用虛擬路徑進(jìn)行賦值 filepath=(filepath) 39。file_subjectamp。savepathamp。persizeamp。vbcrlf end if (script alert(39。39。,39。)) 部門(mén) 修改 代碼 : (update dep set jl=39。 where bm=39。,39。 修改管理員 代碼： set rs=() (update dep set jl=39。 where bm=39。提示流數(shù)據(jù)類(lèi)型，這里為二進(jìn)制類(lèi)型 =3 =1 formfilefield=chr(34)amp。文件格式限制 fnn=split(upfilename,.) 39。打開(kāi)流對(duì)象 write formdata 39。 參考文獻(xiàn) [1] 劉瑞新 ,張兵義 ,常永英 . ASP動(dòng)態(tài)網(wǎng)站開(kāi)發(fā)畢業(yè)設(shè)計(jì)指導(dǎo)及實(shí)例 [M].北京：機(jī)械工業(yè)出版社， 2021。 [7] 方睿 ,吳四九 .網(wǎng)絡(luò)數(shù)據(jù)庫(kù)原理及應(yīng)用 [M].成都： 四川大學(xué)出版社 ,2021。 本系統(tǒng)以簡(jiǎn)單易用、功能強(qiáng)大、界面友好、性能穩(wěn)定為原則 ， 基本完成了企業(yè)公告及資料 發(fā)布 系統(tǒng)的功能，以及企業(yè)的日常管理工作功能。bCrLf)+4 filelen=instrb(startpos,formdata,divider)2filestart if filelen=maxsize*1024 then 39。指定默認(rèn)最大上傳文件為 5MB end if do while startpos 0 39。保存文件 =3 39。phoneamp。nameamp。nameamp。phoneamp。phoneamp。bmamp。/amp。)。,39。,39。(39。定義文件大小 dim bm savepath=savepath 39。 delsql 文件管理模塊 保存上傳文件 () % set conn=() =dsn=xh。idamp。pagecount返回 recordset對(duì)象的分頁(yè)總數(shù) intpage = last = false else 第 20 頁(yè) 共 27 頁(yè) intpage = cint(page) end if end if end if if not then = intpage 39。=。amp。amp。/script end if end if % 修改用戶(hù)信息 () 在企業(yè)中為了能確保用戶(hù)個(gè)人信息的安全性及準(zhǔn)確性，用 戶(hù)有權(quán)更改自己的個(gè)人信息。phoneamp。departmentamp。pwdamp。/script else if pwd=okpwd then 39。確認(rèn)密碼 business=trim((business)) 39。pwd=xh set rs=() % 登錄 模塊實(shí)現(xiàn) 用戶(hù)登陸 () 用戶(hù)登錄時(shí)采用的身份驗(yàn)證算法如圖 46 所示： 第 17 頁(yè) 共 27 頁(yè) 圖 4－ 6用戶(hù)身份驗(yàn)證 其實(shí)現(xiàn)代碼： while not user=trim((username)) 39。系統(tǒng)管理員對(duì)部門(mén)有添加、修改、刪除的管理功能，同時(shí)能夠?qū)Σ块T(mén)發(fā)送資料（公文），并對(duì)部門(mén)所上傳的資料（公文）能做相應(yīng)的回復(fù)的。 其具體實(shí)現(xiàn)流程圖如圖 43： 圖 43 提交工 作報(bào)告 子系統(tǒng) 流程圖 修改個(gè)人信息 此模塊部分用來(lái)確保用戶(hù)信息的安全，登陸用戶(hù)可修改 自己 的個(gè)人信息資料，如電話號(hào)碼，登錄密碼等。查看的內(nèi)容包括公告主題、公告發(fā)布人、公告發(fā)布時(shí)間、公告內(nèi)容等詳細(xì)內(nèi)容，滿足企業(yè)內(nèi)部信息交流。企業(yè)公告及資料上傳系統(tǒng)數(shù)據(jù)庫(kù)中共有 六 張 表：用戶(hù)信息表 如表 3管理員信息表 如表 3 上傳文件 信息表 如表 3 公告發(fā)布 信息 表 如表 3留言薄 如表 3 部門(mén)信息表 如表 38。企業(yè)的用戶(hù)主要有管理員、企業(yè)員工、訪客， 他們 以不同的身份登錄系統(tǒng)，會(huì)分配到不同的權(quán)限。比如：公告發(fā)布和提交工作報(bào)告。如何實(shí)現(xiàn)利用現(xiàn)代網(wǎng)絡(luò)技術(shù)傳遞信息，成為解決問(wèn)題的關(guān)鍵。 (1) Connection 對(duì)象：建立與后臺(tái)數(shù)據(jù)庫(kù)的連接； 該對(duì)象提供了一種高效方便安全的數(shù)據(jù)庫(kù)連接方案。 （ 4） 用戶(hù)信息存取工具：提供給非專(zhuān)業(yè)人員信息存取工具，使非專(zhuān)業(yè)人員通過(guò)可視化操作即可實(shí)現(xiàn)查詢(xún)等處理。 (4) Response 對(duì)象：服務(wù)器將輸出內(nèi)容發(fā)送到用戶(hù)端。 ASP 的運(yùn)行環(huán)境 目前 ASP 可運(yùn)行在三種環(huán)境下： (1) WINDOWS NT server 運(yùn)行 IIS (Inter Information Server)以上。 (2) 使用普通的文本編輯器，如 Windows 的記事本，即可進(jìn)行編輯設(shè)計(jì)，還可運(yùn)用 Dreamweaver 所見(jiàn)即所得的網(wǎng)頁(yè)編輯軟件快捷方便地進(jìn)行編輯，易學(xué)易用。 (2) 易用性： B/S 結(jié)構(gòu)使用戶(hù)端不必安裝任何軟件，只要有瀏覽器并連接到Inter 即可使用，免除了非專(zhuān)業(yè)人員維護(hù)系統(tǒng)的困難。而網(wǎng)絡(luò)是解決由于物理距離造成的信息交流不暢、協(xié)商溝通不便的辦公瓶頸問(wèn)題的最佳方式?？茖W(xué)的運(yùn)用計(jì)算機(jī)技術(shù)進(jìn)行信息管理不僅可以使管理工作規(guī)范化、系統(tǒng)化、自動(dòng)化而且可以 節(jié)省相當(dāng)?shù)娜肆?、物力?？茖W(xué)的運(yùn)用計(jì)算機(jī)技術(shù)進(jìn)行 信息 管理不僅可以使管理工作規(guī)范化、系統(tǒng)化、自動(dòng)化而且可以節(jié)省相當(dāng)?shù)娜肆?、物力?同時(shí)，系統(tǒng)對(duì)用戶(hù)進(jìn)行了分級(jí)管理，提高了系統(tǒng)的安全性。在此基礎(chǔ)上 本系統(tǒng)將 ASP技術(shù)作為 WEB應(yīng)用程序的重要開(kāi)發(fā)工具實(shí)現(xiàn)了其中的基本功能，包括： 文件管理，部門(mén)管理，公告管理，管理員管理 ，用戶(hù)管理 和留言簿管理 等功能 。當(dāng)前越來(lái)越多的商業(yè)、企事業(yè)單位已經(jīng)將計(jì) 算機(jī)技術(shù)應(yīng)用于日常的 信息 管理工作。當(dāng)前越來(lái)越多的商業(yè)、企事業(yè)單位已經(jīng)將計(jì)算機(jī)技術(shù)應(yīng)用于日常的信息管理工作。因?yàn)槠髽I(yè)也已不再滿足傳統(tǒng)、獨(dú)立、零散的信息發(fā)布方式了，企業(yè)要的是協(xié)同工作、綜合、集成化的解決方案。 其具體特點(diǎn)如下： (1) 通用性：基于先進(jìn)的系統(tǒng)模型，使得系統(tǒng)能夠適用于不同行業(yè)、不有規(guī)模的用戶(hù)。以下是 ASP 所獨(dú)具的一些特點(diǎn)： 以下是 ASP 獨(dú)具的一些特點(diǎn)： (1) 使用 VBScript、 JScript 等簡(jiǎn)單易懂的腳本語(yǔ)言，同時(shí)結(jié)合 HTML 代碼，即可快速地完成網(wǎng)站 的應(yīng)用程序。 ASP 優(yōu)于其它編程語(yǔ)言的是， ASP 是一種“無(wú)須編程”的軟件開(kāi)發(fā)工具， 即是說(shuō)簡(jiǎn)單易用，用簡(jiǎn)單的幾個(gè)語(yǔ)句，即可對(duì)數(shù)據(jù)庫(kù)進(jìn)行操作。 (3) Request 對(duì)象：從用戶(hù)端取得信息傳遞給服務(wù)器，是 ASP 讀取用戶(hù)輸入的主要方法。 （ 3） 應(yīng)用程序開(kāi)發(fā) 工具：提供 TransactSQL、應(yīng)用程序接口及應(yīng)用程序的設(shè)計(jì)和優(yōu)化功能。 ADO 主要包括 connection， recordset和 mand 等七個(gè) 對(duì)象 和四個(gè)集合 , 它們的主要功能如下 ： ADO 組件主要提供了以下七個(gè)對(duì)象和四個(gè)集合來(lái)訪問(wèn)數(shù)據(jù)庫(kù)。 我們就提出一種新的信息 傳遞 方法，既能滿足當(dāng)前企業(yè)需要， 操作簡(jiǎn)單，易于維護(hù)，且 為二次開(kāi)發(fā) 提供了可擴(kuò)充 性 。安全性控制這個(gè)先決性條件解決后，企業(yè)對(duì)內(nèi)、對(duì)外的信息傳遞才能更好地實(shí)現(xiàn)。 企業(yè)公告及資料發(fā)布貫穿 于 企業(yè) 信息傳遞 的整個(gè)過(guò)程，在這個(gè)過(guò)程中，各項(xiàng)業(yè)務(wù)都有自己的操作流程。在實(shí)體以及實(shí)體之間關(guān)系的基礎(chǔ)上，形成數(shù)據(jù)庫(kù)中的表格以及各個(gè)表格之間的關(guān)系。單位內(nèi)部職員通過(guò)點(diǎn)擊查看企業(yè)內(nèi)部所發(fā)部的緊急通知，會(huì)議通知等消息。總的來(lái)說(shuō)，文件上傳就是一個(gè)實(shí)現(xiàn)資源共享，提高企業(yè)信息化的有效途徑。 （ 3）部門(mén)信息管理 部門(mén)是企業(yè)生存的一個(gè)載體。uid=xh。密碼 okpwd=trim((password2)) 39。=。amp。amp。amp。=。,E_mail=39。,phone=39。,conn set rst=nothing else scriptalert( 兩 次 密 碼 輸 入 不 一 致 , 請(qǐng) 重 新 輸 入 ! )。記錄下載到瀏覽器端 sql,conn, 2,2 pre = true last = true page = trim((page) if len(page) = 0 then intpage = 1 pre = false else if cint(page) = 1 then intpage = 1 pre = false else if cint(page) = then 39。amp。39。定義文件保存路徑變量 dim maxfilesize 39。在上傳文件沒(méi)有錯(cuò)誤情況下，把得到的文件信息保存到數(shù)據(jù)庫(kù)中 sql=insert into docinformation (doc_name,context,doc_size,dep,path)_ values(sql=sqlamp。39。39。39。rs(upfilepath)amp。amp。amp。amp。amp。amp。amp。 Savefile()函數(shù)的關(guān)鍵代碼： % function SaveFile(formfilefield,path,maxsize,savtype) 39。\ 第 24 頁(yè) 共 27 頁(yè) end if if len(trim(maxsize))=0 then maxsize=5*1024 39。然后報(bào)錯(cuò) exit do if upfilename then filestart=instrb(startpos,formdata,bCrLfamp。本系統(tǒng)主要運(yùn)用 Microsoft ASP 作為開(kāi)發(fā)工具，綜合現(xiàn)代的企業(yè)管理模式，企業(yè)實(shí)際的需求，為適應(yīng)信息化、高效率的現(xiàn)代辦公要求而推出的一套操作簡(jiǎn)便，能夠自我維護(hù)、自我管理、自我實(shí)施的高度集成化的信息管理平臺(tái) 。 [6] 李嚴(yán)等 .ASP數(shù)據(jù)庫(kù)開(kāi)發(fā)實(shí)例解析 [M].北京：機(jī)械工業(yè)出版社 ,2021。 [2] 屈喜龍 ,朱杰 . ASP+SQL Server 開(kāi)發(fā)動(dòng)態(tài)網(wǎng)站實(shí)例薈萃 [M].北京：機(jī)械工業(yè)出版社，2021。向流中 輸 入字節(jié)數(shù)據(jù) position=filestart1 39。文件名與擴(kuò)展名使用 split函數(shù)分割 intfnn=ubound(fnn) fileextname=trim(fnn(intfnn)) 39。formfilefieldamp。amp。amp。amp。amp。amp。amp。 target=rightamp。 您 已 經(jīng) 成 功 上 傳=39。39。39。39。將虛擬路徑轉(zhuǎn)換為磁盤(pán)路徑 fileext==GetFromVal(fileext) 39。定義文件路徑變量 第 21 頁(yè) 共 27 頁(yè) dim fileext 39。將表單中修改的值保存到數(shù)據(jù)記錄中 rs(context)=context 刪除公告 : id=Request(id) 39。設(shè)置啟用瀏覽器的緩沖處理 =0 39。user_nameamp。 where user_name=39。,address=39。 set rst=() update userinforma set 第 19 頁(yè) 共 27 頁(yè) pwd=39。amp。amp。amp。amp。電子郵件 phone=trim((phone)) 39。判斷輸入 的用戶(hù)名與密碼是否正確 session(name)=rs(name) 39。以確保各部 門(mén) 信息 資料 的 準(zhǔn)確性和安全性，管理員能夠?qū)⒏鱾€(gè)不同部門(mén)上傳及所能下載到的資料（公文）分類(lèi)分別存放到各個(gè)部門(mén)的文件夾當(dāng)中。系統(tǒng)管理的好與否決定著整個(gè)系統(tǒng)的是否穩(wěn)定。文件上傳下載實(shí)現(xiàn)的不僅僅是資料意義上的共享，還可以有效降低企業(yè)成本、提高效率。 其具體實(shí)現(xiàn)流程圖如圖 41： 圖 41 登陸 子系統(tǒng) 流程圖 公告發(fā)布模塊 了解到市場(chǎng)及企業(yè)的需要，系統(tǒng)管理員及時(shí)向外部發(fā)布產(chǎn)品、人才供求信息，以取得更多的商機(jī)和更多的優(yōu)秀人才。 在管理員創(chuàng)建了員工的登錄賬號(hào)之后，員工可以根據(jù)管理員設(shè)定的賬號(hào) 、密碼 登錄， 成功登錄后 可以對(duì)自己的個(gè)人信息進(jìn)行 修改 ，可以查看企業(yè)通知，同時(shí)查看自己任職 的信息，工作安排 ，提交個(gè)人工作報(bào)告 等，并可以通過(guò)留言板提出對(duì)企業(yè)的 意見(jiàn)和建議 ，以促進(jìn)企業(yè)以人為本的和諧發(fā)展。而不是傳統(tǒng)意義上的先在客戶(hù)或辦事點(diǎn)整 理 好文檔后再回到公司交 給 相 關(guān)部門(mén)，最