Microsoft VBScript 运行时错误 错误 '800a0009' 下标越界: '1' NewsNewsinfo.asp，行 135

pii超过了ttp这个数组的最大索引值，就会提示“下标越界”。至于为什么会超过，仅从你这些代码是看不出的。你应该先判断pii是否超出数组上限再来做下一步动作：

比如把第135行改为如下：

<td width="160" rowspan="9" align="center" ><%if pii<=ubound(ttp) then response.write ttp(pii)%></td>

你用的这个函数由于使用的是高层传输协议，很容易超时，即使能够判断也因为重试次数太多而无法使用。至于curl函数，则不是为这种应用设计的。最好是使用fsocket函数，不会存在你说的问题。

百度的这个音乐播放器是有代码的,但是这个显示歌词,是直接镶嵌到网页里的.没有单独的代码.它的网页的整个播放器还有歌词的代码是这样的:

</SCRIPT>

<DIV id=Lrc_div>

<DIV id=url_div>歌曲出处：<A id=song_url href="http://play8.tom.com/uploadfile/song/200702/20/1171954091_245437.mp3">http://play8.tom.com/...1171954091_245437.mp3</A></DIV>

<DIV id=song style="DISPLAY: none">爱情转移</DIV>

<DIV id=singer style="DISPLAY: none">陈奕迅</DIV>

<DIV id=song_div>歌曲试听：<B>爱情转移 网搜 MP3 Wang ... </B></DIV>

<DIV id=S_div>

<DIV id=player_div>

<OBJECT id=MediaPlayer1 codeBase=http://activex.microsoft.com/activex/controls/mplayer/en/nsmp2inf.cab#Version=6,4,5,715 type=application/x-oleobject height=68 standby="Loading Microsoft Windows Media Player components..." width=350 align=baseline border=0 classid=CLSID:22d6f312-b0f6-11d0-94ab-0080c74c7e95>

<embed src="http://play8.tom.com/uploadfile/song/200702/20/1171954091_245437.mp3" align="baseline" border="0" width="350" height="68"

type="application/x-mplayer2"

pluginspage="http://www.microsoft.com/isapi/redir.dll?prd=windows&sbp=mediaplayer&ar=media&sba=plugin&"

name="MediaPlayer" 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"></embed></OBJECT></DIV>

<DIV id=SongNum_div>

<DIV id=plus_div contentEditable=false onclick="if(!isLoadIf) {window.document.getElementById('plus_a').target='mt'reWin()} else {try_iframe.Controller(event)if(!is_ext_mb) reWin()return false}"><A id=plus_a contentEditable=false style="CURSOR: hand">放入我的音乐盒</A></DIV>

<DIV id=next_div contentEditable=false style="DISPLAY: none" onclick="try_iframe.Controller(event)return false"><A id=next_a contentEditable=false style="CURSOR: hand">下一首</A></DIV>

<DIV id=pre_div contentEditable=false style="DISPLAY: none" onclick="try_iframe.Controller(event)return false"><A id=pre_a contentEditable=false style="CURSOR: hand" ?>上一首</A></DIV></DIV></DIV>

<DIV id=Blrc style="CLEAR: both">

<DIV style="BORDER-RIGHT: #b4c2e2 1px solidBORDER-TOP: #b4c2e2 1px solidFONT-SIZE: 12pxBORDER-LEFT: #b4c2e2 1px solidWIDTH: 350pxBORDER-BOTTOM: #b4c2e2 1px solidTEXT-ALIGN: left">

<TABLE style="BACKGROUND: #eceded" cellSpacing=0 cellPadding=0 width=350>

<TBODY>

<TR>

<TD style="PADDING-RIGHT: 10pxPADDING-LEFT: 10pxFONT-SIZE: 12pxPADDING-BOTTOM: 1pxPADDING-TOP: 5pxTEXT-ALIGN: left"><B>歌词：</B></TD>

<TD style="TEXT-ALIGN: right"></TD></TR></TBODY></TABLE>

