畢業(yè)設(shè)計(jì)論文-基于web的新聞發(fā)布系統(tǒng)的設(shè)計(jì)與實(shí)現(xiàn)(參考版)
2024-11-11 19:45本頁面
【正文】 order by hits desc,title end select sql,conn,1,1 if and then 近期無更新文章 else do while not % a href=?id=%=rs(articleid)% 管理員登錄頁面示例 ，如圖 52 所示： 圖 52 管理員登錄頁面 管理員登錄界面調(diào)用的各程序如下圖所示： 管理員通過點(diǎn)擊首頁的 [管理入口 ]選項(xiàng)，進(jìn)入管理員登錄界面，如果輸入正確的用戶名和密碼，則進(jìn)入管理系統(tǒng)界面（ ）， 否 則 ， 則 進(jìn) 入 系 統(tǒng) 出 錯(cuò) 提 示 頁 面（ ）。 and classid=amp。,dateandtime,Date())=amp。 order by hits desc,title case 2 sql=SELECT top 10 * FROM article where DateDiff(39。,dateandtime,Date())=amp。 end if next end function if classid=0 then hotkind=1 select case hotkind case 1 sql=SELECT top 10 * FROM article where DateDiff(39。 /font （ 7）近期熱門新聞模塊，具體的代碼如下： TD class=title b近期熱門新聞 /b /TD TD class=tdbg div align=leftfont style=lineheight:150% %function gotTopic(str,strlen) dim l,t,c, i l=len(str) t=0 for i=1 to l c=Abs(Asc(Mid(str,i,1))) if c255 then t=t+2 else t=t+1 end if if t=strlen then gotTopic=left(str,i)amp。 TD class=title b近期圖片新聞 /b/TD img src=pic/ width=180 height=135br 東風(fēng)汽車公司領(lǐng)導(dǎo)李紹燭副總經(jīng)理致辭。classid sql=sqlamp。 if classid0 then sql=sqlamp。,ar,a, sql=sqlamp。cstr(classid) sql,conn,1,1 if and then 還沒有任何欄目 else do while not % (4)小類新聞的最新新聞，具體的代碼如下： 從數(shù)據(jù)庫的 article、 Anclass 表中檢索相關(guān)文章、文章 ID、文章標(biāo)題、文章發(fā)表日期和時(shí)間、點(diǎn)擊次數(shù)、新聞大類 ID、從屬小類 ID、從屬小類標(biāo)題。如果新聞大類 ID0,從數(shù)據(jù)庫 ANclass 表中檢索小類標(biāo)題、小類 ID，如果檢索不到，顯示“還沒有任何欄目”。cstr(classid) sql,conn,1,1 if not then classname=rs(class) end if % (3)接下來是系統(tǒng)的大、小類導(dǎo)航欄，具體的代碼如下： 從數(shù)據(jù)庫 Aclass 表中查詢新聞大類、大類 ID，如果沒有數(shù)據(jù)記錄，則顯示還沒有任何目錄。 第五章 前端網(wǎng)絡(luò)頁面的開發(fā)與設(shè)計(jì) 5． 1 系統(tǒng)首頁 系統(tǒng)首頁頁面示例 如圖 61所示，給出了在線新聞發(fā)布系統(tǒng)的首頁效果： 圖 51 新聞發(fā)布系統(tǒng)首頁 系統(tǒng)首頁實(shí)現(xiàn)方法 新聞發(fā)布系統(tǒng)的首頁面重要包含三個(gè)部分。dbamp。Data Source= amp。) connstr % 在連接數(shù)據(jù)庫之前，我們必須聲明一個(gè)對(duì)象來當(dāng)作數(shù)據(jù)庫與 ASP 程序之間的媒介，對(duì)象的聲明方式如下 ： Set 對(duì)象 = () “ CreatObject” 是 ASP 的“ Server” 對(duì)象中內(nèi)含的對(duì)象建立函數(shù)，利用上式即可建立一個(gè) ASP 與數(shù)據(jù)庫之間的通道，以便以后的實(shí)際連接，我們可以稱這種對(duì)象為“ Connection 對(duì)象 ” ,如下式所示： %Set conn = () % 對(duì)象“ conn” 便是一個(gè)要與數(shù)據(jù)庫溝通的對(duì)象變量，對(duì)象建立完成后，還不知道此通道究竟要和 哪一個(gè)數(shù)據(jù)庫進(jìn)行連接，所以我們必須還要“打開 (Open)” 通道與數(shù)據(jù)庫作連接，語法如下： 對(duì)象 .open 連接字符串 .用戶帳號(hào) .密碼 “ Open” 是“ Connection 對(duì)象”中的一個(gè)指令，專門用來打開 Connection 對(duì)象與數(shù)據(jù)庫之間的通道，“連接字符串”是用來說明欲連接數(shù)據(jù)庫類型與名稱的字符串，以連接“ Microsoft Access” 數(shù)據(jù)庫為例，此字符串的設(shè)置語法如下： Provider=。 (amp。這樣我們就創(chuàng)建了一個(gè) ASP 應(yīng)用程序，但真正圖 42 添加 ASP 程序服務(wù) 4． 2 后臺(tái)數(shù)據(jù)庫的配置 本系統(tǒng)沒有使用 ODBC 這種形式的數(shù)據(jù)庫，而是直接采用了 Access 文件的相對(duì)路徑來實(shí)現(xiàn)讀取數(shù)據(jù)庫的功能，簡單的代碼如下所示： %language=vbscript codepage=936 % % option explicit =true dim conn dim connstr dim db db= Set conn = () connstr=Provider=。單擊鼠標(biāo)右鍵 ，選擇“屬性”命令，彈出如圖 42所示的屬性對(duì)話框，在應(yīng)用程序設(shè)置里，創(chuàng)建 ASP 應(yīng)用程序。頁面的具體位置并不重要，但要讓這些頁面都位于一個(gè)公用的目錄結(jié)構(gòu)里。這樣，就必須創(chuàng)建一個(gè) ASP應(yīng)用程序來處理用戶登錄次數(shù)信息。如果使用的是 Windows2020 以上版本的操作系統(tǒng)，那么添加 服務(wù)器非常簡單，只需要打開“控制面板”里面的“添加 /刪除程序”選項(xiàng)，然后選擇“添加 /刪除 Windows 組件”，最后選中彈出對(duì)話框“ Inter 信息服務(wù)（ IIS）選項(xiàng)”，如圖 41 所示，按照系統(tǒng)的提示進(jìn)行安裝既可。 管理員信息表的一些初始化數(shù)據(jù)如圖 36 所示： 圖 36 管理員信息表初始化數(shù)據(jù) 新聞內(nèi)容信息表： 新聞內(nèi)容信息表的結(jié)構(gòu)如圖 37所示： 圖 37 新聞內(nèi)容信息表 新聞內(nèi)容信息表的一些初始化數(shù)據(jù)如圖 38所示： 圖 38 新聞內(nèi)容信息表初始化數(shù)據(jù) 第四章 后臺(tái)系統(tǒng)和數(shù)據(jù)庫的配置 4． 1 后臺(tái)服務(wù)器配置 下面，我們將介紹在線新聞發(fā)布系統(tǒng)的服務(wù)器配置過程。 新聞大類信息表的一些初始化數(shù)據(jù)如圖 32 所示： 圖 32 新聞大類信息表初始化數(shù)據(jù) 新聞小類信息表： 新聞小類信息表（ ANclass）的結(jié)構(gòu)如圖 33 所示： 圖 33 新聞小類信息表 在新聞小類信息表中，除了新聞小類的 ID 和名稱外，還增加了一個(gè) ClassID，將小類和大類關(guān)聯(lián)起來，以便在進(jìn)行新聞添加和欄目管理操作中，實(shí)現(xiàn)二級(jí)目錄操作。 需要外部數(shù)據(jù)支持： ● 新聞的大類信息：大類 ID； ● 新聞的小類信息：小類 ID； 3． 3 數(shù)據(jù)庫的結(jié)構(gòu)創(chuàng)建 根據(jù)系統(tǒng)要求，可 以創(chuàng)建以下數(shù)據(jù)表： 新聞大類信息表： 新聞大類信息表（ Aclass）的結(jié)構(gòu)如圖 31 所示： 圖 31 新聞大類信息表 新聞的大類 ID 使用的是自動(dòng)編
教學(xué)課件相關(guān)推薦
鄂ICP備17016276號(hào)-1