可自动创建列表的Flash Mp3 Player播放器

在网上下载了这个播放器下来，发现很不错，非常适合BLOG使用，但是，缺点是创建播放列表太麻烦了。
于是，用ASP+FSO写了一个遍历文件夹下文件的程序，经过改良，现在基本上使用起来也没有问题了。拿过来与大家一起共享。欢迎大家给我提出宝贵的意见。如果有必要，还可以继续修改！

    下面，我来简单介绍一下这个东西的用法，其实很简单的。
第一步：把文件传到服务器上面去，默认设置传到服务器的Music目录中去，如果没有，则自己创建一个。


第二步：创建一个侧边栏模块


第三步：输入框架页代码





第四步：把文件传到服务器上的Music/Mp3目录中去。注意，这个目录除了Mp3不要放其他的文件，不然也会被创建到播放列表中去。

模块HTML代码

程序代码

<iframe src="/Music/Player.asp" frameborder="0" height="200" width="180" marginheight="0" marginwidth="0"></iframe>

另外，附上每个文件的说明，可根据自己的情况进行更改。
AutoLst.asp               //播放列表自动创建文件，实际上本身就是一个自动更新的播放列表
mp3player.swf           //Flash播放器
player.asp                 //显示播放器的页面
ufo.js                       //播放器所必须的JS脚本（不要动）


如果需要将歌曲传到其它目录，则修改的方法是：
打开AutoLst.asp文件，找到：

程序代码

Path = Server.MapPath(" /Music/Mp3/") & Dir
Set FsoFile = Fso.GetFolder(Server.MapPath(" /Music/Mp3/"))

修改为：

程序代码

Path = Server.MapPath(" 您的目录") & Dir
Set FsoFile = Fso.GetFolder(Server.MapPath(" 您的目录"))

找到

程序代码

    <title><%=Left(FileName,Len(FileName)-4)%></title>
    <location> /Music/Mp3/<%=FileName%></location>

修改为

程序代码

    <title><%=Left(FileName,Len(FileName)-4)%></title>
    <location>/您的目录/<%=FileName%></location>

如果这个ASP程序也要自己传到其它目录，那么修改一下模块的HTML代码即可：

程序代码

<iframe src=" /Music/Player.asp" frameborder="0" height="200" width="180" marginheight="0" marginwidth="0"></iframe>

改为

程序代码

<iframe src=" /您的目录/Player.asp" frameborder="0" height="200" width="180" marginheight="0" marginwidth="0"></iframe>

好了。写得够详细了。还是不懂，那你去找块豆腐去，就知道怎么做了，不要问我为什么！


点击下载此文件

转载于:https://www.cnblogs.com/JemBai/archive/2008/08/18/1270305.html