nothingthen session(playch)=Trim(Request.Form(playcheck)) DimscriptStringAsString=（读者可打开【光盘】｜【源文件】｜【实例 94 】｜【 94.2.txt 】文件，直接复制） 程序说明： 该代码其实是定义一个“ Page_Load ” 的过程，在这个过程中重新定义了数据集 “ musicData ”的查询命名，查询歌曲序号（ id ）在“ Session(“playch”) ”中的所有记录。 这与前面讲过的“ Session(“playch”) ”存储形式是相对应的。 （ 5 ）添加“ AtiveX ”组件。切换至设计视图，执行【插入】｜【媒体】｜【 AtiveX 】菜 单命令，为页面添加“ AtiveX ”九游娱乐组件。由于本实例是在线音乐，为此编辑该“ AtiveX ”为“ Media Player ”播放组件，如图 94-11 所示。 提示：图 94-11 中所示的步骤②输入“ Media Player ”的注册类 ID 为“ CLSID:6BF 52A 52- 394A -11d3-B153 -00C 04F 79FAA 6 ” ；步骤③选择的类型为“ application/x-oleobject ”； 步骤⑥添加的 3 个参数分别为参数“ URL ”，其相应值为“ music.asx ”，参数“ autoStar ”， 其值为“ true ”，参数“ playCount ”，其相应值为“ 0 ”。参数“ URL ”用于设置播放音乐的地 址，这里指的是播放列表“ music.asx ”的值。参数“ autoStar ”用于设置是否自动播放。参 数“ playCount ”用于设置循环播放的次数，当该值为“ 0 ”时，表示无限循环播放。 （ 6 ）播放列表“ asx ”文件。在开始动态生成播放列表“ music.asx ”之前，先介绍“ Media Player ”的播放列表“ asx ”文件。图 94-12 所示是一个播放列表“ asx ”文件。第 1 行是版 本号，

　　之间是一个播放流，“ asx ”文件中可以有多个播放流，并组成播 放列表。图 94-12 所示的“ asx ”文件中就有 3 个播放流。 （ 7 ）在“ Page_Load ”过程中添加如下所述的代码。 Dim xlmstring As String Dim i As Integer xlmstring =

　　For i = 0 To musicData. RecordCount - 1 xlmstring +=

　　Dim file_path As String file_path = Server.MapPath(music.asx) Dim fs As StreamWriter = New StreamWriter(file_path, False) fs.WriteLine(xlmstring) fs.Close() （读者可打开【光盘】｜【源文件】｜【实例 94 】｜【 94.3.txt 】文件，直接复制） 程序说明： 首先定义字符串变量“ xlmstring ”，并添加字符串“

　　”之间的播放流音乐文件地址为第 i 记录中字段“ url ” 的字段值（ musicData.FieldValueAtIndex(i, url, Nothing) ）。最后将生成的“ asx ”文件的 内容字符串写进播放列表“ music.asx ”文件中。 提示：在“ asx ”文件中各参数属性值不支持单引号，如果将版本号设置为“

　　”，则“ Media Player ”将不能正确播放该“ asx ”文件，其正确设置应为“

　　”。所以程序中出现一些重复的双引号，如“ xlmstring+=3.0 ”，就 是为了在“ asx ”文件中正确设置各参数的属性值。 （ 8 ）保存该动态网页为“ play.aspx ”。 音乐娱乐网站的实现，其实主要解决多媒体播放控件的设置、音乐播放列表的动态生成。在 实际应用中，应将音乐的播放次数与站点的收益联系起来，而且要解决如何防止多媒体被盗 链、下载等问题。读者们应在本实例介绍的基础上，从这几个方面作更为深入的研究。至此， 本实例介绍完毕。 连放音乐的制作方法 一、最简单的asx 连放制作： 第一：先把你所有喜欢的曲目歌址收集起来。 第二：在你的电脑屏幕上点击“开始/所有程序/附件/记事本”打开记事本。 第三：把你所有收集的歌址复制、粘贴到那新建的记事本里面，一行一个，每行前面不 要有空格，中间无须加其他代码。歌曲链接数目不限，格式不限，应以 wma、wmv、mp3 等格式为主。所选歌曲链接最好是活链接，这样可以保证连放歌曲的顺畅性，在选歌曲前， 最好先自己测试一下歌曲是否顺畅。（记住：WMA、WMV 格式的和MP3格式的可以共存．而 RM 格式的要另外处置） 第四：点击记事本上面的文件——保存为asx 格式或wma 或MP3格式。注意：你电脑里面 的下拉菜单里面并没有asx 格式的，这时你要手动输入as九游娱乐x，然后再按保存。 注意：重大发现!原来另存为MP3格式也一样可以做成连放，只可以播放全是MP3格式 文件，同理另存为wma 必须全是.wma 文件。混合的就要用ASX 格式。另，以前好像听说 保存为.jpg 或.wax 也可以，我还没有测试，呵呵。用.jpg 的保存格式，在音乐连放中加入 图片，也可以单独作为幻灯播放形式来察看图片。 第五：上传asx 文件，记住上传的地址。 第六：发贴，按照正常的发音乐贴的方法即可。 切记：要测试一下歌曲地址的连通性和传输率。要不做出来以后可能会很卡！我在选择 歌曲的时候都是选择搜索出来的最上面的。那些传输率都比较高！ 二、复杂点的asx 连放格式制作 还有一种有点复杂的asx 连放格式制作方式，它的好处是可以在播放器上面看到你的专 集名称，而且很多论坛都可以兼容。制作如下： 第一：如上新建记事本。 第二：按下面给出的公式把你的歌址一首一首粘贴上去： Copy code

　　注：可以把换成自己的网址 这是图片地址，也就是在播放器下面出来 的一个小图片。可以换成自己的图片! 这是歌曲地址,建议换成自己喜欢的 歌曲地址 三、WMP 播放列表的制作方法 wmp 播放列表也可以实现歌曲连放，以下是是 WMP 播放列表 wpl 的标准格式，你打开一 个记事本，然后把这段代码粘贴进去，再把里面的相应参数改掉——指播放列表的名字和歌 曲地址，最后把文件的后缀名改成wpl 就可以了。当然你也可以在WMP 里自行编辑，但我 认为还是用记事本比较简单。 Copy code