【正文】 1 where yiid= amp。 order by id DESC end if sql,conn,1,1 if then 暫無相關信息 else number=20 39。1539。 width=39。 rs(id) amp。 title=39。 rs(newstime)amp。 … end if if date()rs(newstime)+2 then img src=39。/td/tr/table if then i=i+1 exit for end if next % 第 5章 ASP運用程序設計 第 14 頁 共 28 頁 實現(xiàn)效果圖如下： 信息顯示頁程序設計 % sql=update news1 set hit=hit+1 where id= amp。 簽寫留言程序設計 首先建立簽寫留言頁面如圖 51所示 第 5章 ASP運用程序設計 第 16 頁 共 28 頁 圖 51 留言系統(tǒng)前臺鑒寫留言頁面結構 添加留言相關代碼如下： Set rs = () select * from guestbook,conn,1,3 rs(chenghu ) =trim(txtname) rs(myface ) =trim(txttitle) rs(homepage ) =trim(txt) rs(qq ) =trim(txt) rs(contenttitle ) =trim(txttitle) rs(content ) =trim(txt) rs(emot ) =invert2(txtarea) rs(recontent ) = rs(ip) =txtip set rs=nothing 查看程序設計 建立留言顯示頁面如圖 52所示： 第 5章 ASP運用程序設計 第 17 頁 共 28 頁 圖 51 留言系統(tǒng)前臺查看留言頁面結構 然后編寫查看留言相關代碼： % set rs=() sql=select * from guestbook order by id desc sql,conn,1,1 if then (暫無信息 ) () end if number=10 39。因此，通過程序控制，讓后臺在實現(xiàn)網站信息管理的同時，簡單易用，符合人性化 理念。 Dim sAction, sErrMsg Dim ytss_use, ytss_Pword sAction = UCase(Trim(Request(action))) sErrMsg = Select Case sAction Case LOGIN Set oRs = ( ) ytss_use = Trim(Request(usr)) ytss_Pword = Trim(Request(pwd)) If Then otherpwd = cstr(Trim((otherpwd))) reotherpwd = cstr(Trim((reotherpwd))) If ytss_use And ytss_Pword Then sSql = select * from admin where tuz_super=39。 sSql, conn, 0, 1 If Not Then If oRs(tuz_super) = ytss_use And oRs(tuz_super_pas) = md5(ytss_Pword) and otherpwd=reotherpwd Then Session(suptuz_User) = ytss_use End If End If End If end if SErrMsg = 提示：用戶名 \密碼 \驗證碼 錯誤！ Case OUT Session(suptuz_User) = % 釋放數(shù)據連接對象 % End Select39。39。39。39。39。39。39。39。39。rs(erid)amp。/option loop sql=select * from yikind sql,conn,1,1 langmu1= if not then end if do while not langmu1=langmu1amp。39。 二、 是否啟用菜單相關程序設計： % If Then shower=request(shower) showyi=request(showyi) (update erkind set show=false where show=true) (update yikind set show=false where show=true) for i=1 to (shower).count (update erkind set show=amp。 isnumeric((showyi)(i)) amp。 order by erorder sql,conn,1,1 do while not % 菜單管理界面效果圖如 55 所示： 圖 55 菜單管理界面效果圖 綜合信息管理程序設計 一、添加文章相關程序 set rs1=() sql=insert into [news1] (yiid,erid,title,content,shoupic) values(amp。,39。,39。,39。) conn. execute sql end Sub 第 5章 ASP運用程序設計 第 23 頁 共 28 頁 二、更新文章 set rs=() sql=select * from news1 where id=amp。 sql end if end sub 留言管理程序設計 一、刪除留言程序設計： 定義： % act=request(act) id=request(id) if act=del then (delete from [Guestbook] where id=amp。) （刪除） /a 二、回復留言程序設計： 跳轉到相應留言： a href=?act=huiamp。 order by id desc sql,conn,1,1 調查管理程序設計 一、添加： if aact=addt then (insert into vitem (vid,vtitle) values (amp。vtitleamp。amp。cint(id)) ?vid=amp。id=amp。 vid 39。id end if 程序設計完成后，網站就基本完成了。運用程序測試主要是通過文章的上傳、編輯、刪除等功能的測試，確保在使用過程中不出現(xiàn)錯誤?？戳粞允欠裾_顯示，惡意留言內容是否被屏蔽，留言功能是否易用。 瀏覽器兼容性測試 先下載并安裝比較常用的幾款瀏覽器： Inter Explorer、 FireFOX、 TencentTT、 Maxthon，然后在各個瀏覽器下運行網站，查看整個網站的顯示效果以及運用程序是否正常。 7 網站的發(fā)布推廣 網站的發(fā)布 網站在測試無誤后，就可以發(fā)布了。只要支付一定的費用，便可以購買到服務器空間，交易成功后，會得到服務器的管理密碼。申請域名可到相關的網絡服務公司，如中國萬網。域名就 如同人名，好的域名才能被人們記住。 網站的推廣 產品開發(fā)出來如果不進行推廣和銷售，就失去了產品開發(fā)的意義。 代碼優(yōu)化主要是對網頁中的代碼進行優(yōu)化處理，包括清理沉余代碼和設置關鍵字。登錄百度搜索引擎的步驟為：進入百度的免費登錄頁面，網址為 搜索引擎競價排名是一種付費的網站推廣服務。 通用網址注冊 在網站的付費推廣中，除了搜索引擎競價排名外，還有一種非常實用的推廣手段 —— CNNIC通用網址注冊。 8 總結 通過這次畢業(yè)設計，讓我對網站設計的整個流程作了回顧性總結，又一次比較系統(tǒng)的整合了自己在網站設計方面的知識體系，從而對網站設計有了更新的認識，在網站設計水平方面也提高了一個層次。才能最大限度的實現(xiàn)網站開發(fā)的價值和意義。一個網站項目，必須經過各個環(huán)節(jié)，做到界面新穎、獨特、美觀，系統(tǒng)完整、安全 、易用，并做到瀏覽者與用戶之間的交互，才能開發(fā)出成功的網站。 通用網址最大好處在于：能得到新浪、 百度搜狐等 2020多家門戶網站、搜索引擎、行業(yè)站點和地方信息港的網站的直達支持。這種推廣方式是最有價值和針對性的推廣，但往往費用非常昂貴。 搜索引擎推廣主要有免費的搜索引擎登錄和付費的搜索引擎競價排名。不然，再好的網站也會沉沒在網絡的海洋中。這樣，在瀏覽器中輸入域名進行訪問的時候，就可以訪問到上傳的網站了。在申請網站域名的時候要注意域名的分類， .COM為國際域名， .CN為中國國內域名， .ORG為教育類網站域名。上傳網站一般用 FTP上傳工具，如LeapFTP（軟件名）等。 網站要在網絡上運行，就要有放置網站文件的空間，就是網站服務器。網站的瀏覽器兼容性也達到了預期目標，網站在各種瀏覽器環(huán)境中均可正確顯示，并實現(xiàn)了在不同分辨率（寬屏和普屏）下的完美伸展。對后臺管理系統(tǒng)上的所有功能進行實際操作測試。然后運行網站，看在網站前臺頁面中，是否正確顯示了 數(shù)據表中的內容，包括類別是否正確、是否按照規(guī)劃的單條或多條顯示以及是否按照時間順序（正序或倒序）顯示等。 第 6章 網站測試 第 25 頁 共 28 頁 6 網站測試 網站的測試主要包括運用程序（留言系統(tǒng)、文章的前臺數(shù)據顯示和后臺管理系統(tǒng)）測試和瀏覽器兼容性測試。amp。cint(id)) moditxt=rsmodi(vtitle) end if if modiact2=modi then set rs=() sql=select * from vname where id=amp。amp。id=amp。)) ?vid=amp。,39。 id sql,conn,1,3 rs(bookhui)=invert2(huitxt) rs(huitime)=now() () end if set rs=() sql=select * from Guestbook where id=amp。) 第 5章 ASP運用程序設計 第 24 頁 共 28 頁 end if % 執(zhí)行： a href=javascript:cdel(39。(ArticleID)(i)) next else sql=delete from [news1] where id=amp。shoupicamp。contentamp。titleamp。,amp。(showyi)(i)) next end if % 三、 菜單順序程序設計： % If and request(dook)=yi Then yiordertxt=request(yiorder) yiordertxt=replace(yiordertxt, ,) str=split(yiordertxt,) i=0 set rsq=() sql=select * from yikind order by yiorder sql,conn,3,3 第 5章 ASP運用程序設計 第 22 頁 共 28 頁 do while not rsq(yiorder)=str(i) i=i+1 loop end if % 設置菜單順序 %set rs2=() sql=select * from erkind where yiid=amp。 where erid=amp。rs(yiname)amp。amp。amp。option value=39。amp。amp。amp。amp。amp。amp。amp。amp。ytss_useamp。后臺管理系統(tǒng)需要進行身份驗證，只有憑管理用戶和密碼才能登錄后臺。要運用后臺管理系統(tǒng)，把管理網站變成一件輕而易舉的事，任何一個有計算機基礎的人都可以對網站內容進行調整、編輯和管理，而不需要網站方面的專業(yè)知識。cint(id) sql,conn,3,3 if or then (該新聞不存在 ) () end if hit=rs(hit) % 信息標題： %=rs(title)% 發(fā)布時間： %=rs(newstime)% 信息內容： %=rs(content)% 實現(xiàn)效果圖如下： 第 5章 ASP運用程序設計 第 15 頁 共 28