【正文】 結構如圖 37所示： 圖 37 新聞內容信息表 新聞內容信息表的一些初始化數(shù)據(jù)如圖 38所示： 圖 38 新聞內容信息表初始化數(shù)據(jù) 第四章 后臺系統(tǒng)和數(shù)據(jù)庫的配置 4． 1 后臺服務器配置 下面，我們將介紹在線新聞發(fā)布系統(tǒng)的服務器配置過程。這樣，就必須創(chuàng)建一個 ASP應用程序來處理用戶登錄次數(shù)信息。單擊鼠標右鍵 ，選擇“屬性”命令，彈出如圖 42所示的屬性對話框，在應用程序設置里，創(chuàng)建 ASP 應用程序。 (amp。Data Source= amp。 第五章 前端網絡頁面的開發(fā)與設計 5． 1 系統(tǒng)首頁 系統(tǒng)首頁頁面示例 如圖 61所示，給出了在線新聞發(fā)布系統(tǒng)的首頁效果： 圖 51 新聞發(fā)布系統(tǒng)首頁 系統(tǒng)首頁實現(xiàn)方法 新聞發(fā)布系統(tǒng)的首頁面重要包含三個部分。如果新聞大類 ID0,從數(shù)據(jù)庫 ANclass 表中檢索小類標題、小類 ID，如果檢索不到，顯示“還沒有任何欄目”。,ar,a, sql=sqlamp。classid sql=sqlamp。 /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。,dateandtime,Date())=amp。,dateandtime,Date())=amp。 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 管理員登錄頁面 管理員登錄界面調用的各程序如下圖所示： 管理員通過點擊首頁的 [管理入口 ]選項，進入管理員登錄界面，如果輸入正確的用戶名和密碼，則進入管理系統(tǒng)界面（ ）， 否 則 ， 則 進 入 系 統(tǒng) 出 錯 提 示 頁 面（ ）。 and classid=amp。 order by hits desc,title case 2 sql=SELECT top 10 * FROM article where DateDiff(39。 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。 TD class=title b近期圖片新聞 /b/TD img src=pic/ width=180 height=135br 東風汽車公司領導李紹燭副總經理致辭。 if classid0 then sql=sqlamp。cstr(classid) sql,conn,1,1 if and then 還沒有任何欄目 else do while not % (4)小類新聞的最新新聞，具體的代碼如下： 從數(shù)據(jù)庫的 article、 Anclass 表中檢索相關文章、文章 ID、文章標題、文章發(fā)表日期和時間、點擊次數(shù)、新聞大類 ID、從屬小類 ID、從屬小類標題。cstr(classid) sql,conn,1,1 if not then classname=rs(class) end if % (3)接下來是系統(tǒng)的大、小類導航欄，具體的代碼如下： 從數(shù)據(jù)庫 Aclass 表中查詢新聞大類、大類 ID，如果沒有數(shù)據(jù)記錄，則顯示還沒有任何目錄。dbamp。) connstr % 在連接數(shù)據(jù)庫之前，我們必須聲明一個對象來當作數(shù)據(jù)庫與 ASP 程序之間的媒介，對象的聲明方式如下 ： Set 對象 = () “ CreatObject” 是 ASP 的“ Server” 對象中內含的對象建立函數(shù)，利用上式即可建立一個 ASP 與數(shù)據(jù)庫之間的通道，以便以后的實際連接，我們可以稱這種對象為“ Connection 對象 ” ,如下式所示： %Set conn = () % 對象“ conn” 便是一個要與數(shù)據(jù)庫溝通的對象變量，對象建立完成后，還不知道此通道究竟要和 哪一個數(shù)據(jù)庫進行連接，所以我們必須還要“打開 (Open)” 通道與數(shù)據(jù)庫作連接，語法如下： 對象 .open 連接字符串 .用戶帳號 .密碼 “ Open” 是“ Connection 對象”中的一個指令，專門用來打開 Connection 對象與數(shù)據(jù)庫之間的通道，“連接字符串”是用來說明欲連接數(shù)據(jù)庫類型與名稱的字符串，以連接“ Microsoft Access” 數(shù)據(jù)庫為例，此字符串的設置語法如下： Provider=。這樣我們就創(chuàng)建了一個 ASP 應用程序，但真正圖 42 添加 ASP 程序服務 4． 2 后臺數(shù)據(jù)庫的配置 本系統(tǒng)沒有使用 ODBC 這種形式的數(shù)據(jù)庫，而是直接采用了 Access 文件的相對路徑來實現(xiàn)讀取數(shù)據(jù)庫的功能，簡單的代碼如下所示： %language=vbscript codepage=936 % % option explicit =true dim conn dim connstr dim db db= Set conn = () connstr=Provider=。頁面的具體位置并不重要，但要讓這些頁面都位于一個公用的目錄結構里。如果使用的是 Windows2020 以上版本的操作系統(tǒng)，那么添加 服務器非常簡單，只需要打開“控制面板”里面的“添加 /刪除程序”選項，然后選擇“添加 /刪除 Windows 組件”，最后選中彈出對話框“ Inter 信息服務（ IIS）選項”，如圖 41 所示，按照系統(tǒng)的提示進行安裝既可。 新聞大類信息表的一些初始化數(shù)據(jù)如圖 32 所示： 圖 32 新聞大類信息表初始化數(shù)據(jù) 新聞小類信息表： 新聞小類信息表（ ANclass）的結構如圖 33 所示： 圖 33 新聞小類信息表 在新聞小類信息表中，除了新聞小類的 ID 和名稱外，還增加了一個 ClassID，將小類和大類關聯(lián)起來，以便在進行新聞添加和欄目管理操作中，實現(xiàn)二級目錄操作。 它不需要外部數(shù)據(jù)支持。 它不需要外部數(shù)據(jù)支持。 對于新聞小類的信息數(shù)據(jù)庫，可以列出以下數(shù)據(jù)項目和數(shù)據(jù)結構： ● 新聞小類信息：小類 ID（自動編號）、小類名稱、從屬大類 ID。 不僅如此，結合后臺的數(shù)據(jù)庫系統(tǒng)后，網頁正式成為一個Web 應用程序的開發(fā)環(huán)境，而不僅僅是一個展示的舞臺。 開發(fā)數(shù)據(jù)庫系統(tǒng)的過程就是建立數(shù)據(jù)的使用界面和決策結構，目的是針對不同的需求使用數(shù) 據(jù)庫記錄。早期的程序設計員大都是靠替人設計數(shù)據(jù)庫系統(tǒng)為生，眾多的考勤系統(tǒng)、庫存管理系統(tǒng)、進銷存系統(tǒng)等等。