<DIV id=LrcShower_div style="OVERFLOW-Y: scrollBACKGROUND: #fffOVERFLOW-X: hiddenWIDTH: 350pxLINE-HEIGHT: 20pxHEIGHT: 276px"><BR><BR><BR><BR><BR><BR><BR><SPAN style="FONT-SIZE: 12pxMARGIN-LEFT: 12px"> <FONT color=#000000>陈奕迅</FONT></SPAN><BR><SPAN style="FONT-SIZE: 12pxMARGIN-LEFT: 12px"> <FONT color=#000000>爱情转移</FONT></SPAN><BR><SPAN style="FONT-SIZE: 12pxMARGIN-LEFT: 12px"> <FONT color=#000000>徘徊过多少橱窗 住过多少旅馆</FONT></SPAN><BR><SPAN style="FONT-SIZE: 12pxMARGIN-LEFT: 12px"> <FONT color=#000000>才会觉得分离也并不冤枉</FONT></SPAN><BR><SPAN style="FONT-SIZE: 12pxMARGIN-LEFT: 12px"> <FONT color=#000000>感情是用来浏览 还是用来珍藏</FONT></SPAN><BR><SPAN style="FONT-SIZE: 12pxMARGIN-LEFT: 12px"> <FONT color=#000000>好让日子天天都过得难忘</FONT></SPAN><BR><SPAN style="FONT-SIZE: 12pxMARGIN-LEFT: 12px"> <FONT color=#000000>熬过了多久患难 湿了多长眼眶</FONT></SPAN><BR><SPAN style="FONT-SIZE: 12pxMARGIN-LEFT: 12px"> <FONT color=#000000>才能知道伤感是爱的遗产</FONT></SPAN><BR><SPAN style="FONT-SIZE: 12pxMARGIN-LEFT: 12px"> <FONT color=#000000>流浪几张双人床 换过几次信仰</FONT></SPAN><BR><SPAN style="FONT-SIZE: 12pxMARGIN-LEFT: 12px"> <FONT color=#000000>才让戒指义无返顾的交换</FONT></SPAN><BR><SPAN style="FONT-SIZE: 12pxMARGIN-LEFT: 12px"> <FONT color=#000000>把一个人的温暖转移到另一个的胸膛</FONT></SPAN><BR><SPAN style="FONT-SIZE: 12pxMARGIN-LEFT: 12px"> <FONT color=#000000>让上次犯的错反省出梦想</FONT></SPAN><BR><SPAN style="FONT-SIZE: 12pxMARGIN-LEFT: 12px"> <FONT color=#000000>每个人都是这样 享受过提心吊胆</FONT></SPAN><BR><SPAN style="FONT-SIZE: 12pxMARGIN-LEFT: 12px"> <FONT color=#000000>才拒绝做爱情待罪的羔羊</FONT></SPAN><BR><SPAN style="FONT-SIZE: 12pxMARGIN-LEFT: 12px"> <FONT color=#000000>回忆是捉不到的月光握紧就变黑暗</FONT></SPAN><BR><SPAN style="FONT-SIZE: 12pxMARGIN-LEFT: 12px"> <FONT color=#000000>让虚假的背影消失于晴朗</FONT></SPAN><BR><SPAN style="FONT-SIZE: 12pxMARGIN-LEFT: 12px"> <FONT color=#000000>阳光在身上流转 等所有业障被原谅</FONT></SPAN><BR><SPAN style="FONT-SIZE: 12pxMARGIN-LEFT: 12px"> <FONT color=#000000>爱情不停站 想开往地老天荒 需要多勇敢</FONT></SPAN><BR><SPAN style="FONT-SIZE: 12pxMARGIN-LEFT: 12px"> <FONT color=#000000>烛光照亮了晚餐 照不出个答案</FONT></SPAN><BR><SPAN style="FONT-SIZE: 12pxMARGIN-LEFT: 12px"> <FONT color=#000000>恋爱不是温馨的请客吃饭</FONT></SPAN><BR><SPAN style="FONT-SIZE: 12pxMARGIN-LEFT: 12px"> <FONT color=#000000>床单上扑满花瓣 拥抱让它成长</FONT></SPAN><BR><SPAN style="FONT-SIZE: 12pxMARGIN-LEFT: 12px"> <FONT color=#000000>太拥挤就开到了别的土壤</FONT></SPAN><BR><SPAN style="FONT-SIZE: 12pxMARGIN-LEFT: 12px"> <FONT color=#000000>感情需要人接班 接近换来期望</FONT></SPAN><BR><SPAN style="FONT-SIZE: 12pxMARGIN-LEFT: 12px"> <FONT color=#000000>期望带来失望的恶性循环</FONT></SPAN><BR><SPAN style="FONT-SIZE: 12pxMARGIN-LEFT: 12px"> <FONT color=#000000>短暂的总是浪漫 漫长总会不满</FONT></SPAN><BR><SPAN style="FONT-SIZE: 12pxMARGIN-LEFT: 12px"> <FONT color=#000000>烧完美好青春换一个老伴</FONT></SPAN><BR><SPAN style="FONT-SIZE: 12pxMARGIN-LEFT: 12px"> <FONT color=#000000>把一个人的温暖转移到另一个的胸膛</FONT></SPAN><BR><SPAN style="FONT-SIZE: 12pxMARGIN-LEFT: 12px"> <FONT color=#000000>让上次犯的错反省出梦想</FONT></SPAN><BR><SPAN style="FONT-SIZE: 12pxMARGIN-LEFT: 12px"> <FONT color=#000000>每个人都是这样 享受过提心吊胆</FONT></SPAN><BR><SPAN style="FONT-SIZE: 12pxMARGIN-LEFT: 12px"> <FONT color=#000000>才拒绝做爱情待罪的羔羊</FONT></SPAN><BR><SPAN style="FONT-SIZE: 12pxMARGIN-LEFT: 12px"> <FONT color=#000000>回忆是捉不到的月光握紧就变黑暗</FONT></SPAN><BR><SPAN style="FONT-SIZE: 12pxMARGIN-LEFT: 12px"> <FONT color=#000000>让虚假的背影消失于晴朗</FONT></SPAN><BR><SPAN style="FONT-SIZE: 12pxMARGIN-LEFT: 12px"> <FONT color=#000000>阳光在身上流转 等所有业障被原谅</FONT></SPAN><BR><SPAN style="FONT-SIZE: 12pxMARGIN-LEFT: 12px"> <FONT color=#000000>爱情不停站 想开往地老天荒 需要多勇敢</FONT></SPAN><BR><SPAN style="FONT-SIZE: 12pxMARGIN-LEFT: 12px"> <FONT color=#000000>把一个人的温暖转移到另一个的胸膛</FONT></SPAN><BR><SPAN style="FONT-SIZE: 12pxMARGIN-LEFT: 12px"> <FONT color=#000000>让上次犯的错反省出梦想</FONT></SPAN><BR><SPAN style="FONT-SIZE: 12pxMARGIN-LEFT: 12px"> <FONT color=#000000>每个人都是这样 享受过提心吊胆</FONT></SPAN><BR><SPAN style="FONT-SIZE: 12pxMARGIN-LEFT: 12px"> <FONT color=#000000>才拒绝做爱情待罪的羔羊</FONT></SPAN><BR><SPAN style="FONT-SIZE: 12pxMARGIN-LEFT: 12px"> <FONT color=#000000>回忆是捉不到的月光握紧就变黑暗</FONT></SPAN><BR><SPAN style="FONT-SIZE: 12pxMARGIN-LEFT: 12px"> <FONT color=#000000>让虚假的背影消失于晴朗</FONT></SPAN><BR><SPAN style="FONT-SIZE: 12pxMARGIN-LEFT: 12px"> <FONT color=#000000>阳光在身上流转 等所有业障被原谅</FONT></SPAN><BR><SPAN class=prelrc> 爱情不停站 想开往地老天荒 需要多勇敢</SPAN><BR><SPAN class=nowlrc> 你不要失望 荡气回肠是为了 最美的平凡.......</SPAN><BR><SPAN style="FONT-SIZE: 12pxMARGIN-LEFT: 12px"> <FONT color=#000000>Over...</FONT></SPAN><BR><BR><BR><BR><BR><BR><BR><BR></DIV></DIV></DIV>

<DIV id=lrctellall_div style="DISPLAY: none"></DIV>

<DIV id=InP_div><A href="http://post.baidu.com/f?kw=%B0%D9%B6%C8MP3%CA%D4%CC%FD" target=_blank>意见与反馈</A>  <A style="COLOR: #666666" href="http://www.baidu.com/search/listencopyright.html" target=_blank>权利声明</A></DIV><!-- script type="text/javascript" src="js/jslog.js"></script>-->

<SCRIPT>

---