echo"<param name=""rate"" value=""10"">"
echo"<param name=""balance"" value=""0"">"
echo"<param name=""currentPosition"" value=""0"">"
echo"<param name=""playCount"" value=""1"">"
echo"<param name=""autoStart"" value=""-1"">"
echo"<param name=""volume"" value=""60"">"
echo"<param name=""currentMarker"" value=""0"">"
echo"<param name=""invokeURLs"" value=""-1"">"
echo"<param name=""stretchToFit"" value=""-1"">"
echo"<param name=""windowlessVideo"" value=""0"">"
echo"<param name=""enabled"" value=""-1"">"
echo"<param name=""enableContextMenu"" value=""0"">"
echo"<param name=""fullScreen"" value=""0"">"
echo"<param name=""enableErrorDialogs"" value=""0"">"
echo"<embed src="""&fileUrl&""" align=""baseline"" type=""application/x-mplayer2"" pluginspage="""" id=""mediaPlayerObj"" showcontrols=""1"" showpositioncontrols=""0"" showaudiocontrols=""1"" showtracker=""1"" showdisplay=""0"" showstatusbar=""1"" autosize=""0"" showgotobar=""0"" showcaptioning=""0"" autostart=""1"" autorewind=""0"" animationatstart=""0"" transparentatstart=""0"" allowscan=""1"" enablecontextmenu=""1"" clicktoplay=""0"" defaultframe=""datawindow"" invokeurls=""0"" style=""width:300px;height:68px;border:1px solid #FF0000""></embed>"
echo"</object>"
End Function
Sub Getlrc(songname)
echo"<div id=""lrcxx"" style=""display:none""></div>"
echo"<span id=""lrcdata"">"
echo"<!--"
page=ajax("http://mp3.baidu.com/m?tn=baidump3lyric&word="&songname&"&ct=150994944&lm=-1&lf=3","","","")
If InStr(page,"抱歉，没有找到")>0 Then
echo "没有找到歌词"
lrcurl=""
else
regex.Pattern="(http://)S+.(lrc)"
set lrcs=regex.Execute(page)
lrcurl=lrcs(0)
If lrcs.count>0 Then
echo ajax(lrcurl,"","","")
