ASP脚本循环语句~

Do...Loop: 当（或直到）条件为“真”时循环。
While...Wend: 当条件为“真”时循环。
For...Next: 指定循环次数，使用计数器重复运行语句。
For Each...Next: 对于集合中的每项或数组中的每个元素，重复执行一组语句。

 

 

For Next是先判断循环变量的值是否在指定的范围内，如果在指定的范围内，则开始执行循环体语句，否则跳出循环。
For Next 语法：
For counter = start To end [Step step] 
[statements] 
[Exit For] 
[statements] 
Next

例：

将循环次数存到一个局部变量中，尽量减少每次循环读取RS对象的次数。

mxrd = rs.recordcount
for i = 1 to mxrd
  ...
next

读结果集：

for i=1 to 4
TDate=rs1("A_AddTime")
tdate=year(tdate)&"-"&month(tdate)&"-"&day(tdate)
%>
<input name="dc" type="radio" value="<% =rs1("a_id") %>" /><% =rs1("A_Title") %><br />
<%
rs1.movenext
if rs1.eof then exit for

 

Do While Loop是先执行后判断，因此do至少要执行一次循环体。
Do While Loop 语法：
Do [{While | Until} condition] 
[statements] 
[Exit Do] 
[statements] 
Loop

例：

Response.Write "<table>"
Do While not rs.eof   
  response.write "<tr><td>" & rs("name") & "</td><td>" & rs("object") & "</td><td>" & rs("plan") & "</td></tr>"
  rs.movenext
Loop
rs.close
Response.Write "</table>"
conn.close
set conn = nothing

While Wend是先判断后执行，如果开始条件不满足，则一次循环体语句也不执行。
While Wend 语法：
While condition
[statements]
Wend
例：

i=1
While i<=9
  Response.Write i & "<br>"
  i=i+1
Wend

　　While Wend 语句没有退出循环的指令，不过可以通过在循环代码中加入特定的条件设置来结束以后的循环。请看如下代码：

i=1
While i<=9
  Response.Write i & "<br>"
  i=i+1
  If i>=5 Then i=10
Wend

 

For Each...In...Next 不是将语句运行指定的次数，而是对于数组中的每个元素或对象集合中的每一项重复一组语句。这在不知道集合中元素的数目时非常有用。

For Each 语法:

For Each element In group
[statements]
[Exit For]
[statements]
Next [element]

例：

下面示例输出所有从客户端表单提交的参数名为hobby的值:
<%
For Each Value In Request.Form("hobby")
Response.Write Value & "<br>"
Next
%>

下面示例输出所有从客户端表单提交的各个参数的值:
<%
For Each Name In Request.Form
Response.Write Request.Form(Name) & "<br>"
Next
%>