大家帮我看一下 那里有错误！

Question

<SCRIPT type=text/javascript>// 幻灯片式的网页图片滚动函数（不需要做任何改动）
// 本程序由广州房产网整理，欢迎转载及提意见，版权没有
function roll_pic_flash(roll_pic_ary) {
        // 生成幻灯片式的网页图片滚动代码
        var w                        = roll_pic_ary[3][0];
        var h                        = roll_pic_ary[3][1];
        var text_h                = roll_pic_ary[3][2];
        var bgcolor                = roll_pic_ary[3][3];
        var roll_swf        = roll_pic_ary[3][4];
        var swf_height        = h + text_h;
        var pics                = roll_pic_ary[0].join("|");
        var links                = roll_pic_ary[1].join("|");
        var texts                = roll_pic_ary[2].join("|");
        return '<object classid="clsid:d27cdb6e-ae6d-11cf-96b8-444553540000" codebase="http://fpdownload.macromedia.com/pub/shockwave/cabs/flash/swflash.cab#version=6,0,0,0" width="'+ w +'" height="'+ swf_height +'"><param name="default_url" value="http://www.hbw.cn/"><param name="allowScriptAccess" value="sameDomain"><param name="movie" value="' + roll_swf + '"><param name="quality" value="high"><param name="bgcolor" value="'+bgcolor+'"><param name="menu" value="false"><param name="improved_by" value="http://www.gzfangzi.com/"><param name=wmode value="opaque"><param name="FlashVars" value="pics='+pics+'&links='+links+'&texts='+texts+'&borderwidth='+w+'&borderheight='+h+'&textheight='+text_h+'"><embed src="' + roll_swf + '" wmode="opaque" FlashVars="pics='+pics+'&links='+links+'&texts='+texts+'&borderwidth='+w+'&borderheight='+h+'&textheight='+text_h+'" menu="false" bgcolor="'+bgcolor+'" quality="high" width="'+ w +'" height="'+ h +'" allowScriptAccess="sameDomain" type="application/x-shockwave-flash" pluginspage="http://www.macromedia.com/go/getflashplayer" /></object>';}// 开始设置幻灯片参数
var roll_pic_width = 450;        // 图片宽度
var roll_pic_height = 300;        // 图片高度
var roll_text_height = 22;        // 文字高度
var roll_bgcolor = '#FFFFFF';        // 幻灯片背景色
var roll_flash = 'http://www.gzfangzi.com/demo/ad/roll_js_flash.swf'; // 幻灯片flash地址，请将此flash下载保存到你的服务器，以免失效// 幻灯片数组roll_pic_ary初始化（不用做任何改动）
var roll_pic_ary = new Array(Array(0),Array(0),Array(0),
Array(roll_pic_width,roll_pic_height,roll_text_height,roll_bgcolor,roll_flash));// 增加一个图片，连接，文字说明
<%
Sql = "Select Top 6 ID,Title,Pic From Tab_News"
rs.open sql,1,1
Do While Not rs.eof
%>
roll_pic_ary[0].push('<%=rs("Pic")%>');
roll_pic_ary[1].push(escape('NewsInfo.asp?ID=<%=rs("ID")%>'));
roll_pic_ary[2].push('<%=Trim(rs("Title"))%>');
<%
rs.moveNext
Loop
%>
// 显示幻灯片式的网页图片滚动
document.write(roll_pic_flash(roll_pic_ary));
</SCRIPT>
<br>
<hr style="border-style: dotted; border-width: 1px" width="80%" size="1" color="#C0C0C0">
</center>
</BODY>
</HTML>

Answer 1

用浏览器浏览 就出现下面的错误错误类型：
Active Server Pages, ASP 0113 (0x80004005)
超过了脚本运行的最长时间。可以为 Server.ScriptTimeOut 属性指定新值或更改 IIS 管理工具中的相应值来更改此限制。

Answer 2

应该是死循环吧
Sql = "Select Top 6 ID,Title,Pic From Tab_News"
rs.open sql,1,1
Do While Not rs.eof
%>
roll_pic_ary[0].push('<%=rs("Pic")%>');
roll_pic_ary[1].push(escape('NewsInfo.asp?ID=<%=rs("ID")%>'));
roll_pic_ary[2].push('<%=Trim(rs("Title"))%>');
<%
rs.moveNext
Loop也职能从这里找答案了
一步一步的调试rs.open sql,1,1
这一句看着很别扭啊,是不是少了一个参数??没有数据库连接?