【正文】 me=39。通過call語句調(diào)用del模塊end iffunction delsql2=delete from where id=amp。設置默認值if request(del) then 39。個人郵件管理頁面的設計效果如圖 17 所示。)/script)end if end function%個人活動管理頁面的運行結(jié)果，如圖 16 所示。跳轉(zhuǎn)到指定的動態(tài)頁面else (script language=javascriptalert(39。獲取當前系統(tǒng)日期和時間 39。接收修改發(fā)文內(nèi)容rs(name)=session(admin_name) 39。session(id) sql,conn,1,3rs(title)=request(title) 39。判斷表單是否提交call wriend if function wriif request(title) and request(content) then 39。request(id) sql1,conn,1,1session(id)=rs1(id) 39。將個人活動信息進行降序排列 sql,conn,1,1%當用戶為普通用戶時只可以修改發(fā)文。request(del) 39。接收批準用戶名end functionif request(del) then 39。判斷是否接收到表單的值call gerenend iffunction gerenset rs2=()sql2=select * from gerenhuodong where id=amp。圖 15 個人活動管理頁面的設計效果當用戶為超級用戶時可以批準發(fā)文、刪除發(fā)文。當用戶是超級用戶時可以對個人活動信息進行批準和刪除操作；而普通用戶只能對信息進行修改。獲取當前系統(tǒng)日期和時間()end if end function%個人活動登記管理頁面的運行結(jié)果如圖 14 所示。接收個人活動登記標題rs(content)=request(content) 39。請把內(nèi)容填寫完整！39。17 / 42圖 13 個人活動登記管理頁面的設計效果個人活動登記管理頁面所涉及的相關的程序代碼如下：%if request(post)=2 then 39。? 個人活動登記管理模塊個人活動登記管理模塊主要用于添加個人活動記錄。請把信息填寫完整39。接收發(fā)布會議的內(nèi)容rs(name)=session(admin_name)rs(time)=now() 39。接收的會議標題、會議內(nèi)容不允許為空set rs=()sql=select * from huiyi sql,conn,1,3rs(title)=request(title) 39。request(id) sql1,conn,1,1%會議發(fā)布所涉及到的程序代碼如下：%call case2if request(post)=true and (ps(huiyi)=1 or ps(chaoji)=1) then 39。請把信息填寫完整39。接收進行修改的會議標題rs(content)=request(content)rs(time)=now() 39。通過call語句調(diào)用function過程end if function wriif request(title) and request(content) and (ps(huiyi)=1 or ps(chaoji)=1) then set rs=()sql=select * from huiyi where id=amp。驗證用戶身份此時調(diào)用inc/ case2if request(post)=true then 39。會議修改頁面的設計效果如圖 12 所示。圖 11 會議管理頁面運行結(jié)果在會議管理頁面，單擊“修改”超鏈接，進入會議信息修改頁面后，用戶可以對會議的標題、內(nèi)容進行修改。p=%=requestpage%刪除/a 39。request(del)(sql2) 39。驗證用戶身份，此時調(diào)用inc/ case2if request(del) then 39。會議管理頁面的設計效果如圖 10 所示。圖 9 批示管理頁面的運行結(jié)果 會議管理模塊設計會議管理主要包括會議修改、會議刪除、會議發(fā)布 3 部分。請把信息填寫完整39。獲取當前系統(tǒng)日期和時間() 39。接收添加的標題rs(content)=request(content) 39。通過session(id)查找相關記錄 sql,conn,1,3 39。判斷是否接收到值13 / 42set rs=()sql=select * from fajian where id=amp。判斷是否已審核if request(post)=true then 39。驗證用戶身份,此時調(diào)用inc/,select case1set rs1=()sql1=select * from fajian where id=amp。)審核/a 39。id=%=rs(id)% onClick=return confirm(39。獲取操作用戶名end function%%set rs=()sql=select * from fajian order by time desc 39。request(id) sql1,conn,1,3rs1(shen)=request(shen) 39。執(zhí)行sql2語句end functionif request(shen) and (ps(shenhe)=1 or ps(chaoji)=1) then 39。判斷用戶是否有權限刪除發(fā)文call delend iffunction delsql2=delete from fajian where id=amp。批示管理頁面的設計效果如圖 8 所示。圖 7 發(fā)文刪除頁面的運行結(jié)果 批示管理模塊設計批示管理主要包括發(fā)文批示、發(fā)文修改、發(fā)文刪除，只有當用戶是超級用戶才有權限進行批示管理，普通用戶沒有此權限。打開記錄集%a href=?del=%=rs(id)%amp。39。amp。request(del)(sql2) 39。發(fā)文刪除的程序代碼如下：%if request(del) then 39。根據(jù)計算機系統(tǒng)設定的日期和時間返回當前的日期和時間值() 39。打開記錄集rs(title)=request(title)rs(content)=request(content)rs(name)=session(admin_name)rs(shen)=0 39。調(diào)用wri自定義函數(shù)end if function wriif request(title) and request(content) then 39。發(fā)布發(fā)文管理的相關程序代碼如下：%if request(post)=true then 39。)%=rs(title)%/a/td td height=26 bgcolor=FFFFFF div align=center%=rs(name)%/div/td td height=26 bgcolor=FFFFFF div align=center%=rs(sname)%/div/td td bgcolor=FFFFFF div align=center%=rs(time)%/div/td/tr% if then exit for 39。,39。,39。設置默認值 end if if requestpagemaxpage then requestpage=maxpage end if if not requestpage=1 then (requestpage1)* end if for i=1 to and not % tr td height=26 bgcolor=FFFFFFspan class=style3→/span a href= onClick=(39。獲取記錄集的總數(shù) shum=15 =shum maxpage= 39。收文管理頁面的設計效果如圖 6 所示。 收文管理模塊設計收文管理主要用于顯示發(fā)文人、審批人、發(fā)文日期、發(fā)文標題，通過單擊“發(fā)文標題”超鏈接，可以打開收文的詳細信息頁面。將不用的對象釋放掉end ifend if%系統(tǒng)登錄頁面的運行結(jié)果如圖 5 所示。跳轉(zhuǎn)到指定的動態(tài)頁end if set rs=nothing 39。判斷輸入的用戶名、密碼或驗證碼是否正確 brbrbrbrfont size=2center對不起，您輸入的用戶名、密碼或驗證碼有誤，從重新輸入，謝謝！brbr，分辨率：1024*768brbr否則一切后果與本軟件無關，特此聲明！/fontelsesession(admin_name)=request(admin_name) 39。39。amp。39。amp。 () amp。)。 alert(39。 or pass=% or pass= or pass= or upass=amp。 /scriptend ifnext for i=1 to len(password) 39。 amp。您的用戶名含有非法字符,請重新輸入！39。 or user=| then script language=JavaScriptamp。判斷用戶名中是否含有非法字符if user=39。應用Trim函數(shù)去掉左右空格符password=trim(request(admin_pass))for i=1 to len(username) 39。接收用戶名admin_pass=request(admin_pass) 39。清空驗證碼%% if request(action)=login then 39。39。)。您輸入的驗證碼不正確。應用Trim函數(shù)替換字符串左右空格符7 / 42if verifycodeverifycode2 then 39。 size=6 maxlength=4verifycode2 hidden 隱藏域value=%=session(verifycode)%submit submit 【登錄】按鈕 class=input value= 登 錄 submit2 reset 【重填】按鈕 value= 重 填 class=input系統(tǒng)登錄頁面所涉及到的程序代碼如下：% dim verifycode,verifycode2 verifycode=trim((verifycode)) 39。 onmouseout==39。 onmouseover==39。FFFFFF39。EAEAEA39。admin_pass password 密碼onFocus=()。 onmouseout==39。 onmouseover==39。圖 4 系統(tǒng)登錄頁面設計效果系統(tǒng)登錄頁面所涉及的 HTML 表單元素如表 2 所示。表 1 網(wǎng)站首頁解析區(qū)域 名稱 說明 對應文件1 旗幟廣告區(qū) 用于顯示網(wǎng)站的標識、標題 2 日常管理區(qū) 主要用于日常工作管理 3 業(yè)務管理區(qū) 主要用于業(yè)務管理 4 用戶管理區(qū) 主要用于管理用戶的添加、修改、注銷 5 展示區(qū) 主要用于顯示相關操作或其他內(nèi)容列表 5 系統(tǒng)登錄模塊設計系統(tǒng)登錄模塊主要用于驗證用戶登錄系統(tǒng)時輸入的用戶名、密碼、驗證碼是否正確，如果正確用戶進入系統(tǒng)，否則將不能進入此系統(tǒng)。5 / 42 網(wǎng)站首頁的運行結(jié)果網(wǎng)站首頁的運行結(jié)果如圖 3 所示。? 用戶管理模塊：主要包括超級用戶、普通用戶兩種登錄情況。? 日常管理模塊：主要包括收文管理、發(fā)文管理、批示管理、會議管理、公共信息管理、個人辦公管理、人事管理 7 部分。數(shù)據(jù)庫中的數(shù)據(jù)表請參見附錄 B。 邏輯結(jié)構設計本系統(tǒng)數(shù)據(jù)庫采用 SQL Server 2022 數(shù)據(jù)庫，系統(tǒng)數(shù)據(jù)庫名稱為 db_off