动态生成了一个m3u格式的文件，使用如下代码调用，不能调用成功，就是不能播放出来。但是，如果我把动态生成的music.m3u里面的代码copy出来用一个记事本粘贴，再保存为m3u格式的文件，调用这个文件的话可以播放。请问这是什么原因啊？谢谢了先！
<object id="song" classid="CLSID:22D6F312-B0F6-11D0-94AB-0080C74C7E95" type="application/x-oleobject" width="350" height="67">
      <param name="autoStart" value="false">
      <param name="enabled" value="true">
      <param name="filename" value="music.m3u" />
      <param name="playCount" value="1">
      <param name="ShowStatusBar" value="-1">
    </object>
动态生成M3U格式文件如下代码：
Dim strwriterobj As StreamWriter

        strwriterobj = File.CreateText("E:\lb\music.m3u")
        strwriterobj.WriteLine("<ASX Version=" & Chr(34) & "3.0" & Chr(34) & ">")

        '第一首歌曲       
        strwriterobj.WriteLine("<Entry> <Ref href=" & Chr(34) & "情人.mp3" & Chr(34) & "/> </Entry>")
        '第二首歌曲
        strwriterobj.WriteLine("<Entry> <Ref href=" & Chr(34) & "喜欢你.mp3" & Chr(34) & "/> </Entry>")
        '第三首歌曲
        strwriterobj.WriteLine("<Entry> <Ref href=" & Chr(34) & "再见理想.mp3" & Chr(34) & "/> /Entry>")
        '第四首歌曲
        strwriterobj.WriteLine("<Entry> <Ref href=" & Chr(34) & "长城.mp3" & Chr(34) & "/> </Entry>")
       
        strwriterobj.WriteLine("</ASX>")
        strwriterobj.Close()