【正文】 From bbs Where bbsID=amp。 order by bbsdate desc,bbsID desc end select set rs=() Sq1,db,1 分頁 文件，和上面介紹的 文件功能和內(nèi)容是相似的。 order by bbsdate desc,bbsID desc case else 其他人 只顯示自己錄入的動態(tài)信息 sq1=Select*From bbs Where username=39。 or userclass39。關(guān)鍵代碼如下： username=session(username) 取回用戶名 userclass=session(userclass) 取回用戶級別 select case userclass case 1,2 如果是超級管理員或校長，按日期顯示所有動態(tài)信息 sq1=Select*From bbs order by bbsdate desc,bbsID desc case 3,4 如果是網(wǎng)站管理員或辦公人員，顯示本人及低等級用戶輸入的動態(tài)信息 sq1=Select*From bbs Where username=39。 （ 3） 在 ASP 中加上 :!include FILE= （ 4） 在使用文件上傳時 , 表單 form 要加上 enctype=multipart/formdata （ 5）創(chuàng)建一個對象 set upload=new upload_5xsoft 39。還有的就是組件的兼容問題。sValuesamp。,classID 文章從屬子類 sValues=sValuesamp。amp。39。,bbstitle 文章標(biāo)題 sValues=sValuesamp。amp。39。,addyn 有無附件 sValues=sValuesamp。amp。39。 Where bbsID=amp。這里要用到 SQL的 Update語句，格式： Update 表名 Set 字段 1=值 1,字段 2=值 2,? [Where 條件 ] 實現(xiàn)代碼如下： sql=Update bbs Set bbsadd=39。其查詢語句如下： bbsID=Request(bbsID) Dim sql,rs sq1=Select * From bbs Where bbsID= amp。nbsp end if next end sub % 動態(tài)信息顯示 動態(tài)信息顯示頁面 、點擊數(shù)加一 當(dāng)某條動態(tài)信息被點擊，該信息的編號 bbsID 值，將會傳到 中。39。classIDamp。 % private sub select_page(page_no,classID,total_page) (請選擇頁碼 :) dim i for i=1 to total_page?顯示所有可選頁 if i=page_no then?當(dāng)前頁不提供鏈接 iamp。 !Include file=‘包含分頁處理程序。 % else % a href=%=rs(addlink)% target=_blank?如果不是動態(tài)子類，從表中查鏈接代碼。faIDamp。每條動態(tài)信息都有classID 字段值存儲小類編號。 在“顯示留言意見”網(wǎng)頁中的打開數(shù)據(jù)庫 ASP 程序中的語句： sq1=Select*From classfl Where fatherID=amp。 數(shù)據(jù)排序與 SQL 指令 （ 1）． Select 指令的篩選語句： 格式： Select? From 在 SQL 語言中：“ Select”數(shù)據(jù)表“中選取某些“字段”的數(shù)據(jù) . （ 2） .如果要選取的數(shù)據(jù)表數(shù)據(jù)包含了一個以上的字段值，則我們可以利用“，”逗號來欄位名稱隔開。 order by classID set rs=() Sq1,db,1 Recordset 對象是負(fù)責(zé)瀏覽與操作從數(shù)據(jù)庫取出來的數(shù)據(jù)， Connection 對象只負(fù)責(zé)與數(shù)據(jù)庫進行鏈接的動作，并不能使用數(shù)據(jù)庫內(nèi)的數(shù)據(jù)，因此必須建立一個可以存取數(shù)據(jù)庫數(shù)據(jù)的 Recordset 對象， 使用 方法存取” ”數(shù)據(jù)庫 SQL,CN,1,1 使用 open 方法來打開數(shù)據(jù)表或執(zhí)行 Select 指令參數(shù)設(shè)置如下： （ 1）， 參數(shù)一（ SOURCE） :為欲打開的數(shù)據(jù)表或 SQL 指令。DefaultDir=。有以下字段： BbsID 自動編號 Username 文本 創(chuàng)建文章的用戶名，方便動態(tài)信息的管理。有以下字段： classID 子類模塊編號， classname 子類模塊名， fatherID 父類模塊編號， fathername 父類模塊名， bbsyesno 是否動態(tài)信息模塊，如果值是 No 則通過 Addlink 字段值找到鏈接頁。對用戶自己的添加的信息可查看，及刪除。文件名分別為： 、 、?? 后臺管理時對記數(shù)值進行修改，只需將表單傳過來數(shù)據(jù)寫入 中即可， 這里不再重復(fù)。 student 表： 用于存放學(xué)生信息。以便分類顯示動態(tài)信息。 教學(xué)教研：通過動態(tài)信息發(fā)布系統(tǒng)生成。 學(xué)校熱點：通過動態(tài)信息發(fā)布系統(tǒng)生成。 、主頁面的設(shè)計 采用靜動相結(jié)合的方式。 學(xué)生信息管理系統(tǒng)設(shè)計：主要用于記錄學(xué)生違紀(jì)處理、及獎勵情況。 數(shù)據(jù)庫的設(shè)計 主頁面的制作及顯示風(fēng)格的確定 動態(tài)信息發(fā)布系統(tǒng)：包括，分類顯示、動態(tài)信息頁的顯示、動態(tài)信息添加、動態(tài)資源上傳、動態(tài)信息刪除等部分。 (5)、計數(shù)器組件：方便創(chuàng)建計數(shù)器。 ASP 的內(nèi)部組件： (1)、文件存取組件：對文件、文件夾進行操作。 (3)、 Response：把信息發(fā)送給客戶端?？奢p易地通過ODBC 驅(qū)動程序連接各種不同的數(shù)據(jù)庫。若要使用動靜結(jié)合進行網(wǎng)頁設(shè)計，可直接用 Dreamweaver 進行編輯 (4)、源代碼保密性強： ASP 的源程序代碼，不會傳到用戶的瀏覽器。 (2)、 ASP 與任何 ActiveX Scripting 語言兼容。 ASP 動態(tài)服務(wù)器網(wǎng)頁技術(shù)的介紹 ASP 全稱 Active Server Pages，是微軟公司推出用以取代 CGI 的動態(tài)服務(wù)器網(wǎng)頁技術(shù)， ASP 可以在 WindowsNT、 Windows202 WindowsXP 上運行。而Macromedia 公司推出的 Dreamweaver MX2021 無疑是這些軟件當(dāng)中的佼佼者。教師可以通過發(fā)布動態(tài)信息及將教學(xué)資源料上傳的方式，將資源共享給其它教師參考。 基 于以上原因，我以工作單位 福鼎七中為原型，制作了這個中小學(xué)網(wǎng)站。全國的中小學(xué)中己逐步開設(shè)信息技術(shù)必修課。由于面向不同的使用人群，故要求有較高的安全機制和較好的易用性。福建師范大學(xué)網(wǎng)絡(luò)教育學(xué)院 畢 業(yè) 設(shè) 計 設(shè)計題目 ： 中小學(xué)網(wǎng)站的制作 入學(xué)年月 2021年 04月 姓 名 任 勇 學(xué) 號 061c0db002 專 業(yè) 計算機科學(xué)與技術(shù) 指導(dǎo)教師 吳儀 完成日期 2021 年 2 月 內(nèi)容摘要 近幾年，隨著全球信息化的發(fā)展，互聯(lián)網(wǎng)正改變著人們的工作、生活、學(xué)習(xí)和交流方式。中小學(xué)網(wǎng)站是一種典型的信息管理系統(tǒng) (MIS)，其開發(fā)主要包括后臺數(shù)據(jù)庫的維護，及前端應(yīng)用界面的開發(fā)兩個方面。在素質(zhì)教育中，中小學(xué)信息技術(shù)教育己成為重中之重。家校聯(lián)系和教學(xué)教研活動一直是中小學(xué)教師除課堂教學(xué)外的重點，用網(wǎng)絡(luò)可以提高它們的效率及處理結(jié)果的利用率。通過網(wǎng)站中的學(xué)生信息查詢系統(tǒng)，家長可第一時間了解學(xué)生在校情況，增強家長與學(xué)校之間的聯(lián)系。 、制作工具的介紹及選用 Dreamweaver MX2021 的介紹 隨著網(wǎng)絡(luò)技術(shù)的飛速發(fā)展，各種制作網(wǎng)頁和建設(shè)網(wǎng)站的軟件不斷涌現(xiàn)。集成程度高，開發(fā)環(huán)境精簡高效，開發(fā)人員能夠運用 Dreamweaver 與服務(wù)器技術(shù)構(gòu)建功能強大的網(wǎng)絡(luò)應(yīng)用程序連接到用戶的數(shù)據(jù)、網(wǎng)絡(luò)服務(wù)體系。 ASP 的優(yōu)點： (1)、無需編譯：集成于 HTML 之中，容易產(chǎn)生，無需編譯或鏈接即可執(zhí)行。也可使用其它的網(wǎng)頁開發(fā)工具，如 FrontPage、 Dreamweaver。 (5)、高效、簡易的數(shù)據(jù)庫操作：利用 ADO 組件輕松存取數(shù)據(jù)庫。 (2)、 Request： 從客戶端獲得信息。 (6)、 ObjectConText：可以用來配合 MTS 服務(wù)器進行分布式事務(wù)處理。 (4)、文件超鏈接組件：用于建立易于維護的索引站點。按照系統(tǒng)開發(fā)的方式將整個設(shè)計過程分成以下幾個模塊，分塊完成設(shè)計任務(wù)。 聊天室的設(shè)計：包括，用戶登陸、聊天信息發(fā)表、顯示聊天記錄等部分。 用戶管理及登錄：包括，用戶注冊、登陸界面設(shè)計、用戶等級鑒別和管理。沒有子分類模塊。有以下二個子模塊，習(xí)作園地、團隊活動，及學(xué)生狀態(tài)查詢、家長留言組成。 Classfl 表： 用于記錄動態(tài)信息分類模塊的信息。由字段liu 的值決定其留言的從屬，分別用 3 代表從屬于以上三種的哪一種留言板。代碼如下： Dim FileObject Set FileObject=()?創(chuàng)建一個文件組件 Dim TextFile Set TextFile=((),1)?只讀方式打開文件 Dim Visit_number Visit_number=CLng()?讀一行計數(shù)信息 Visit_number=Visit_number+1?計數(shù)值加一 Set TextFile=((),2)?覆蓋方式打開文件 (Visit_number)?寫入值 ?關(guān)閉文件 PrettyCounter visit_number?調(diào)用子程序顯示圖片 PrettyCounter 是個子程序用于顯示相應(yīng)的數(shù)字圖片，代碼如下： SUB PrettyCounter(Num) CounterStr=CSTR(Num) For I=1 to LEN(CounterStr) CounterPart=MID(CounterStr,I,1)?取出某一位數(shù)字 % img src=images\j%=CounterPart%.jpg Alt=%=CounterPart%轉(zhuǎn)化成圖片輸出 % Next end sub 數(shù)字圖片我使用 word 的藝術(shù)字創(chuàng)建，再用 PhotoShop 對文字進行處理。后臺管理用戶則要添加動態(tài)信息，并為動態(tài)信息歸類，還可以上傳附件到網(wǎng)站中。以便分類顯示動態(tài)信息。 classID classname fatherID fathername bbsyesno Addlink 101 學(xué)校簡介 1 學(xué)校概況 No 102 校長致詞 1 學(xué)校概況 No 103 給校長留言 1 學(xué)校概況 No ?liu=3 104 教師主頁鏈接 1 學(xué)校概況 No 201 校園公告欄 2 學(xué)校熱點 Yes 202 校園新聞 2 學(xué)校熱點 Yes 203 教工活動 2 學(xué)校熱點 Yes 204 師之風(fēng)采 2 學(xué)校熱點 Yes 205 考試招生 2 學(xué)校熱點 Yes 301 習(xí)作園地 3 學(xué)生頻道 Yes 302 團隊活動 3 學(xué)生頻道 Yes 303 學(xué)生狀態(tài)查詢 3 學(xué)生頻道 No 304 家長留言本 3 學(xué)生頻道 No ?liu=2 401 教研活動制度 4 教學(xué)教研 Yes 402 教學(xué)論文 4 教學(xué)教研 Yes 403 語文組 4 教學(xué)教研 Yes 404 數(shù)學(xué)組 4 教學(xué)教研 Yes 405 英語組 4 教學(xué)教研 Yes 406 政治組 4 教學(xué)教研 Yes 407 歷史組 4 教學(xué)教研 Yes 408 地理組 4 教學(xué)教研 Yes classID classname fatherID fathername bbsyesno Addlink 409 物理組 4 教學(xué)教研 Yes 410 化學(xué)組 4 教學(xué)教研 Yes 411 生物組 4 教學(xué)教研 Yes 412 信息枝術(shù)組 4 教學(xué)教研 Yes 413 勞枝組 4 教學(xué)教研 Yes Bbs 表： 用于存放所有的動態(tài)信息文章。代碼為： % Dim db,connstr connstr=DBQ=+()+。faIDamp。 （ 4）， 參數(shù)四（ LockType） :指定鎖定類型， 1