<%@ Language=VBScript %>
<!--#include virtual="asppages/silvi/_include/preheader.inc" -->
<html>
<head>
<title>ASP Kontrollstrukturen: Varianten des Do-Loops
</title>
<!--#include virtual="asppages/silvi/_include/header.inc" -->
</head>
<body>
<%
Dim intcounter
'Version 1.1 Do mit While und Einstiegsbedingung
intcounter = 1
Do While intcounter <= 3
Response.Write("While Einstieg: Dies ist der " & intcounter &_
"-te Durchlauf<br />" & vbCrLf)
intcounter = intcounter + 1
Loop
Response.Write(" <br />" & vbCrLf)
'Version 1.2 Do mit Until und Einstiegsbedingung
intcounter = 1
Do Until intcounter = 3
Response.Write("Until Einstieg: Dies ist der " & intcounter &_
"-te Durchlauf<br />" & vbCrLf)
intcounter = intcounter + 1
Loop
Response.Write(" <br />" & vbCrLf)
'Version 2.1 Do mit While und Ausstiegsbedingung
intcounter = 1
Do
Response.Write("While Ausstieg: Dies ist der " & intcounter &_
"-te Durchlauf<br />" & vbCrLf)
intcounter = intcounter + 1
Loop While intcounter <= 3
Response.Write(" <br />" & vbCrLf)
'Version 2.2 Do mit Until und Ausstiegsbedingung
intcounter = 1
Do
Response.Write("Until Ausstieg: Dies ist der " & intcounter &_
"-te Durchlauf<br />" & vbCrLf)
intcounter = intcounter + 1
Loop Until intcounter = 3
%>
<!--#include virtual="asppages/silvi/_include/inchtmlnachspann.asp" -->
</body>
</html>
Demo: beispiele/020vbsdoloop.asp
Letzter Update:
26.12.2021 16:48
Zurück zur
Liste mit ASP-Beispielen auf
www.ecotronics.ch