【正文】 ypeid=4會(huì)展中心/AA href=?Typeid=5餐飲美食/AA href=?Typeid=6商務(wù)中心/Aa href=?Typeid=7其他/a通過以下代碼判斷記錄集是否為空，也就是判斷是否有符合條件的記錄，如沒有符合條件的記錄系統(tǒng)將給予提示。圖 7 客房服務(wù)管理頁面設(shè)計(jì)效果客房服務(wù)管理頁面主要用于顯示客房的相關(guān)信息，程序代碼如下：% set rs=()39。 CHR(10), /PP) fString = Replace(fString, CHR(10), BR)fString = Replace(fString, CHR(32), ) HTMLcode = fStringend ifend function%table width=97% border=0 align=left cellspacing=1 bgcolor=000000 % If not Then tol=for i=1 to tol %% 39。判斷當(dāng)前記錄指針是否到達(dá)記錄尾next else(暫無信息)end if % /table 在線訂房管理模塊設(shè)計(jì)在線訂房管理主要用于在線預(yù)訂客房，在進(jìn)行在線訂房時(shí)，所填寫的登記信息必須真實(shí)有效，否則不能預(yù)期正確地進(jìn)行客房預(yù)訂。圖 8 在線訂房管理頁面設(shè)計(jì)效果在線訂房管理頁面中要求輸入的信息必須是真實(shí)有效的，系統(tǒng)將對(duì)輸入的 Email 地址進(jìn)行判斷、同時(shí)還要判斷到達(dá)時(shí)間與離開時(shí)間是否過期，代碼如下：% if month(date())10 then 39。month(date()) else mon=month(date()) 39。如果當(dāng)前日期小于10則在當(dāng)前日期前面加0 da=0amp。獲取當(dāng)前系統(tǒng)日期 end ifset rs2=()sql2=select * from dd where time=39。date()amp。 sql2,conn,1,3if not thent=year(date)*1000000000+month(date())*10000000+day(date())*100000++1elset=year(date)*1000000000+month(date())*10000000+day(date())*100000+1end ifif request(post) then 39。請(qǐng)把內(nèi)容填寫完整39。location=39。/script) 39。 chr(13) amp。請(qǐng)檢查您的郵件地址是否正確！39。 amp。 /scriptelsemm=request(year)amp。request(month)amp。request(day) 39。amp。amp。獲得離開時(shí)間if datediff(d,mm,date())0 then 39。開始日期和結(jié)束日期填寫有誤39。location=39。/script)end ifset rs=()sql=select * from dd sql,conn,1,3 39。添加在線訂房人姓名rs(sex)=request(sex)rs(age)=request(age)rs(shenfen)=request(shenfen)rs(zhengjian)=request(zhengjian)rs(guoji)=request(guoji)rs(danwei)=request(danwei)rs(dtime)=mmrs(ltime)=nnrs(num)=request(num)rs()=request()rs(tel)=request(tel)rs(room)=request(room)rs(beizhu)=request(beizhu)rs(bianhao)=request(t)rs(time)=date() 39。圖 9 在線訂房管理頁面運(yùn)行結(jié)果 意見反饋管理模塊設(shè)計(jì)意見反饋管理模塊主要包括留言的發(fā)布、留言與回復(fù)留言瀏覽 2 部分。意見反饋管理頁面所涉及到的相關(guān)程序代碼如下：% if request(post) then 39。接收輸入的地址if request(name)= or request()= or request(ICQ)= or request(liuyan)= then(script language=javascriptalertamp。請(qǐng)把內(nèi)容填寫完整39。location=39。/script) elseIf Instr(Email, ) = 0 Or Right(Email, 1) = Or Left(Email, 1) = Then script language=JavaScript amp。 alert(39。)。 () amp。獲取添加人姓名rs(sex)=request(sex)rs(laizi)=request(laizi)rs()=request() 39。獲取當(dāng)前系統(tǒng)日期和時(shí)間()end ifend function% 公告欄模塊設(shè)計(jì)公告欄是用來發(fā)布網(wǎng)站最新公告信息的，目的是讓瀏覽者了解網(wǎng)站的最新動(dòng)態(tài)。1．首頁滾動(dòng)顯示公告欄滾動(dòng)顯示功能模塊位于前臺(tái)主頁的左側(cè)，它可以將網(wǎng)站最新的公告信息展示給用戶。圖 10 公告欄滾動(dòng)顯示功能頁面設(shè)計(jì)效果實(shí)現(xiàn)滾動(dòng)顯示主要是應(yīng)用 HTML 中的 Marquee 標(biāo)識(shí)符實(shí)現(xiàn)的。取出景點(diǎn)的相關(guān)信息 sql3,conn,1,1 if not then do while not %table width=100% border=0 tr tdspan class=style3☆/span a href= onClick=(39。,39。,39。單擊標(biāo)題進(jìn)入詳細(xì)信息頁面scrollbars=yes,width=565,height=50039。圖 11 公告欄滾動(dòng)顯示功能頁面運(yùn)行結(jié)果2．具體信息展示滾動(dòng)顯示所有信息標(biāo)題，這些信息是系統(tǒng)按照發(fā)布的時(shí)間降序排列的。展示詳細(xì)內(nèi)容頁面所涉及到的程序代碼如下：% set rs=()sql=select * from news where NewsId=amp。顯示具體信息詳細(xì)頁 sql,conn,1,1 39。通過以下語句進(jìn)行內(nèi)容的輸出5 后臺(tái)主要功能模塊詳細(xì)設(shè)計(jì) 后臺(tái)總體架構(gòu)1．模塊功能介紹后臺(tái)頁面主要包括以下功能模塊：? 管理首頁/退出模塊：主要用于退出后臺(tái)管理系統(tǒng)。? 圖片管理模塊：主要包括空間圖片管理。? 景點(diǎn)管理模塊：主要包括旅游景點(diǎn)管理。? 訂單管理模塊：主要包括訂單管理、已確認(rèn)訂單、回復(fù)管理。? 系統(tǒng)信息管理模塊：主要用于管理本網(wǎng)站的版權(quán)、技術(shù)支持。圖 12 網(wǎng)站后臺(tái)頁面運(yùn)行結(jié)果為了方便讀者閱讀此章節(jié)內(nèi)容，將后臺(tái)頁面的各部分說明以列表形式給出，如表 2 所示。后臺(tái)登錄模塊主要用于驗(yàn)證管理員的身份及驗(yàn)證碼，設(shè)計(jì)效果如圖 13 所示。表 3 后臺(tái)登錄頁面中涉及的 HTML 表單元素名稱 類型 含義 重要屬性form1 form 表單 method=post action=inc/?action=loginverifycode2 hidden 隱藏域 value=%=session(verifycode)%Submit image 圖像區(qū)域 value=提交 src=images/后臺(tái)登錄頁面所涉及到的程序代碼如下： % dim verifycode,verifycode2verifycode=trim((verifycode)) 39。判斷輸入的驗(yàn)證碼與隨機(jī)產(chǎn)生的驗(yàn)證碼是否一致SCRIPT language=JavaScriptalert(39。39。=39。/SCRIPTelsesession(verifycode)= 39。判斷是否接收表單值admin_name=request(admin_name) 39。接收用戶密碼set rs=()sql=select * from admin where admin_name=39。admin_nameamp。 and admin_pass=39。admin_passamp。 sql,conn,1,3if then brbrbrbrfont size=2center　　對(duì)不起，您輸入的用戶名、密碼或驗(yàn)證碼有誤，請(qǐng)重新輸入，謝謝！brbr，分辨率：1024*768brbr否則一切后果與本軟件無關(guān)，特此聲明！在此a href=../返回/a/fontelsesession(admin_name)=request(admin_name) 39。跳轉(zhuǎn)到指定的頁面end if 39。將不用的對(duì)象釋放掉end ifend if% 管理首頁/退出模塊設(shè)計(jì)管理首頁/退出模塊主要用于退出后臺(tái)管理系統(tǒng)，并將 Session 變量清空，代碼如下：% session(admin_name)= 39。2．更改初始信息模塊設(shè)計(jì)更改初始信息模塊主要用于修改用戶名、密碼、公司名稱。圖 14 更改初始信息模塊設(shè)計(jì)效果更改初始信息頁面所涉及到的程序代碼如下：%set rs=()if request(action)=change thensql=select top 1 * from admin sql,conn,3,3rs(admin_name)=request(admin_name) 39。修改用戶密碼 您的更改已成功elseif request(action)=change2 then 39。顯示第一條記錄 sql,conn,3,3% .........% end if%更改初始信息頁面的運(yùn)行結(jié)果如圖 15 所示。查看服務(wù)器信息管理頁面的設(shè)計(jì)效果如圖 16 所示。 /amp。.amp。.amp。圖 17 圖片管理頁面設(shè)計(jì)效果圖片管理頁面中獲取上傳圖片的相關(guān)信息所涉及到的程序代碼如下：%Const PageCount=7 39。判斷是否接收到表單值requestpage=cint(request(page)) 39。圖片存放的文件夾地址strFileName=TruePath=(UploadPath)39。創(chuàng)建fso對(duì)象if request(Action)=Del then 39。檢查路徑是否存在FileCount=0TotleSize=0Set theFolder=(TruePath) 39。利用循環(huán)得出總的文件數(shù)TotleSize=TotleSize+ 39。獲取總文件數(shù)39。在當(dāng)前頁碼為小于1的值時(shí)，使其值等于 1requestpage=1end ifif (requestpage1)*MaxPagetotalput thenif (totalPut mod MaxPage)=0 thenrequestpage= totalPut \ MaxPageelserequestpage= totalPut \ MaxPage + 1end ifend if