【正文】 當然，也可以將制作的網(wǎng)頁文件復制到 C:\Ipub\wwwroot 目錄下，并將文件名更名為 ，再根據(jù)需要在“啟用默認文檔”中調(diào)整文檔名搜索順序。④進入“文檔”設置框，勾選“啟用默認文檔”項。②設置“Web 站點” ，在“ IP 地址”欄中填寫 ， “TCP端口”采用默認的 80 端口。點擊“開始菜單→程序→管理工具→Inter 信息服務” ，進入“Inter 信息服務” 。④測試 DNS設置是否成功：在命令提示符下輸入“ping .****.”，如果成功應該和“ping ”的結(jié)果相同。②建立“****”域：右鍵點擊“”選擇“新建域” ，在“鍵入新域名”處輸入“****” 。如果工作站有 22 臺，IP 地址則可依次指定為 ～， “默認網(wǎng)關(guān)”和“首選 DNS 服務器”兩欄仍填寫 。 網(wǎng)絡屬性設置要使用 DNS 和 IIS，必須為 Windows **** Server 指定靜態(tài)(即固定)的 IP 地址。 DNS 和 IIS DNS(Domain Name System)域名解析系統(tǒng)DNS 為 Intra 或 Inter 上的計算機將名稱(如域名 )“翻譯”為 IP地址(如 )，即域名解析。工作站：操作系統(tǒng)為 Windows xp。fString=ReplaceText(fString,(.[^]*)(amp。End Functionfunction ContentEncode(fString)fString=replace(fString,vbCrlf, )fString=replace(fString,\, )fString=replace(fString,39。 ReplaceText = (fString, replStr) 39。 = True 39。 = True 39。 = patrn 39。()set rst = (sql)echo(操作成功！)elseecho2(數(shù)據(jù)不合法！)end if%%Function ReplaceText(fString,patrn, replStr)Set regEx = New RegExp 39。end select39。 where s_id=amp。_urlamp。,_url=39。s_PicUrlamp。,s_PicUrl=39。,s_Hots=amp。,s_Hidden=amp。Nowamp。,s_addTime=39。s_Contentamp。,s_Content=39。s_Titleamp。,s_Title=39。數(shù)據(jù)不正確！)山東建筑大學畢業(yè)設計說明書 36 end ifsql = update ndy_Article set s_Classid=amp。39。amp。39。amp。s_Hotsamp。s_Hiddenamp。39。amp。s_ComIDamp。s_ClassIDamp。39。amp。39。amp。end ifs_adder=session(admin)action=Trim(Replace(Request(action),39。()39。(1)。39。(scriptalert(39。if s_PicUrl then39。((ArticleClassID))s_id=Trim(Replace(Request(id),39。內(nèi)容dim _ID 39。網(wǎng)站內(nèi)容s_ComID=2case elses_ComID=0山東建筑大學畢業(yè)設計說明書 35 end select dim Title 39。,))if not isnumeric(s_ComID) then s_ComID=0select case s_ComIDcase 1 39。()。)。 charset=gb2312title網(wǎng)站管理后臺/title%sub echo(message)%scriptalert(39。/option)loopset rsc=nothing % /select本段代碼的作用是,從數(shù)據(jù)庫中讀出所有的新聞分類,添加到新聞分類的下拉列表框中,以便添加新聞的時候選擇相應的所屬分類。mid(rsc(s_space),3)amp。39。amp。s_ComIDamp。而且之所以沒有采用組件上傳的原因是因為組件上傳需要受到服務器的諸多限制,而且可移植性差,當網(wǎng)站需要更換服務器時,還必須在更換后的服務器上安裝注冊相應的上傳組件,造成管理的不方便。界面如圖 :圖 新聞列表頁 部分源代碼及說明:iframe id=editor width=530 height=405 src=editor//iframe這行代碼實現(xiàn)的是將一個 HTML 編輯器通過 IFRAME 框架嵌套進了本頁面,通過這個 HTML 編輯器 ,實現(xiàn)了新聞的文字編輯,以及插入圖片等功能,使的新聞的內(nèi)容顯示起來更加美化。39。Articl?id=amp。)。alert(39。)script language=39。 and s_ComID=amp。)(delete from ndy_class where s_id=amp。 and s_ComID=amp。,))山東建筑大學畢業(yè)設計說明書 32 if not isnumeric(id) then()()end if(delete from ndy_class where s_id=amp。articleclass_m39。)。alert(39。s_ComID()elsescript language=39。amp。sHidden=amp。s_Urlamp。amp。sName=amp。s_Classidamp。amp。id=amp。end if(sql)(sql)if ck= then ?action=saveamp。 and s_ComID=amp。 where s_id=amp。,s_ComID=amp。getclassspace(s_id) amp。,s_Space=39。,s_Hidden=amp。s_Urlamp。,s_Url=39。getClass(s_id)amp。,s_Superlist=39。,s_Classid=amp。s_Nameamp。elsesql=update ndy_class set s_Name=39。 and s_ComID=amp。 where s_id=amp。,s_ComID=amp。,s_Space=39。,s_Hidden=amp。s_Urlamp。,s_Url=39。s_idamp。,s_Superlist=39。,s_Classid=amp。s_Nameamp。/script)()end ifif cint(s_Classid)=0 thensql=update ndy_class set s_Name=39。)。/ scriptcase saveif s_id= or not isnumeric(s_id) then()山東建筑大學畢業(yè)設計說明書 31 ()end ifif s_Name= or s_Classid= or s_Url= then(scriptalert(39。=39。添加39。javascript39。s_ComID()39。amp。sHidden=amp。s_Urlamp。amp。sName=amp。s_Classidamp。amp。id=amp。/script)(sql)set rs=(select top 1 s_id from ndy_class order by s_id desc)if not then s_id=rs(s_id)set rs=nothing ?action=saveamp。cesh！39。39。amp。39。amp。s_Hiddenamp。39。amp。39。amp。s_ComIDamp。s_ClassIDamp。39。amp。(1)。分類名稱已經(jīng)存在，請選擇其他名稱！ 39。s_ComIDamp。s_Classidamp。39。amp。o(1)。分類名稱、所屬類別、分類地址不能為空?。?39。br)39。br)39。br)39。if s_SuperID= then s_SuperID=039。,))s_ComID=Trim(Replace(Request(ComID),39。,))s_Url=Trim(Replace(Request(sUrl),39。,))(s_id)select case actioncase addnew,save 如果為添加新欄目,或保存修改 ,執(zhí)行如下操作s_Name=Trim(Replace(Request(sName),39。,)) 獲取操作標志s_id=Trim(Replace(Request(id),39?！痉祷亍?a br br/td/tr/table/body/html:驗證身份是否存在或是否已失效,如果已失效則轉(zhuǎn)入登陸頁,從新登陸,本文件的作用限制非法用戶,不登陸而進入操作界面.%if Session(admin)= or Isempty(session(admin)) then end if% 后臺新聞欄目列表頁:本文件的作用是顯示新聞欄目,并可進行刪除,每個欄目修改的超鏈接。 br br 用戶名或密碼錯誤?。?！br山東建筑大學畢業(yè)設計說明書 28 br a href=39。 align=center class=39。 colspan=39。操作: 確認身份失敗!/td/trtr td height=39。 align=center class=39。 colspan=39。tr td height=39。 class=39。 cellspacing=39。 cellpadding=39。 border=39。 width=39。/headbodybrbrbrtable align=39。 href=39。 strsql,conn,1,1 根據(jù)傳入的用戶名密碼 ,進行驗證if not ( and ) then session(admin)=rs(username)session(pswd)=rs(password) end if如果存在記錄則:賦 SESSION 值,轉(zhuǎn)入 頁面.set rs=nothingset conn=nothing%否則,提示登陸錯誤,不:賦 SESSION 值.htmlheadlink rel=39。passwordamp。 and password=39。usernameamp。,) 獲取傳入密碼set rs=() 建立數(shù)據(jù)集對象strsql=select * from addr_admin where username=39。id usql更新點擊量,每刷新一次,點擊量加 1%:界面如圖 所示:圖 一條新聞的頁面 后臺部分 ：登陸登陸界面如圖 所示:圖 登陸界面 :登陸驗證源代碼及說明: !include file= 包含數(shù)據(jù)庫鏈接%dim sqldim rs山東建筑大學畢業(yè)設計說明書 27 dim usernamedim passwordusername=replace(trim(request(username)),39。界面如圖 所示:圖 新聞列表頁面 新聞詳細頁文件新聞詳細頁文件 ，源代碼為:山東建筑大學畢業(yè)設計說明書 26 %id=trim(request(id)) 取傳入的新聞編號if id= or not isnumeric(id) then (數(shù)據(jù)傳遞錯誤) ()end if判斷編號的正確性set rs=()sql=select * from ndy_article where s_id=amp。 order by s_addtime desc ssql,conn,1,1取本欄目下所有新聞。 ssql=select * from ndy_article where s_classid =amp。sql=select * from ndy_class where s_id=amp。%do while not % A href=?id=%=rs(s_id)% target=_blank%=lstring(rs(s_title),25)%/a (FONT color=999999%=year(rs(s_addtime))%年%=month(rs(s_addtime))%月%=day(rs(s_addtime))%日/FONT)BR%loop% /td山東建筑大學畢業(yè)設計說明書 25 /tr/table/body/html說明:id=trim(request(id))if id= or not isnumeric(id) then (數(shù)據(jù)傳遞錯誤) ()end if獲取新聞欄目編號,并判斷編號格式的正確性。 order by s_addtime desc ssql,conn,1,1%table border=0 width=583 cellspacing=0 cellpadding=0 tr td style=lineheigh