asp页面打开时报错 错误 '800a041f'

[zm3965676]

Microsoft VBScript 编译器错误 错误 '800a041f'

错误的 'Next'

/h徽匠牌业/wwwroot/product/public_product.asp，行 624

next


该如何解决？希望大家能帮助我，不胜感激

[yan11cn]

把那个循环附近的代码贴一下吧 是不是next之前有未结束的if 之类的。。。

[zm3965676]

<%for i=1 to type_rowspan%>
<tr>
<%for j=1 to type_colspan
if not rs_product.eof then
%>



<%rs_product.movenext
end if
next%>（这一行就是624行）
</tr>
<%next%>

[number123456]

单看这一段应该没有问题，你前后还有没有if 或for循环的呢？

[number123456]

800A041F 不需要的 'Next'

if …… end if中还有什么代码？

[yan11cn]

[Quote=引用 4 楼 number123456 的回复:]
800A041F 不需要的 'Next'

[/Quote]。

[zm3965676]

<table width='100%' border='0' align='center' cellpadding='0' cellspacing='10'>
<%for i=1 to type_rowspan%>
<tr>
<%for j=1 to type_colspan
if not rs_product.eof then
%>
<td>
<table width='95%' border='0' align='center' cellpadding='0' cellspacing='0'>
<tr>
<%'是否要图片
if product_picturl_boolean="ttttt" then
if product_picturl_align="left" or product_picturl_align="up" then %> <td align='left'>
<table width='100%' border='0' align='center' cellpadding='0' cellspacing='0'>
<tr>
<td width="65%" align="center"><table width="100%" border="0" cellspacing="0" cellpadding="0">
<tr>
<td height="500" align="center">
<img src=<%=right(rs_product("Product_picturl_big"),len(rs_product("Product_picturl_big"))-3)%> alt='<%=rs_product("product_name")%>' border="0" style="border:1px solid #7A7A7A" id="carousel_photo" />
</td>
<p id="carousel_photo_intro"></p>
</tr>
<tr>
<td height="24" align="center">图片名称：<a href='list.asp?product_id=<%=rs_product("product_id")%>' target='_blank'>
<%=rs_product("product_name")%></a>
</td>
</tr>
<tr>
<td height="30" align="center"><a href='list.asp?product_id=<%=rs_product("product_id")%>' target='_blank'>
<img src="more.gif" width="106" height="24" border="0"/></a></td>
</tr>
</table>
</td>
<td align="center">
<%if rs_product("Product_picturl_small")<>"" then %>
<% if rs_product("Product_picturl_big")<>"" then %>
<a href='list.asp?product_id=<%=rs_product("product_id")%>' target='_blank' name="xc_image" rel="lightbox[a]">
<% end if %>
</a>
<a href='list.asp?product_id=<%=rs_product("product_id")%>' target='_blank' name="xc_image" rel="lightbox[a]"><img src=<%=right(rs_product("Product_picturl_small"),len(rs_product("Product_picturl_small"))-3)%> alt='点击查看清晰图片' width="120" height="100" border="0" style="border:1px solid #7A7A7A" /></a>
<a href='list.asp?product_id=<%=rs_product("product_id")%>' target='_blank'>
<% if rs_product("Product_picturl_big")<>"" then %>
</a>
<% end if %>
<%else response.Write "<img src='IMAGES/nopic.jpg'>"
end if%>
</td></tr>
</table>
</td>
</tr>
</table>
</td>
<%rs_product.movenext
end if
next%>
</tr>
<%next%>
</table>

[zm3965676]

倒数第4行就是那个地方报错

[yan11cn]

楼主 你的代码里面
if then
if then
end if

else
end if

比较多 仔细检查下结构 是不是有没结束的if

[zm3965676]

我解决了！谢谢大家

[ender129]

同意楼上的说法，养成好习惯 都是成对出现的 要是出现的太多的话 比如上千行代码 你可怎么找 是不是
找找吧 或者 你还有什么循环 没写next 循环和循环结束之间 是默认最短的为一套循环 而且一般写法也会串开写
例如for 他和最下面的是一套
for 他和倒数第二个是一套
for 他和下面离他最近的是一套
next
next
next