p;<div align="center">
<input type="submit" name="Submit" value="--确定--">
<input type="hidden" name="loadno" value="yes">
<%=msg%> </div>
</td>
</tr>
</table>
</form>
<p> </p>
<script language="javascript">
setid();
</script>
/////////////////////////////////////////////////////////////////
input.asp输入音乐文件路径
<form action="create_file.asp" method="post">
mp3路径:<input type="text" name="file_src">
<input type="submit">
</form>
create_file.asp生成播放列表
<%
file_src=trim(request.form("file_src"))
if file_src="" or isempty(file_src) then
%>
请填写MP3文件路径
<%else
strTmp=replace(replace(replace(now,":","")," ",""),"-","")
set objFso=Server.CreateObject("Scripting.FileSystemObject")
set txtFso=objFso.CreateTextFile(server.mappath(strTmp&".m3u"),true)
txtFso.writeline file_src
set txtFso=nothing
set objFso=nothing
%>
生成的m3u文件为:<a href="<%=strTmp%>.m3u"><%=strTmp%>.m3u</a>
<%
end if
%>
<input type="submit" name="Submit" value="--确定--">
<input type="hidden" name="loadno" value="yes">
<%=msg%> </div>
</td>
</tr>
</table>
</form>
<p> </p>
<script language="javascript">
setid();
</script>
/////////////////////////////////////////////////////////////////
input.asp输入音乐文件路径
<form action="create_file.asp" method="post">
mp3路径:<input type="text" name="file_src">
<input type="submit">
</form>
create_file.asp生成播放列表
<%
file_src=trim(request.form("file_src"))
if file_src="" or isempty(file_src) then
%>
请填写MP3文件路径
<%else
strTmp=replace(replace(replace(now,":","")," ",""),"-","")
set objFso=Server.CreateObject("Scripting.FileSystemObject")
set txtFso=objFso.CreateTextFile(server.mappath(strTmp&".m3u"),true)
txtFso.writeline file_src
set txtFso=nothing
set objFso=nothing
%>
生成的m3u文件为:<a href="<%=strTmp%>.m3u"><%=strTmp%>.m3u</a>
<%
end if
%>
| 对此文章发表了评论 |
