---- 音樂(lè)服務(wù)器（Music Server）是指一個(gè)提供音樂(lè)在線服務(wù)的服務(wù)器，它包括高端提供門戶服務(wù)的網(wǎng)站、Web數(shù)據(jù)庫(kù)和低端的操作平臺(tái)、硬件設(shè)施。目前，在Internet和Intranet上有不少這樣的站點(diǎn)，特別是在一些高速寬帶的局域網(wǎng)中（如校園網(wǎng)），音樂(lè)服務(wù)器給上網(wǎng)的朋友提供了休閑娛樂(lè)的好去處，同時(shí)也給網(wǎng)站帶來(lái)了較高的訪問(wèn)率。

----像其他站點(diǎn)一樣，音樂(lè)服務(wù)器包括網(wǎng)站和硬件兩個(gè)部分。硬件性能和服務(wù)器效率是成正比的，因而如何構(gòu)建網(wǎng)站才是一個(gè)音樂(lè)服務(wù)器的關(guān)鍵。從目前來(lái)看，網(wǎng)站基本有兩種類型：一種是運(yùn)行在Unix / Linux環(huán)境下，采用Perl / C / Php / Java 等作CGI編程語(yǔ)言；一種是運(yùn)行在Win NT Server 平臺(tái)上，采用ASP / WinCGI 作后臺(tái)語(yǔ)言。前者運(yùn)行效率高，但結(jié)構(gòu)復(fù)雜，比較適合大型站點(diǎn)；后者編程難度相對(duì)較低，而且采用ODBC驅(qū)動(dòng)接口，數(shù)據(jù)庫(kù)連接方便，特別適合作音樂(lè)服務(wù)器。

----本文將以ASP 5.0為編程環(huán)境、Mircosoft Access 97為Web 數(shù)據(jù)庫(kù)、Win NT Server 4.0為運(yùn)行平臺(tái)，舉例說(shuō)明音樂(lè)服務(wù)器的構(gòu)建步驟。

----一個(gè)基本的音樂(lè)服務(wù)器包括音樂(lè)在線欣賞、音樂(lè)排行榜、音樂(lè)主題檢索和音樂(lè)下載等四個(gè)部分。下面將主要從技術(shù)角度來(lái)討論如何實(shí)現(xiàn)以上功能。

音樂(lè)主題數(shù)據(jù)庫(kù)的規(guī)劃

----音樂(lè)主題數(shù)據(jù)庫(kù)是Web站點(diǎn)存儲(chǔ)所需音樂(lè)資料的倉(cāng)庫(kù)，它的規(guī)劃在很大程度上影響了整個(gè)網(wǎng)站的結(jié)構(gòu)和效率。數(shù)據(jù)庫(kù)中可以單獨(dú)建成一張表單，也可以以主鍵和外鍵的形式建成多張表單。本例中為說(shuō)明上的便利，建成如下單表框架： (music.mdb)

音樂(lè)在線欣賞

----在線欣賞是指客戶端利用播放器播放服務(wù)器端的音樂(lè)文件。其原理是當(dāng)客戶端向服務(wù)器提交音樂(lè)選單后，服務(wù)器生成相應(yīng)的.m3u文件，并將該文件通過(guò)Http協(xié)議下行至客戶端；客戶端將被激發(fā)調(diào)用相應(yīng)的播放器執(zhí)行該文件，從而實(shí)現(xiàn)了音樂(lè)在線欣賞功能。目前支持.m3u文件的播放器有Winamp、Realplayer G2、 Musicmatch等。當(dāng)這些播放器軟件被正確安裝在客戶端時(shí)，就可以自動(dòng)播放.m3u文件。所以解決問(wèn)題的關(guān)鍵在于后臺(tái)如何生成.m3u文件并下行到客戶端。以下利用ASP中內(nèi)置的FileSystem組件給出一種解決方案，并給出相應(yīng)程序。

＜％
dim choose,path,mydb,myset,SQL,fs,mp3
‘＃＃＃＃＃ 獲得list.htm表單中選中的歌曲項(xiàng)
對(duì)應(yīng)的id號(hào)，并賦給字串變量choose ＃＃＃＃＃
choose=“("
for i=3 to request.form.count
choose=choose＋request.form(i)＋“,"
next
choose=left(choose,len(choose)－1)＋“)"
‘＃＃＃＃＃ 判斷choose變量，如果不包含任何id號(hào)，
說(shuō)明list.htm中沒(méi)有選中任何歌曲，終止程序＃＃＃＃＃
if choose=“()" then
response.redirect(“l(fā)ist.htm")
response.end
end if
‘＃＃＃＃＃設(shè)置文件路徑，需要把temp目錄的權(quán)限設(shè)為
對(duì)internet匿名用戶具有read ＆ write 權(quán)限 ＃＃＃＃＃
path=“E:\inetpub\wwwroot\temp\"
‘＃＃＃＃＃ 創(chuàng)建文件對(duì)象 ＃＃＃＃＃
Set fs = CreateObject(“Scripting.FileSystemObject")
Set mp3 = fs.CreateTextFile(path＋“l(fā)isten.m3u", True)
‘＃＃＃＃＃ 創(chuàng)建數(shù)據(jù)庫(kù)對(duì)象＃＃＃＃＃
set mydb=server.createobject(“adodb.connection")
mydb.open “music"
‘＃＃＃＃＃ 檢索數(shù)據(jù)庫(kù)，獲得歌曲信息 ＃＃＃＃＃
SQL=“select mp3name,url from "＆dbname＆
“where id in "＆choose
set myset=tdb.execute(SQL)
do while not myset.eof
‘＃＃＃＃＃ 生成點(diǎn)播歌曲文件列表 ＃＃＃＃＃
mp3.Write(“http://"＋myset(“url")＋chr(10))
myset.movenext
loop
‘＃＃＃＃＃ 更新數(shù)據(jù)庫(kù)中的當(dāng)天點(diǎn)播次數(shù)和
總共點(diǎn)播次數(shù) ＃＃＃＃＃
SQL=“update music set click=click＋1,
this=this＋1 where id in "＆choose
mydb.execute(SQL)
‘＃＃＃＃＃ 取消對(duì)象 ＃＃＃＃＃
set myset=nothing
mydb.close
set mydb=nothing
mp3.close
set mp3=nothing
‘＃＃＃＃＃ 將該文件下載給用戶＃＃＃＃＃
response.redirect(“l(fā)isten.m3u")
response.end
％＞
----注意：利用這種方法時(shí)，要控制.m3u文件Http頭的內(nèi)容。在Winnt中可利用IIS設(shè)置.m3u文件類型的Mine內(nèi)容。具體操作如下：?jiǎn)��?dòng)IIS —＞ 選中音樂(lè)服務(wù)器所在的Web站點(diǎn) —＞ 點(diǎn)擊“屬性” 按鈕 —＞ 在出現(xiàn)的屬性選項(xiàng)卡中點(diǎn)擊“Http標(biāo)題”卡 —＞ 點(diǎn)擊“文件類型”按鈕 —＞ 點(diǎn)擊“新增類型”按鈕 —＞ 在“相應(yīng)的擴(kuò)展名”中填入“.m3u”，在“內(nèi)容類型”中填入“audio/mpegurl” —＞ 然后一路確定即可。

[1] [2]  下一頁(yè)