1

我想编辑一些用经典 ASP 编写的遗留代码。

目前我已经声明了一个子程序,它使用 for-next 循环输出一些单选按钮:

 For i = 1 to Cols
   response.write "blah"
   ...
 Next

i只是一个计数器,Cols是传递给子例程的值。我尝试将 for 循环编辑为 while 循环:

i = Start
do while i <= Cols
  response.write "blah"
  ...
  i = i + 1
loop

但我收到一个超出响应缓冲区限制的错误。如果我用它的值替换 Cols 就可以了。这是经典 ASP 的限制吗?


我想使用 do while 循环的原因是因为当前子例程仅限于从 1 循环到Cols。有时向后指定循环计数(即步骤-1)会有所帮助,但我不能写:

if Direction = Backwards then 
  For i = Cols to 1 step -1
else
  For i = 1 to Cols
end if
4

1 回答 1

5

怎么样:

If Direction = Backwards Then
    cs = 10
    ce = 1
    s = -1
Else
    cs = 1
    ce = 10
    s = 1
End If

For i = cs To ce Step s
    ''
Next
于 2012-04-16T16:40:48.013 回答