【導(dǎo)讀】文討論的網(wǎng)絡(luò)信息發(fā)布系統(tǒng)。該系統(tǒng)的用戶可以通過一個(gè)簡單的界面加入數(shù)據(jù)，然后系統(tǒng)會按定制的欄目和固定布局顯示這些信息。程簡化到只需要錄入文字和上傳圖片，從而大大減輕了網(wǎng)站更新維護(hù)的工作量。web服務(wù)器，數(shù)據(jù)庫為Access2021。系統(tǒng)核心功能模塊包括：欄目菜單的顯示、

　　

【正文】 28 網(wǎng)絡(luò)信息發(fā)布系統(tǒng)后臺實(shí)現(xiàn) 后臺框架實(shí)現(xiàn) 后臺框架分兩各部分：菜單頁面和管理頁面，主要框架代碼為： frameset cols=140,13,* id=admin_index_frame name=admin_index_frame frame name=mainmenu src= frame name=adminMiddle noresize=noresize src= frameborder=0 scrolling=no frame name=adminMain src=%if list= then%%else%%=list%%end if% /frameset noframes body pa href=菜單頁面 /aP /body /noframes 圖文管理 實(shí)現(xiàn) 添加信息需要先選擇欄目才能進(jìn)入添加信息頁面，如圖 圖 選擇欄目示意圖 1． 大類選擇頁面為 ， 主要代碼如下： form method=post action= 第 4 章 網(wǎng)絡(luò)信息發(fā)布系統(tǒng)的實(shí)現(xiàn) 29 tr align=center td colspan=2 class=TDtop height=25 div align=center ┊ B添加文章 /B ┊ /div /td /tr tr bgcolor=FFFFFF td colspan=2 align=center height=160 請選擇文章總欄： select size=1 name=typeid %if then % option value=0暫無任何類別 /option %else while not master=rs(typemaster) if master then tmaster=split(master,|) for i=0 to ubound(tmaster) if (Forcast_SN)(username)=trim(tmaster(i)) then typemaster=true exit for else typemaster=false end if next end if if ((Forcast_SN)(key)=typemaster and typemaster=true) or (Forcast_SN)(key)=super or (Forcast_SN)(key)=check or (Forcast_SN)(key)=selfreg then % 第 4 章 網(wǎng)絡(luò)信息發(fā)布系統(tǒng)的實(shí)現(xiàn) 30 option value=39。%=rs(typeid)%39。%=trim(rs(typeName))%/option % end if wend end if % /select /td /tr tr bgcolor=FFFFFF td colspan=2 width=100% align=center height=25 class=TDtop input type=button value= 返 回 onClick=javascript:(1) class=unnamed5 style=fontsize: 9pt。 color: 000000。 backgroundcolor: EAEAF4。 solid EAEAF4 input type=submit value=下 一 步 name=B1 style=fontsize: 9pt。 color: 000000。 backgroundcolor: EAEAF4。 solid EAEAF4 /td /tr /form 2． 小類欄目選擇頁面為 ，主要代碼如下： form name=form1 method=post action=%if eWebEditor=1 then%%else%%end if% tr align=center td colspan=1 class=TDtop height=25 div align=center ┊ B添加文章 類別選擇 /B ┊ /div /td /tr 第 4 章 網(wǎng)絡(luò)信息發(fā)布系統(tǒng)的實(shí)現(xiàn) 31 input type=hidden name=typeid value=%=typeid% tr bgcolor=FFFFFF td align=center p /p p所屬小類： select name=smallclassid size=1 option selected value=請選擇小類 /option %dim smallclassid,master,smallmaster,smallclassma do while not smallclassid=rs2(smallclassid) master=rs2(smallclassma) if master then smallmaster=split(master,|) for i=0 to ubound(smallmaster) if (Forcast_SN)(username)=trim(smallmaster(i)) then smallclassma=true exit for else smallclassma=false end if next end if if ((Forcast_SN)(key)=typemaster) or ((Forcast_SN)(key)=bigmaster) or ((Forcast_SN)(key)=smallmaster and smallclassma=true) or (Forcast_SN)(key)=super or (Forcast_SN)(key)=check or (Forcast_SN)(key)=selfreg then % option 第 4 章 網(wǎng)絡(luò)信息發(fā)布系統(tǒng)的實(shí)現(xiàn) 32 value=%=trim(rs2(smallclassid))%%=trim(rs2(smallclassname))%/option % end if loop % /select /p /td /tr tr td align=center height=25 class=TDtop input type=button value= 返 回 name=B1 onclick=javascript:(1) style=fontsize: 9pt。 color: 000000。 backgroundcolor: EAEAF4。 solid EAEAF4 input type=submit value= 繼 續(xù) name=B1 style=fontsize: 9pt。 color: 000000。 backgroundcolor: EAEAF4。 solid EAEAF4 /td /tr /form 數(shù)據(jù)庫訪問實(shí)現(xiàn) 鏈接數(shù)據(jù)庫的文件為 ，在需要讀寫數(shù)據(jù)庫的頁面只需要調(diào)用就可以，代碼為 !include file=。 主要代碼為： % 第 4 章 網(wǎng)絡(luò)信息發(fā)布系統(tǒng)的實(shí)現(xiàn) 33 starttime=timer() DbType = ACCESS if DbType=ACCESS then DB = data/ ConnStr = Provider = 。Data Source = amp。 (db) end if if DbType=MSSQL then ConnStr = driver={SQL Server}。server=。uid=feitium。pwd=12345678。database=FeiTium end if if DbType=MYSQL then ConnStr = driver=MySQL。server=SERVER_NAME。uid=UID。pwd=PWD。database=DB_NAME end if On Error Resume Next Set conn = () ConnStr If Err Then Set Conn = Nothing 數(shù)據(jù)庫連接出錯 [代碼： 01]，請檢查數(shù)據(jù)庫鏈接文件中的連接字串。 End If % 第 5 章 結(jié)束語 34 第 5 章 結(jié)束語 作者 為 做出該新聞系統(tǒng)程序，訪問了大量 Web 網(wǎng)絡(luò)開發(fā)方面的網(wǎng)站，搜集了大量關(guān)于 Web 網(wǎng)絡(luò)開發(fā)的中英文資料，也查閱了大量書籍的源代碼作為參考和運(yùn)用，從中學(xué)會了許多 ASP 提供的控件的使用方法，學(xué)會了如何使用 Access建立數(shù)據(jù)庫，以及對 數(shù)據(jù)庫 瀏覽，修改，添加，查詢。 本次設(shè)計(jì)由于設(shè)計(jì)相關(guān)模塊比較多，加之設(shè)計(jì)經(jīng)驗(yàn)的不足，在系統(tǒng)的整體設(shè)計(jì)及各個(gè)模塊功能可能設(shè)計(jì)的不完全，有待與進(jìn)一步的完善和改進(jìn)。 參考文獻(xiàn) 35 參考文獻(xiàn) [1]雷寧 .零基礎(chǔ)學(xué) HTML+CSS[M].北京 :機(jī)械工業(yè)出版社 ,2021. [2]李峰 ,晃陽 . JavaScript 開發(fā)技術(shù)詳解 [M].北京 :清華大學(xué)出版社 ,2021. [3]鄒天思 .JavaScript 程序設(shè)計(jì) [M].北京 :人民郵電出版社 ,2021. [4]朱印宏 .Dreamweaver CS4amp。ASP 動態(tài)網(wǎng)頁設(shè)計(jì) [M].北京 :中國電力出版社 ,2021. [5]蔡翠平 .網(wǎng)絡(luò)程序設(shè)計(jì) — ASP [M].北京 :北京交通大學(xué)出版社 ,2021. [6]楊冀川 .ASP 動態(tài)網(wǎng)站設(shè)計(jì)實(shí)戰(zhàn) [M].北京 :機(jī)械工業(yè)出版社 ,2021. [7]巫張英 .Access 數(shù)據(jù)庫基礎(chǔ)與應(yīng)用教程 [M].北京 :人民郵電 ,2021. [8]Jon Flanders . ASP Internals[M]. American: Pearson Education,2021. [9]沈才梁 .ASP 網(wǎng)頁設(shè)計(jì) [M]. 北京 :清華大學(xué)出版社 ,2021. [10] 網(wǎng)易學(xué)院 .ASP 學(xué) 習(xí) 教 程 ［ EB/OL ］ . 2021. [11]曹好順 .基于 ASP 的鱒龍漁村信息管理系統(tǒng)的設(shè)計(jì)與實(shí)現(xiàn) [J].電腦編程技巧與維護(hù) ,2021,(22):6566. [12]張愛紅 .利用 ASP 索引服務(wù)內(nèi)置對象實(shí)現(xiàn)站內(nèi)搜索引擎 [J].科技創(chuàng)新導(dǎo)報(bào) ,2021,(34):36. 致謝 36 致 謝 在論文完成之際，我要特別感謝我的指導(dǎo)老師 xx老師的熱情關(guān)懷和悉心指導(dǎo)。在我撰寫論文的過程中， xx老師傾注了大量的心血和汗水，無論是在論文的選題、構(gòu)思和資料的收集方面，還是在論文的研究方法以及成文定稿方面，我都得到了 x老師悉心細(xì)致的教誨和無私的幫助，特別是他廣博的學(xué)識、深厚的 學(xué)術(shù)素養(yǎng)、嚴(yán)謹(jǐn)?shù)闹螌W(xué)精神和一絲不茍的工作作風(fēng)使我終生受益，在此表示真誠地感謝和深深的謝意。 在論文的寫作過程中，也得到了 家人和朋友的支持和鼓勵 。 感謝所有關(guān)心、支持、幫助過我的良師益友。 最后，向在百忙中抽出時(shí)間對本文進(jìn)行評審并提出寶貴意見的各位專家表示衷心地感謝！