UC知道asp循环出错!!???
来源：百度知道 编辑：UC知道 时间：2024/09/21 20:54:51
<% '循环记录
dim i,intRecCount
rs2.movelast
intRecCount=rs2.RecordCount
rs2.movefirst
for i= 1 to intRecCount
%>
<tr>
<td> <%=rs2("m_vol")%> <%=rs2("m_unit")%></td>
<td> ￥<%=Formatnumber(rs2("m_price"),2,-1)%></td>
</tr>
<%
rs2.movenext()
next i
%>
=================================================
错误类型：
Microsoft VBScript 编译器错误 (0x800A0401)
语句未结束
/web1/product_show.asp, line 105, column 5
next i
----^
dim i,intRecCount
rs2.movelast
intRecCount=rs2.RecordCount
rs2.movefirst
for i= 1 to intRecCount
%>
<tr>
<td> <%=rs2("m_vol")%> <%=rs2("m_unit")%></td>
<td> ￥<%=Formatnumber(rs2("m_price"),2,-1)%></td>
</tr>
<%
rs2.movenext()
next i
%>
=================================================
错误类型：
Microsoft VBScript 编译器错误 (0x800A0401)
语句未结束
/web1/product_show.asp, line 105, column 5
next i
----^
<% '循环记录
dim i,intRecCount
intRecCount=rs2.RecordCount
for i= 1 to intRecCount
%>
<tr>
<td> <%=rs2("m_vol")%> <%=rs2("m_unit")%></td>
<td> ￥<%=Formatnumber(rs2("m_price"),2,-1)%></td>
</tr>
<%
rs2.movenext
next
%>
我不明白你又是last又是first的什么实际上的意义。除了教学，我认为没有你那么个写法的。
rs2.movenext()
将它改为rs2.movenext
试一下.
由于在网吧无法试调类似的程序.
所以未测试便发表.希望不要见怪.
###########################################################
楼主所用的是一种效率非常高的方法，在记录集相当大的时候其优势尤为明显。
先移动到last这样保证了RecordCount 的正确获取
然后再用for循环，避免了重复检索eof属性。
##############################################################
没有 Next i,只有Next
可以这样写：
<%
'连接数据库 xxxx
'select 数据库内容xxxx
'开始循环
if not rs2.eof then
do while not rs2.eof
%>
<tr>
<td> <%