【正文】 self39。user39。tname39。gname39。del39。 圖 31 分公司管理頁面設(shè)計效果 分公司管理頁面中所涉及到的 HTML重要表單元素如表 9所示。 圖 30 新聞查詢頁面運(yùn)行結(jié)果 分公司管理模塊設(shè)計 分公司管理模塊主要包括分公司添加、分公司修改、分公司刪除、分公司管理員的添加、分公司管理員的修改、分公司管理員的刪除、分公司管理員的顯示 7部分。 39。request(bianhao)amp。刪除指定的新聞記錄信息 (sql1) end if if request(pp) then set rs=() sql=select * from new where title like 39。判斷表單是否接收到值 sql1=delete from new where id=amp。 圖 28 運(yùn)單管理模塊的運(yùn)行結(jié)果 新聞管理模塊設(shè)計 新聞管理模塊主要包括新聞查詢、新聞添加 、新聞修改、新聞刪除 4部分， 新聞管理頁面的設(shè)計效果如圖 29所示。你確定刪除嗎？ 39。運(yùn)單刪除頁面所涉及到的程序代碼如下： a href=?del=%=rs(id)%amp。 – 28 – 圖 27 運(yùn)單修改頁面的運(yùn)行結(jié)果 4．運(yùn)單 刪除 運(yùn)單刪除主要用于管理員刪除運(yùn)單信息。/script) end if end function % 運(yùn)單修改時顯示選中下拉列表的內(nèi)容，實(shí)現(xiàn)此功能所涉及到的程序代碼如下： td select name=lei 39。location=39。請把信息填寫完整39。request(id) 39。 – 27 – post hidden 隱藏域 id=post value=true 運(yùn)單修改頁面所涉及到的相關(guān)程序代碼如下： % set rs1=() sql1=select * from yundan where id =amp。 表 8 運(yùn)單修改頁面中所涉及到的 HTML 表單元素 名稱 類型 含義 重要屬性 form1 form 表單 method=post start text 寄件地 class=kuang id=start value=%=rs1(start)% mudidi text 目的地 class=kuang id=mudidi value=%=rs1(mudidi)% ctime text 寄件時間 class=kuang id=ctime value=%=rs1(ctime)% fg select 指派分公司 % set rs=() sql=select * from fgongsi sql,conn,1,1 if then%option－暫無公司－ /option%else for i=1 to and not %optionvalue=%= rs(fengongsi)%%=rs(fengongsi)%/option % if then exit for next end if % beizhu textarea 備注 cols=30rows=5class=kuang id=beizhu%=rs1(beizhu)% Submit submit 【提交】按鈕 value=提交 Submit2 reset 【重置】按鈕 value=重置 Submit3 reset 【返回】按鈕 onClick=location=39。運(yùn)單修改頁面的設(shè)計效果如圖 26所示。/script) end if end function % 3．運(yùn)單修改 運(yùn)單修改主要用于管理員修改運(yùn)單信息。location=39。請把信息填寫完整39。39。)。獲取當(dāng)前系統(tǒng)日期和時間 (script language=javascriptalert(39。此模塊主要用于添加運(yùn)單詳細(xì)信息 rs(nid)=t rs(start)=request(start) rs(mudidi)=request(mudidi) rs(ctime)=request(ctime) rs(fg)=request(fg) rs(fgzhuangtai)=途中 rs(zhuangtai)=途中 rs(beizhu)=request(beizhu) 39。 sql2,conn,1,1 if not then t=year(date)*1000000000+month(date())*10000000+day(date())*100000++1 else t=year(date)*1000000000+month(date())*10000000+day(date())*100000+1 end if if request(post) then call writ end if function writ if request(start) and request(mudidi) and request(ctime) and request(beizhu) then 39。date()amp。檢索當(dāng)前日期是否有運(yùn)單 sql2=select * from yundan where time like 39。39。 圖 25 運(yùn)單添加頁面的設(shè)計效果 運(yùn)單添加頁面中所涉及的 HTML表單元素如表 7所示。運(yùn)單添加頁面主要由兩部分組成，即用于收集運(yùn)單信息的前臺表 單部分和用于對數(shù)據(jù)庫進(jìn)行操作的后臺處理部分。查看是否有運(yùn)單記錄 next else (沒有運(yùn)單 ) end if % 運(yùn)單查詢頁面運(yùn)行結(jié)果如圖 24所示。你確定刪除嗎？ 39。實(shí)現(xiàn)分頁顯示 if not then tol= show=15 =show maxpage= requestpage=clng(request(p)) if requestpage= or requestpage=0 then requestpage=1 end if if requestpagemaxpage then requestpage=maxpage end if if requestpage1 then (requestpage1)* end if for i=1 to and not % td bgcolor=FFFFFFdiv align=center a href=?del=%=rs(id)%amp。應(yīng)用 DESC進(jìn)行排序 sql,conn,1,1 End If % 在運(yùn)單查詢頁面中對顯示的所有運(yùn)單信息進(jìn)行分頁顯示，并對當(dāng)前的頁碼進(jìn)行統(tǒng)計。39。amp。執(zhí)行 sql1語句 end if if request(pp) then 39。request(del) 39。 圖 23 運(yùn)單查詢頁面設(shè)計結(jié)果 運(yùn) 單查詢頁面中所涉及到的 HTML表單元素如表 6所示。 圖 22 運(yùn)單管理頁面的設(shè)計效果圖 1．運(yùn)單查詢 運(yùn)單查詢是指當(dāng)用戶 /管理員輸入正確的運(yùn)單編號后，單擊【查找】按鈕，可以查詢到運(yùn)單詳細(xì)信息。接收要修改的內(nèi)容 () end function % 運(yùn)單管理模塊設(shè)計 運(yùn)單管理模塊主要包括運(yùn)單查詢、運(yùn)單添加、運(yùn)單修改、運(yùn)單刪除 4部分。表單提交進(jìn)入處理模塊 end if function ed set rs1=() – 22 – sql1=select * from news where id=amp。request(id) sql,conn,1,1 if request(post) then 39。 圖 21 公司簡介管理模塊的頁面設(shè)計效果圖 通過以下程序代碼進(jìn)行 ID值的傳遞，程序代碼如下： a href=adminconn/?id=1 target=mainFrame公司簡介管理 /a｜ a href=adminconn/?id=1 target=mainFrame/a a href=adminconn/?id=2 target=mainFrame倉儲服務(wù) /a｜ a href=adminconn/?id=1 target=mainFrame/a a href=adminconn/?id=3 target=mainFrame運(yùn)輸服務(wù) /a｜ a href=adminconn/?id=1 target=mainFrame/a a href=adminconn/?id=4 target=mainFrame配送服務(wù) /a｜ a href=adminconn/?id=1 target=mainFrame/a a href=adminconn/?id=5 target=mainFrame聯(lián)系我們 /a｜ 公司簡介管理模塊所涉及到的相關(guān)程序代碼如下： % if request(id) then 39。 圖 20 初始化信息管理模塊運(yùn)行結(jié)果圖 公司簡介管理模塊設(shè)計 公司簡介管理模塊主要包括公司簡介內(nèi)容修改。指定當(dāng)前第一條記錄 sql1,conn,1,3 rs1(title)=request(title) 39。../39。)。接收要修改的用戶密碼 (script language=javascriptalert(39。/script) else set rs=() sql=select * from admin where id=1 sql,conn,1,3 rs(admin_name)=request(admin_name) 39。location=39。兩次輸入密碼不一致39。判斷是否接收到表單的值 call pwd end if if request(action)=chang2 then call tit end if function pwd if request(admin_pwd)request(admin_pwd2) then 39。 圖 19 后臺登錄模塊的 運(yùn)行結(jié)果 初始化信息管理模塊設(shè)計 初始化信息管理模塊主要包括管理員信息修改、系統(tǒng)名稱修改兩部分。應(yīng)用 session創(chuàng)建階段變量 () 39。 sql,conn,1,3 if then 39。admin_passamp。and admin_pwd=39。admin_nameamp。 /script end if next % %set rs=() sql=select * from admin where admin_name=39。 amp。您的密碼含有非法字符 ,請重新輸入！ 39。 or pass=| then script language=JavaScript amp。通過 len函數(shù)求出用戶密碼的長度 pass=mid(password,i,1) if pass=39。 () amp。)。 alert(39。 or user=% or user= or user= or user=amp。通過 len函數(shù)計算用戶名的長度 user=mid(username,i,1) 39。應(yīng)用 trim替換用戶名左右兩邊的空格 password=trim(replace(request(admin_name),39。接收用戶名 admin_pass=request(admin_pass) username=trim(replace(request(admin_name),39。清空隨機(jī)驗(yàn)證碼 % % if request(action)=login then 39。39。)。您輸入的驗(yàn)證碼不正確。size=6 maxlength=4 verifycode2 hidden 隱藏域 value=%=session(verifycode)% – 19 – Submit image 圖像區(qū)域 value=提交 src=images/ 后臺登錄頁面的完整代碼如下： % dim verifycode,verifycode2 verifycode=trim((verifycode)) verifycode2=trim((verifycode2)) if verifycodeverifycode2 then 39。 onMouseOut==39。 onouseOver=