Question

asp循环问题

rs.movenext
howmanyrecs=howmanyrecs+1
loop
end if
rs.close
set rs=nothing
如何让他循环30次

Answer 1

不是的。其实for循环如果不设置它的步进step，那么就是默认的每循环一次就给变量加1。相当于js中 for(i=0; i<=100-1; i++) 。只不过 i++ 没有给出来吧。
比如上面 a=1,那么打印出a的值为1.然后a就加1，和（100-1）比较，如果小于等于（100-1），就继续执行循环体内的代码,这时就打印a的值2，如此继续下去。当在最后，打印完a为99的时候，a在加1，注意这时a的值是100，和（100-1）比较，显然大于（100-1）。所以循环体内的代码不执行。但继续执行循环体 for next后面的代码，这时当然会打印a的值100了。

如将第一个代码最后next后添加 Response.Write(a&">>><br>") ，你会发现打印出的是100.

这儿for有个步进就是每次循环后a加多少的问题，如
dim a
for a=1 to 100-1 step 10
Response.Write(a&"<br>")
next
%>

它就会每循环次a+10，打印如下
1
11
21
31
41
51
61
71
81
91
满意请采纳。

Answer 2

i=0
do
if i>30 then exit do
...
i=i+1
loop

但建议别这样做，在创建记录集的时候只读取30条就好
sql="select top 30 ........."