While...Wend

<%@Language=VBScript%>
<%Option Explicit %>
<HTML>
<HEAD>
<TITLE>While...Wend Statements</TITLE>
</HEAD>
<BODY>
<%
  a = 1
  while(a <= 10)
    Response.Write(a)
    Response.Write("<BR />")
    a = a + 1
  Wend
%>
</BODY>
</HTML>

Output

1
2
3
4
5
6
7
8
9
10

While...Wend

RELATED POSTS