用a sp构建音乐服务器-云南新华电脑学院.docVIP

用ASP构建音乐服务器云南新华电脑学院官方网站 音乐服务器（Music Server）是指一个提供音乐在线服务的服务器，它包括高端提供门户服务的网站、Web数据库和低端的操作平台、硬件设施。目前，在Internet和Intranet上有不少这样的站点，特别是在一些高速宽带的局域网中（如校园网），音乐服务器给上网的朋友提供了休闲娱乐的好去处，同时也给网站带来了较高的访问率。 像其他站点一样，音乐服务器包括网站和硬件两个部分。硬件性能和服务器效率是成正比的，因而如何构建网站才是一个音乐服务器的关键。从目前来看，网站基本有两种类型：一种是运行在Unix / Linux环境下，采用Perl / C / Php / Java 等作CGI编程语言；一种是运行在Win NT Server 平台上，采用ASP / WinCGI 作后台语言。前者运行效率高，但结构复杂，比较适合大型站点；后者编程难度相对较低，而且采用ODBC驱动接口，数据库连接方便，特别适合作音乐服务器。 本文将以ASP 5.0为编程环境、Mircosoft Access 97为Web 数据库、Win NT Server 4.0为运行平台，举例说明音乐服务器的构建步骤。 一个基本的音乐服务器包括音乐在线欣赏、音乐排行榜、音乐主题检索和音乐下载等四个部分。下面将主要从技术角度来讨论如何实现以上功能。 音乐主题数据库的规划 音乐主题数据库是Web站点存储所需音乐资料的仓库，它的规划在很大程度上影响了整个网站的结构和效率。数据库中可以单独建成一张表单，也可以以主键和外键的形式建成多张表单。本例中为说明上的便利，建成如下单表框架： (music.mdb) 音乐在线欣赏 在线欣赏是指客户端利用播放器播放服务器端的音乐文件。其原理是当客户端向服务器提交音乐选单后，服务器生成相应的.m3u文件，并将该文件通过Http协议下行至客户端；客户端将被激发调用相应的播放器执行该文件，从而实现了音乐在线欣赏功能。目前支持.m3u文件的播放器有Winamp、Realplayer G2、 Musicmatch等。当这些播放器软件被正确安装在客户端时，就可以自动播放.m3u文件。所以解决问题的关键在于后台如何生成.m3u文件并下行到客户端。以下利用ASP中内置的FileSystem组件给出一种解决方案，并给出相应程序。 ＜％dim choose,path,mydb,myset,SQL,fs,mp3‘＃＃＃＃＃ 获得list.htm表单中选中的歌曲项对应的id号，并赋给字串变量choose ＃＃＃＃＃choose=“(for i=3 to request.form.countchoose=choose＋request.form(i)＋“,nextchoose=left(choose,len(choose)－1)＋“)‘＃＃＃＃＃ 判断choose变量，如果不包含任何id号，说明list.htm中没有选中任何歌曲，终止程序＃＃＃＃＃if choose=“() thenresponse.redirect(“list.htm)response.endend if‘＃＃＃＃＃设置文件路径，需要把temp目录的权限设为对internet匿名用户具有read ＆ write 权限 ＃＃＃＃＃path=“E:inetpubwwwroottemp‘＃＃＃＃＃ 创建文件对象 ＃＃＃＃＃Set fs = CreateObject(“Scripting.FileSystemObject)Set mp3 = fs.CreateTextFile(path＋“listen.m3u, True) ‘＃＃＃＃＃ 创建数据库对象＃＃＃＃＃set mydb=server.createobject(“adodb.connection)mydb.open “music‘＃＃＃＃＃ 检索数据库，获得歌曲信息 ＃＃＃＃＃SQL=“select mp3name,url from ＆dbname＆“where id in ＆chooseset myset=tdb.execute(SQL)do while not myset.eof‘＃＃＃＃＃ 生成点播歌曲文件列表 ＃＃＃＃＃mp3.Write(“http://＋myset(“url)＋chr(10))myset.movenextloop‘＃＃＃＃＃ 更新数据库中的当天点播次数和总共点播次数 ＃＃＃＃＃SQL=“update music set click=click＋1,this=this＋1 where id in ＆choosemydb.execute(SQL)‘＃＃＃＃＃ 取消对象 ＃＃＃＃＃set myset=noth