【正文】 完成畢業(yè)設(shè)計固然重要，更重要的是在這個漫長的過程中我從劉倩老師那里學(xué)到了遇到 問題，不要找借口， 要迎難而上 ；無論做什么事，都要 細心，從小處做起， 努力做最好 ！這些從書本上學(xué)不到，而又在實際生活、工作中非常有用的經(jīng)驗 對我以后的工作和學(xué)習(xí)都是一種幫助。 分工情況 ： XXXX—— 后臺設(shè)計 XXXX—— 前臺設(shè)計 XXXX—— 網(wǎng)站美工 XXXX—— 數(shù)據(jù)庫設(shè)計 ASP+ Access 個人博客系統(tǒng) 31 致 謝 通過短短的 一 個 多 月， 我們終于 完成了我們的 個人博客 系統(tǒng) ，論文從選題 、做系統(tǒng)到順利 完成 論文 ，都是與劉倩老師熱情幫助 、精心指導(dǎo)是分不開的 。通過這次畢業(yè)設(shè)計， 使我更深的了解 ASP， Dreamweaver，Netbox， ACCESS， 從以前的理論上升到 現(xiàn)在的具體 實踐，從感性認識上升到理性認識，真正做到學(xué)有所用，雖然 在設(shè)計中我遇到了不少問題，而且往往一個小小的錯 誤都會使我花很多的時間和精力去尋找和修正 ，但在 XX 老師的幫助和自己的努力下，最終還是一一克服了。 ASP+ Access 個人博客系統(tǒng) 30 結(jié)束語 經(jīng)過 一 個多月的 努力 ， 個人博客 系統(tǒng) 終于 完成 。 ② 提示用戶登錄失敗。 ② 填寫錯誤的用戶名或密碼。 管理員登陸 測試內(nèi)容：填寫用戶名及密碼，驗證能否成功登陸。 結(jié)果：在文章細節(jié)頁面正確的顯示出文章的全部內(nèi)容。 前臺顯示文章詳細內(nèi)容測試 測試內(nèi)容：點擊一個文章的標題，是否會顯示出文章的全部內(nèi)容。 結(jié)果：文章列表區(qū)域正確顯示發(fā)表的文章。 圖 52 錯誤提示圖 前臺文章顯示測試 測試內(nèi) 容：打開前臺首頁后，是否會顯示相應(yīng)的文章列表。 結(jié)果： ① 系統(tǒng)提示如圖 51 所示，測試成功。 操作： ① 以瀏覽者的身份進入博客 登錄 系統(tǒng)， 點擊 登錄系統(tǒng) 按鈕 。 主頁面 瀏覽正常說明系統(tǒng)測試成功；若無法 顯示頁面，應(yīng)根據(jù)它的提示進行修改，直到測試成功。 (2) 連接數(shù)據(jù)庫時 ， 連接字符串的路徑應(yīng)與虛擬目錄名字保持一致 : dbq=amp。 ASP 程序需要將程序文件發(fā)布到 Web 服務(wù)器后才能瀏覽網(wǎng)頁的內(nèi)容，所以要 在 做好的 ASP 程序文件 夾旁 放 置 文件才能 運行，對所做的程序采取邊做邊運行測試的 方法，做完一個功能模塊就對其進行測試驗證，看看能不能讀或?qū)憯?shù)據(jù)庫。 } } /script ASP+ Access 個人博客系統(tǒng) 27 5 系統(tǒng)運行測試 系統(tǒng)測試是系統(tǒng)開發(fā)過程的重要組成部分，是用來確認一個程序的品質(zhì)或性能是否符合開發(fā)之前所提出的一些要求。)。 } } if (!flag) { alert(39。i++) { if (ID(i).checked) { flag=true。 for(i=0。 }} function CheckOne() { var flag=false。chkall39。i++) { var e = [i]。實現(xiàn)此功能得主要代碼如下： script language=javascript function CheckAll(form) ASP+ Access 個人博客系統(tǒng) 26 圖 411 留言管理 界面 { for (var i=0。(id) set rs=() sql,conn,1,3 rs(rz_flname)=(rz_flname) set rs=nothing set conn=nothing Succeed(li修改日志分類成功 /li) end sub sub listcat() % 留言管理模塊 留言管理 模塊是為了修改前臺的留言板功能，如圖 411 所示 。(id) set rs=() sql,conn,1,1 % 圖 410 管理日志界面 ASP+ Access 個人博客系統(tǒng) 25 管理 日志 功能主要是實現(xiàn)日志的修改和刪除功能，用戶先在此界面中選擇需要修改或刪除的日志標題，然后如果是點擊修改，則頁面轉(zhuǎn)到編輯日志界面，此時可以對日志進行編輯，如果用戶點擊刪除，則該日志直接從此界面中刪除。 添加日志界面中我們有很清晰的編輯視圖，其中包含眾多文字編輯功能，可以讓用戶添加出美觀、個性、格式規(guī)范的日志，日志在編輯完畢后只需要點擊添加按鈕，就可以把新編輯的日志登到前臺。selected39。%%=rs(rz_flName)%/option % loop set rs=nothing % /select 分類名稱： select name=rz_flname% sql=select * from rz_fenlei where rz_flid=amp。rz_flid set rs=() sql,conn,1,1 % option value=%=rs(rz_flId)%%=rs(rz_flName)%/option % set rs=nothing % % sql=select * from rz_fenlei set rs=() sql,conn,1,1 do while not % option value=%=rs(rz_flId)% %if rs2(rz_flid)=rs(rz_flid) then selected=39。 圖 48 日志分類管理界面 在日志分類管理界面中，我們只需找到列表中需要操作的分類名稱，然后點擊名稱后面的刪除或修改按鈕，就可以將此分類刪除或修改。/script) end sub sub 日志管理 模塊 為了在主頁中實現(xiàn)我們的日志以分類的形式表現(xiàn)，還有處理新增分類的功能，在系 統(tǒng)后臺我們做出了 分類管理 功能。)。/script) end if set rs2=nothing ASP+ Access 個人博客系統(tǒng) 21 dim rs3,sql3 set rs3=() select * from admin,conn,1,3 txqname=(txqname) txqpass=(txqpass) rs3(txqname)=txqname rs3(txqpass)=md5(txqpass) set rs3=nothing (script language=javascriptalert(39。)。/script) end if if (txqpass)(txqpasss) then (script language=javascriptalert(39。)。/script) end if if (txqpasss)= then (script language=javascriptalert(39。)。/script) end if if (txqpass)= then (script language=javascriptalert(39。)。/script) end if if (txqname)=txqname then (script language=javascriptalert(39。)。/script) end if if (txqname)= then (script language=javascriptalert(39。)。 sql2,conn,1,1 if not ( and ) then txqname=rs2(txqname) (script language=javascriptalert(39。txqnameamp。 ASP+ Access 個人博客系統(tǒng) 19 圖 46 管理界面的功能圖 圖 47 添加用戶界面 實現(xiàn)往系統(tǒng)里添加用戶的 主要代碼如下： dim rs2,sql2 txqname=Trim(saferequest(txqname)) txqpass=Trim(saferequest(txqpass)) txqpasss=Trim(saferequest(txqpasss)) set rs2=() sql2=select * from admin where txqname=39。 用戶管理模塊 用戶管理模塊主要包括 添加 用戶， 刪除用戶兩 個部分： (1)添加 用戶頁面 想要成為本系統(tǒng)用戶，需要通過管理員幫助注冊方可 ，管理員輸入用戶名稱和密碼，確認密碼后點擊“添加”