幻灯片的图片从数据库拿代码，帮我看下哪错了

[sdeduask]

<!--#include file="Inc/conn.asp"-->
<%
Set news_rs = Server.CreateObject("ADODB.Recordset")
Sql = "select * from pic order by id desc"
news_rs.open Sql,conn,1,3
%>
<table width="359" border="0" cellpadding="1" cellspacing="1" bordercolor="#FED851" bgcolor="#DAD0D1">
<tr>
<td width="355" height="187" bgcolor="#FFFFFF" valign="top">
<SCRIPT>
var NowFrame = 1;
var MaxFrame = 5;
var bStart = 0;
function fnToggle() {
var next = NowFrame + 1;
if(next == MaxFrame+1)
{
NowFrame = MaxFrame;
next = 1;
}
if(bStart == 0)
{
bStart = 1;

setTimeout('fnToggle()', 1000);
return;
}
else
{
oTransContainer.filters[0].Apply();
document.images['oDIV'+next].style.display = "";
document.images['oDIV'+NowFrame].style.display = "none";
oTransContainer.filters[0].Play(duration=5);
if(NowFrame == MaxFrame)
NowFrame = 1;
else
NowFrame++;
} setTimeout('fnToggle()', 6000);
}
fnToggle();
</SCRIPT>
<!--焦点图片开始-->
<DIV id=oTransContainer style="FILTER: progid:DXImageTransform.Microsoft.Wipe(GradientSize=1.0, wipeStyle=0, motion='forward'); WIDTH: 243px; HEIGHT: 185px">
<%
dim i
i=1
do while not news_rs.eof%>
<IMG id=oDIV <%=i%> style="BORDER-RIGHT: black 0px solid; BORDER-TOP: black 0px solid; DISPLAY: yes; BORDER-LEFT: black 0px solid; BORDER-BOTTOM: black 0px solid" height=187 src=" <%=news_rs("pic")%>" width=355 border=0>
oDIV <%=i%>
<%

news_rs.movenext
i=i+1
loop
%>
</DIV> </td>
</tr>
</table>
可以拿出来但是显示了6

[wuyanteng1]

up

[qyulang]

qiang

[正宗熊猫哥]

UP。学习的。