【文章內容簡介】 進行分析設計后，應該用 Access建立 17張表。各表結構信息具體見如下表 1—— 表 17。 字段名 數據類型 說明 id 自動編號 管理員的自動編號 admin 文本 管理員的姓名 password 文本 管理員的密碼 表 1 管理員表 字段名 數據類型 說明 ID 自動編號 自動編號 userweb 文本 網站名稱 url 文本 網站網址 username 文本 站長姓名 mail 文本 站長信箱 maxsize 數字 每頁顯示留言數 booktime 數字 發(fā)貼間隔時間 表 2 配置表 字段名 數據類型 說明 ID 文本 編號 user 文本 姓名 sex 文本 性別 adress 文本 訪問地區(qū) face 文本 頭像 文本 mail 文本 訪問郵箱 url 文本 個人主頁 em 文本 表情 title 文本 留言標題 content 備注 留言內容 IP 文本 訪問客 IP hide 是 /否 是否悄悄話 time1 日期 /時間 留言日期 replytitle 文本 回復主題 reply 備注 回復 time2 日期 /時間 回復日期 表 3 個人信息表 字段名 數據類型 說明 ID 自動編號 自動編號 IP 文本 被封 IP content 文本 被封原因 locktime 日期 /時間 被封日期 表 4 封鎖 IP表 然后是根據對該系統(tǒng)做出的整體的分析和設計，開始在 FRONTPAGE環(huán)境下使用HTML、 VBScript、 JavaScript等語言相互嵌套進行系統(tǒng)開發(fā)設計，通過 ADO—— ActiveX Data Objects，將程序語言 ASP與數據庫 ACCESS建立連接，以實現相關功能。另外輔助使用Photoshop等處理軟件做界面的優(yōu)化設計工作。 第五章 開發(fā)個人主頁 本個人主頁主體上可以分為由 html編寫的靜態(tài)頁面和用 asp編寫的留言板塊。 HTML 頁面的實現 首頁 主頁 (如下圖 ) 這是由 FRONTPAGE編寫的 HTML頁面，可以通過該頁面進入各個板塊，這些都由超連接實現。 實現超連接的代碼如下： tr td width=8% div align=centera href=首頁/a/div/td td width=9% div align=centera href= 雨晴收集 /a/div/td td width=9% div align=centera href= 雨晴圖庫 /a/div/td td width=10% div align=centera href=雨晴音樂 /a/div/td td width=9% div align=centera href=雨晴動畫 /a/div/td td width=9% div align=centera href= target=_blank網絡資源 /a/div/td td width=12%div align=centera href=liuyanben\ target=_blank雨晴留言 本 /a/div/td td width=9%a href=雨晴論壇 /a/td td width=19%a href=關于我 /a/td /tr 收藏板塊 點擊雨晴收集進入收藏板塊，該板塊收藏的有許多精品文章，如下圖： 點擊一具體文章，則進入該文章，如下圖： 該個人主頁都使用了樣式表，使整個個人主頁的風 格一致。 樣式表的代碼如下： style type=text/css ! a:link { color: 000000。 textdecoration: none} a:visited { color: 000000。 textdecoration: none} a:hover { color: 009966。 textdecoration: underline} td { fontsize: 9pt} body { fontsize: 9pt} .hight { color: 000000。 margintop: 8px。 。 。 cursor: hand} .input1 { fontsize: 12px。 width: 100px。 backgroundcolor: BDB28C。 bordertopwidth: 0px。 borderrightwidth: 0px。 borderbottomwidth: 0px。 borderleftwidth: 0px} .hight2 { lineheight: 15pt} .whitea:link { color: FFFFFF。 fontweight: bold} .l16{ lineheight: 15pt} /style 圖庫板塊 點擊雨晴圖庫進入圖庫板塊，該板塊收藏的有許多精美的圖片，如下圖： 點擊一具體圖片，則可以查看該圖的原始大小圖片，如下圖： 圖片鏈接的實現代碼如下： tr td width=20% height=13 div align=centera href=carton/ target=_blankimg src=carton/ width=100 height=75 border=0/a/div /td td height=13 width=20% div align=centera href=carton/ target=_blankimg src=carton/ width=100 height=75 border=0/a/div /td td height=13 width=20% div align=centera href=carton/ target=_blankimg src=carton/ width=100 height=75 border=0/a/div /td td height=13 width=20% div align=centera href=carton/ target=_blankimg src=carton/ width=100 height=75 border=0/a/div /td /tr tr td width=20% div align=centera href=carton/ target=_blankimg src=carton/ width=100 height=75 border=0/a/div /td td width=20% div align=centera href=carton/ target=_blankimg src=carton/ width=100 height=75 border=0/a/div /td td width=20% div align=centera href=carton/ target=_blankimg src=carton/ width=100 height=75 border=0/a/div /td td width=20% div align=centera href=carton/ target=_blankimg src=carton/ width=100 height=75 border=0/a/div /td /tr tr td width=20% div align=centera href=carton/ target=_blankimg src=carton/ width=100 height=75 border=0/a/div /td td width=20% div align=centera href=carton/ target=_blankimg src=carton/ width=100 height=75 border=0/a/div /td td width=20% div align=centera href=carton/ target=_blankimg src=carton/ width=100 height=75 border=0/a/div /td td width=20% div align=centera href=carton/ target=_blankimg src=carton/ width=100 height=75 border=0/a/div /td /tr 音樂板塊 點擊雨晴音樂進入圖庫板塊，該板塊收藏的有許多精美的圖片，如下圖： 動畫板塊 進入動畫板塊，可以看到許多 flash動畫，如下圖： 實現在網頁上顯示 flash動畫的代碼如下： br object classid=clsid:D27CDB6EAE6D11cf96B8444553540000 codebase=ersion=6,0,29,0 width=500 height=400 param name=movie value= param name=quality value=high embed src=%CC%F8%CE%E8%B5% quality=high pluginspage= type=application/xshockwaveflash width=500 height=400/embed/object br br table width=95% border=0 cellspacing=0 cellpadding=0 tr bgcolor=D6DB94 td height=1/td /tr /table ASP 編寫的頁面 用 ASP編寫的頁面是留言板塊，下面講解如何實現： 進入留言板塊后首先看到的是已有的留言，如下圖： 顯示留言的代碼如下： public sub main() do while not (TABLE cellPadding=0 cellSpacing=0 height=129 width=amp。bodywidthamp。 align=center class=table002) (tr) (td width=151 height=9 align=center class=indextd留言作者信息 /td) (td width=597 height=9table width=100% border=0 cellspacing=4 cellpadding=0) (tr) (td ) If rs(mail) then (a