【文章內容簡介】 表 vip表設計 字段名 數(shù)據(jù)類型及長度 說明 備注 name char(100) 用戶姓名 主關鍵字 pass char(100) 用戶密碼 not null mail char(200) 電子郵件 null sex char(50) 用戶性別 null [date] datetime(8) 注冊時間 not null admin text（ 16） 用戶類型 null 2. 用戶登錄信息表 zhuce 該表用于記錄用戶登錄的基本信息，包括用戶名（ name）、密碼（ password）及注冊時間（ [date]）。其中， name（用戶姓名）做為該表的主關鍵字。如表 所示： 表 字段名 數(shù)據(jù)類型及長度 說明 備注 name char 用戶姓名 主關鍵字 password char 用戶密碼 not null [date] datetime 注冊時間 not null 3. 歌曲基本信息表 information 該表存放歌曲的基本信息，包括歌曲 ID（ id）、歌手名字（ singer）、歌曲名（ song）、歌曲類型（ type）、新歌推薦（ class）、歌曲介紹（ introduce）、點擊率（ hit）、歌曲 URL（ url）。其中 id 字段作為該表的主關鍵字，標識為“是”，標識種子為“ 1”，標識增量為“ 1”，惟一標識了一個歌曲基本信息。如表 所示： 表 information表設計 字段名 數(shù)據(jù)類型及長度 說明 備注 id int（ 4） 歌曲 ID 主關鍵字 singer char（ 100） 歌手姓名 null song char（ 500） 歌曲名字 null type char（ 100） 歌曲類型 null class char（ 100） 新歌推薦 null introduce char（ 1000） 歌曲介紹 null hit int（ 4） 點擊率 null url char（ 3000） 歌曲 url null 4. 電影基本信息表 movie 該表存放電影的基本信息，包括主要電影 ID（ id）、演員姓名（ name）、電影名字（ moviename）、電影圖片（ moviephoto）、電影 URL（ movieurl）、電影簡介（ movieinform）、電影類型（ type）、上傳時間（ [date]）。其中電影 ID 為主關鍵字。如下表所示： 表 movie表設計 字段名 數(shù)據(jù)類型及長度 說明 備注 id int（ 4） 電影 ID 主關鍵字 name char（ 1000） 演員姓名 null moviename char（ 1000） 電影名字 null moviephoto char（ 1500） 電影圖片 null moveurl char（ 2021） 電影 URL null movieinform char（ 1000） 電影簡介 null type char（ 500） 電影類型 null [date] int（ 8） 上傳時間 null 5. 專集基本信息表 zhuanji 該表存放歌曲專集的基本信息，包括專集 ID（ id）、專集類型（ type）、專集名稱（ song）、點擊率（ hit）、專集介紹（ introduce）、專集 URL（ url）、專集圖片（ photo）。其中專集 ID為主關鍵字。如下 表所示： 表 字段名 數(shù)據(jù)類型及長度 說明 備注 id int（ 4） 專集 ID 主關鍵字 type char（ 100） 專集類型 null song char（ 700） 專集名稱 null hit char（ 100） 點擊率 null introduce char（ 5000） 專集介紹 null url char（ 1000） 專集 URL null photo char（ 1000） 專集圖片 null 6. 論壇數(shù)據(jù)信息表 BBS 該表存放論壇留言功能具體信息。包括論壇 ID（ id）、用戶名（ username）、留言（ message）和留言時間（ [date]）。其中論壇 ID 為主關鍵字。 表 BBS表設計 字段 名 數(shù)據(jù)類型及長度 說明 備注 id int（ 4） 論壇 ID 主關鍵字 username char（ 50） 用戶名 null message varchar（ 5000） 留言 null [date] int（ 8） 留言時間 not null 網(wǎng)站主頁的實現(xiàn) 用戶注冊后登錄網(wǎng)站，便進入主頁，即可在首頁上點相應導航鏈接，進行所需操作。未經(jīng)注冊的會員也能登錄主頁，但不能進行試聽歌曲等其他操作。 主頁是通過對其他頁面進行鏈接實現(xiàn)的，本系統(tǒng)還實現(xiàn)各種分類功能，如：華語男歌手 、華語女歌手、國外歌曲、動漫歌曲、音樂排行榜、新歌推薦等，還提供搜索功能，根據(jù)歌曲或歌手來實現(xiàn)搜索功能，主頁頁面如下圖所示。 圖 登錄功能的實現(xiàn)我們采用第一個表單頁面讓用戶輸入自己的會員賬號和密碼，然后發(fā)送到 頁面上查詢數(shù)據(jù)庫中保存的賬號和密碼進行身份驗證，因為每一個用戶登錄系統(tǒng)都會自動分配一個 session，所以我們把驗證后的信息存儲到 session 里面，方便后續(xù)頁面的調用和認證： !include file= center img src=img/ /span class=STYLE1 % username=(name) password=(pass) exec=select * from vip where( name=39。amp。usernameamp。39。 and pass=39。amp。passwordamp。39。 ) set rs=() exec,conn,1,1 if not then session(check)=checked session(name)=username else session(check)= (出錯拉，請你重新登錄 ! 特別提醒 : 賬號和密碼是您登錄本系統(tǒng)的唯一認證 ,希望您妥善保管 ! ) end if % % set conn=nothing % /span /center 圖 主頁頁面 前臺主頁面顯示了幾個大塊：一，音樂分類導航 二，專集列表 三，歌曲列表 四，會員登錄信息 五，音樂搜索 六，新歌推薦 七，歌曲排行榜以及合作伙伴的鏈接。 主要代碼如下： !include file= td height=25div align=center a href=./ 首頁/a/div/td ?? tddiv align=centera href=./ target=_parent用戶登錄 /a/div/td tddiv align=center % if session(name)=admin then % a href= %(管理 )% /a/div %else% span class=STYLE19 %(你是游客身份！ ) end if % 1. 會員信息代碼： tr td bordercolor=FFFFFF會員信息：歡迎您 : %() amp。 session(name)% br 你的登錄時間 :br %(now)%/td /tr 2. 音樂搜索代碼： form action= method=post 歌手 : input name=singer type=text style=width:120px / br / 歌曲 : input type=text name=songstyle=width:120px / br / input type=submit value=ok.. / /form 3. 新 歌推薦代碼： ul % exec0=select * from information where class=39。new39。 set rs0=() exec0,conn,1,1 do while not % lia href=%=rs0(url)%%=rs0(song)%%=rs0(singer)%/a/li % loop % /ul 4. 歌曲列表模塊代碼 ： % exec=select * from information where type=39。華語男歌手 39。 order by hit desc set rs=() exec,conn,1,1 do while not % /span /td /tr tr tdspan class=STYLE25%=rs(singer)%/span /td tdspan class=STYLE25%=rs(song)%/span /td tdspan class=STYLE25%=rs(hit)%/span /td tdspan class=STYLE9/span a href=?filename=%=rs(song)% target=_blank 試聽/a/td tda href=?filename=%=rs(song)% target=_blankspan class=STYLE25下載 /span/a % loop % 5. 數(shù)據(jù)庫關閉并且釋放內存代碼： % set rs=nothing set rs0=nothing set rs1=nothing set conn=nothing % 歌曲試聽下載頁面 1. 音樂在線視聽的設計與實現(xiàn) 圖 在線視聽 會員根據(jù)喜好選擇歌曲，點擊即可在線試聽歌曲或下載歌曲 。 在線視聽功能采取的原理是在頁面上嵌入一個 windowns 自帶的播放器，獲取上個頁面請求的歌曲路徑加入播放列表然后進行播放，頁面代碼如下： !include file= % if session(check)=checked then % % song=(filename) exec=select * from information where song=39。amp。songamp。39。 set rs=() exec,conn,1,3 rs(hit)=rs(hit)+1 % table width=308 border=1 bordercolor=999999 trtd bordercolor=FFFFFF歌手： %=rs(singer)% trtd bordercolor=FFFFFF歌名： %=rs(song)% trtd bordercolor=FFFFFF類別： %=rs(type)% trtd bordercolor=FFFFFF試聽： %=rs(hit)%次 trtd height=117 bordercolor=FFFFFF object CLASSID=CLSID:6BF52A52394A11d3B15300C04F79FAA6width=300 height=100 align=absmiddle id= param name=url value=%=rs(url)% param name=rate value=1 param name=balance value=0 param name=currentposition value=0 /object /table %else% script alert(打擾了，管理員提醒你登錄后重試！ )。 /script %end if % 2. 音樂下載頁面的設計與實現(xiàn) 圖 歌曲下載頁面 音樂下載是本系統(tǒng)的最關鍵的模塊，這個頁面必須要是本站的會員才能夠使用。他的主要實現(xiàn)的通過對 asp 對象 Stream 的讀寫操作實現(xiàn)的，為了安全性，我們禁止用戶下載本站的程序文件和相關數(shù)據(jù)庫文件，這樣就很好的阻止了許多不合法的操作。代碼如下： !include file= % if session(check)checked then% script alert(對不起，管理員 提醒你登錄 !) /script % else % % Dim Stream Dim Contents Dim FileName Dim FileExt Const adTypeBinary = 1 FileName = (filename) if FileName = Then 無效文件名 . End if 39。 下面是不希望下載的文件 FileExt = Mid(FileName, InStrRev(FileName, .)