【正文】 在此，我還要感謝和我在一起進行電大學(xué)習(xí)的同學(xué)，正是有了他們的幫助和支持，我才能克服一個又一個的困難和疑惑，直至本次設(shè)計的順利完成，在這里請接受我誠摯的謝意！ 【參考文獻】[1] 黃雷 楊志 游坤 ＋HTML＋Dreamweaver＋Access 開發(fā)動態(tài)網(wǎng)站實例薈萃[M].機械[2] 宋朝東 HTML CSS JAVASCRIPT 制作網(wǎng)頁[M].[3] 李燁 DIV+CSS 網(wǎng)頁布局與美化[M].[4] [M].[5] 李勇平 . NET（ｃ＃）基礎(chǔ)教程[M].[6] 顧春花 張雪芹 付歌 程序設(shè)計[M].[7] 王輝 羅皇 Dreamweaver 8 網(wǎng)頁制作[M].[8] 段克奇 ASP 篇[M].[9] 席金菊 何碧英 [M].2022[10] 數(shù)據(jù)庫系統(tǒng)開發(fā)完全手冊[M].[11] 龍馬工作室 +SQL Server 網(wǎng)站開發(fā)實例精講[M].。從課題的選擇到項目的最終完成，肖老師對我進行了耐心的指導(dǎo)和幫助，提出嚴格要求，引導(dǎo)我不斷開闊思路，為我答疑解惑，鼓勵我大膽創(chuàng)新，使我在這一段寶貴的時光中，既增長了知識、開闊了視野、鍛煉了心態(tài)，又培養(yǎng)了良好的學(xué)習(xí)習(xí)慣和創(chuàng)新精神。以信息網(wǎng)站為核心的 Web 信息系統(tǒng)建設(shè)方興未艾，運用新技術(shù)進行創(chuàng)新的應(yīng)用開發(fā)，提高網(wǎng)絡(luò)系統(tǒng)應(yīng)用成效將是一個不竭的課題。Web 服務(wù)器還不支持 ASP 的運行。又由于 ASP 編程所用的 Vbscript 與Jscript 語言較其它語言較簡潔、易操作、功能較強非常適合廣大用戶進行網(wǎng)站的開發(fā)。學(xué)生通過發(fā)送信息郵件，使學(xué)生的意見和需求能夠及時的得以提出，激發(fā)了他們的學(xué)習(xí)欲望?；?Web 的現(xiàn)代遠程教育是一種新型的教育方式，隨著現(xiàn)代信息管理的發(fā)展，它將越來越受到人們的關(guān)注并逐步取代傳統(tǒng)教育，21 世紀它將成為構(gòu)筑終身學(xué)習(xí)體系的主要手段,而基于 Web 的動態(tài)交互式教學(xué)網(wǎng)站則是現(xiàn)代網(wǎng)絡(luò)教育不可缺少的一部份。今天已有上萬個 Web 站點使用了 ASP 技術(shù)，其中包括許多 Inter 中最大的站點。實現(xiàn)無組件上傳　　 Function GetFileName(ByVal strFile) 　　 If strFile ＜＞ Then 　　 GetFileName = mid(strFile,InStrRev(strFile, \)+1) 　　 Else 　　 GetFileName = 　　 End If 　　 End function　　 　　 strFileName = (file1) 　　 Set objStream = () 　　 = 1 39。 % 上傳組件頁頁名：adovbs．Inc 功能：系統(tǒng)自帶的上傳組件。id Sql,conn,3,3Rs(class)=newsclassSet Rs=nothing ?selectclass=amp。管理員內(nèi)容信息類別移動操作頁（）主代碼： %39。頁面制作：打開記事本，添加如下的 asp 代碼，然后保存為 AdminChangClass即可。selectclassamp。刪除教學(xué)信息Dim selectclassDim idselectclass = Request(selectclass)id = Request(id)Set Rs = ()Sql=Select * From newsinfo Where id=amp。頁面效果：由于該頁面沒有任何 HTML 代碼，頁沒有任何 ASP 的輸出顯示代碼，所以無法瀏覽該頁面。 管理員刪除內(nèi)容信息頁頁名：功能：管理員刪除指定的內(nèi)容信息。這個函數(shù)的作用就是上傳圖片，函數(shù)原型在 中。頁面制作：用 Dreamveaver 來設(shè)計管理員添加信息頁的風(fēng)格，如圖 65 所示。 Rs1(title) amp。 Rs1(class) amp。管理員添加內(nèi)容頁（）主代碼：% 39。 圖 64 管理員添加內(nèi)容信息頁這個函數(shù)的作用就是上傳圖片，函數(shù)原型在 中。在頁面上方顯示數(shù)據(jù)庫中已有的教學(xué)版塊名稱Set Rs = ()Sql=Select * From newsclass Sql,conn,3,3Do While not % 管理員添加內(nèi)容信息頁頁名：功能：管理員添加內(nèi)容信息。頁面效果：設(shè)計完成后頁面效果如圖 63 所示。圖 62 管理員內(nèi)容類別編輯頁 管理員內(nèi)容管理頁頁名：功能：顯示所有內(nèi)容標(biāo)題. 頁面制作：用 Dreamweaver 來設(shè)計管理員內(nèi)容頁面的風(fēng)格。 要對內(nèi)容類別進行添加、修改和刪除等操作，就必須和數(shù)據(jù)庫相連接，所以要引用連接頁。/script End If End IfSet Rs=nothingEnd Sub% 管理員內(nèi)容類別編輯頁頁名： 功能：管理員對內(nèi)容類別進行添加、修改和刪除等操作。)。 Sql,conn,2,3If name=Rs(name) And pwd=Rs(pwd) ThenSession(admin)=Rs(name) Else scriptalert(39。nameamp。/script ElseSet Rs = ()Sql=Select * From [admin] Where name=39。)。對登錄信息進行檢查Sub ChkLogin()Dim nameDim pwdname = Trim((name))pwd = Trim((pwd))If name= Or pwd= Then scriptalert(39。測試后的頁面如圖 61 所示。id Sql,conn,3,3% 管理員登陸頁頁名：功能：管理員登陸頁面。newsclass2amp。 Sql,conn,3,3 %%Set Rs=nothing %% 39。顯示教學(xué)版塊的名稱Dim newsclass1newsclass1=Request(newsclass)Set Rs = ()Sql=Select title From newsclass Where class=amp。 該頁面也應(yīng)用了數(shù)據(jù)庫連接頁和版面公共頁，如下所示： !include file=””!include file=””瀏覽者在教學(xué)網(wǎng)站首頁或內(nèi)容標(biāo)題頁上點擊相應(yīng)的信息后，進入該頁面，在該頁面右側(cè)從上到下依次顯示該內(nèi)容信息所屬內(nèi)容的名稱、內(nèi)容標(biāo)題、添加/修改時間/點擊率，圖片和內(nèi)容信息。每頁顯示的教學(xué)條數(shù)If And Then ElsemyPageSize==PageDo While not And myPageSize0% 內(nèi)容信息顯示頁頁面：功能：顯示詳細內(nèi)容。newsclassamp。 Sql1,conn,3,3 %%Set Rs1=nothing %% 39。顯示教學(xué)類別的名稱Set Rs1 = ()Sql1=Select title From newsclass Where class=amp。該頁面也應(yīng)用了數(shù)據(jù)庫連接頁和版面公共頁，如下所示： !include file=””!include file=””此頁面主要為了顯示每一個具體版塊的標(biāo)題以及每個版塊里面所包括的所有內(nèi)容，最下面顯示了本版塊內(nèi)容的數(shù)字信息。在頁面右側(cè)顯示每個教學(xué)類別的名稱Dim newsclass1Set Rs1 = ()Sql1=Select class,title From newsclass Sql1,conn,3,3Do While not % 內(nèi)容標(biāo)題頁頁名：功能：顯示相應(yīng)內(nèi)容類別下的全部內(nèi)容標(biāo)題。首頁 () 主代碼:% 39。 教學(xué)網(wǎng)站首頁頁名：功能：顯示所有內(nèi)容及部分內(nèi)容標(biāo)題。,amp。參數(shù)：信息內(nèi)容 39。 adTypeBinary imagespath (GetFileName(imagespath)),adSaveCreateOverWrite If 0 Then upImages = 0 Else upImages = 1 End If End Function 39。參數(shù)：客戶端圖片路徑 39。Right(imagespath,4) Else GetFileName = End If End Function 39。minute(now)amp。day(now)amp。year(now)amp。參數(shù)：客戶端圖片路徑 39。頁面制作：打開記事本，添加如下代碼：!include file=% 39。在頁面左側(cè)的最下方顯示出信息總條數(shù)Set Rs = ()Sql=Select title From newsinfo Sql,conn,3,3 %% 39。newsclassamp。39。 Rs(title) amp。 Rs(class) amp。在頁面上部顯示每個教學(xué)版塊名稱Set Rs = ()Sql=Select * From newsclass Sql,conn,3,3 Do While not 【a href=?action=listamp。此頁面包括整個系統(tǒng) Logo 和左側(cè)的公共頁面，無論我們目前處于哪個頁面，都可以通過這一頁面方便快捷的跳轉(zhuǎn)到我們想去的頁面，得到我們想要的信息。此代碼只是被其他連接數(shù)據(jù)庫的網(wǎng)頁調(diào)用。表 3 內(nèi) 容 類 別 表編 號 字 段 名 字 段 類 型 說 明1 id 自 動 編 號 （ 設(shè) 為 主 鍵 ） 類 別 id 號2 Title 文 本 類 別 號3 Class 數(shù) 字 類 別 編 號6 基本模塊設(shè)計 數(shù)據(jù)庫連接頁頁名：功能：數(shù)據(jù)庫連接的基本信息。表 1 管理員表編 號 字 段 名 字 段 類 型 說 明1 id 自 動 編 號 （ 設(shè) 為 主 鍵 ） 管 理 員 id 號2 Name 文 本 管 理 員 賬 號3 Pwd 文 本 管 理 員 密 碼（ 2） 內(nèi) 容 信 息 表 （ newsinfo）內(nèi) 容 信 息 表 （ newsinfo） 保 存 了 內(nèi) 容 標(biāo) 題 、 編 輯 內(nèi) 容 、 類 別 編 號 、 添 加 /修 改 時 間 、 點 擊 率 和 內(nèi) 容 圖 片 等 。dbamp。Data Source= amp。 創(chuàng)建數(shù)據(jù)庫新建一個 Access 數(shù)據(jù)庫文件，命名為 。(2)內(nèi)容信息表 newsinfo：ID（自動編號） 、內(nèi)容標(biāo)題、編輯內(nèi)容、類別編號、添加修改時間、點擊率、內(nèi)容圖片。數(shù)據(jù)庫的 ER 圖如圖 51 所示：圖 51 數(shù) 據(jù) 庫 ER 圖從 ER 圖中可以看出，內(nèi)容信息表與內(nèi)容類別表是多對一的關(guān)系，即多條內(nèi)容信息可以對 應(yīng)同一個內(nèi)容類別。(2)內(nèi)容信息：內(nèi)容標(biāo)題、編輯內(nèi)容、類別編號、