asp-classic
Pętla

Dla pętli

W klasycznej ASP możemy określić pętlę for za pomocą słowa kluczowego for . Z instrukcją for potrzebujemy następnej instrukcji, która zwiększy licznik.

For i = 0 To 10
    Response.Write("Index: " & i)
Next

Za pomocą słowa kluczowego step można zmienić sposób, w jaki następna instrukcja zmodyfikuje licznik.

For i = 10 To 1 Step -1
    'VBS Comment
Next

Aby wyjść z pętli for, użyj instrukcji Exit For

For i = 0 To 10
    Response.Write("Index: " & i)
    If i=7 Then Exit For 'Exit loop after we write index 7
Next

Możemy również użyć pętli For...Each , aby wykonać pętlę przez szereg zdefiniowanych elementów w kolekcji. Na przykład:

Dim farm, animal
farm = New Array("Dog", "Cat", "Horse", "Cow")
Response.Write("Old MacDonald had a Farm, ")
For Each animal In farm
    Response.Write("and on that farm he had a " & animal & ".<br />")
Next

Do Loop

Wykonaj while jest bardzo podobne do pętli for, jednak na ogół jest używane, jeśli nasze powtórzenia pętli są nieznane.

Wykonaj podczas:

'Continues until i is greater than 10
Do While i <= 10
    i = i + 1
Loop

'Or we can write it so the first loop always executes unconditionally:
'Ends after our first loop as we failed this condition on our previous loop
Do
    i = i + 1
Loop While i <= 10

Rób dopóki:

'Ends once i equates to 10
Do Until i = 10
    i = i + 1
Loop

'Or we can write it so the first loop always executes unconditionally:
'Ends after our first loop as we failed this condition on our previous loop
Do
    i = i + 1
Loop Until i=10

Wyjście z pętli Do jest podobne do pętli for, ale po prostu przy użyciu instrukcji Exit Do.

'Exits after i equates to 10
Do Until i = 10
    i = i + 1
    If i = 7 Then Exit Do
Loop