Vamos a ver como se montan las estructuras de control if, while, etc en ASP: 
<html>

<head>
<meta http-equiv="Content-Type" content="text/html; charset=windows-1252">
<meta name="GENERATOR" content="Microsoft FrontPage 4.0">
<meta name="ProgId" content="FrontPage.Editor.Document">
<title>Pagina ASP 03 : estructuras de control</title>
</head>

<body>

<%
Dim a, b, c, d, e

a = 2
b = 6
d = 4.56
e = "No por mucho madrugar amanece mas temprano, áéíóú y ñ<br>"
Response.write("Vamos a ver<br>")

'Estructura IF-ELSE

if a < d then
 Response.write("a es menos que d <br>")
else
 Response.write("a es mayor o igual que d <br>")
end if

'Estructura elseif

if a > b then
%>
 a es mayor que d <br>
<%
elseif a < b then
%>
<table border=1>
<tr><td>B y A son iguales: <%=b %></td></tr>
</table>
<%
else
 Response.write("a es menos que d <br>")
end if

'Estructura while

c = 0

while (c<10)
 Response.write("Bucle c " & c & "<br>")
 c = c + 1
wend


'Estructura for

for b=0 to 25
 Response.write("FOR b " & b & "<br>")
next

%>
</body>

</html>
Mas ejemplos 
<html>

<head>
<meta http-equiv="Content-Type" content="text/html; charset=windows-1252">
<meta name="GENERATOR" content="Microsoft FrontPage 4.0">
<meta name="ProgId" content="FrontPage.Editor.Document">
<title>Pagina ASP 04 : estructuras de control dowhile y case</title>
</head>

<body>

<%
Dim a, b, c, d, e

a = 2
b = 6
d = 4.56
e = "No por mucho madrugar amanece mas temprano, áéíóú y ñ<br>"
Response.write("Vamos a ver<br>")

'Estructura CASE
Select case a
	case 1 : Response.write("a: el valor es 1<br>")
	case 2 : Response.write("a: el valor es 2 <br>")
	case 3 : Response.write("a: el valor es 3 <br>")
	case else: Response.write("No se que valor tiene a <br>")
end Select

Response.write("<br><b>DoWhile</b> mientras que<br>")

'Estructura DoWhile (mientras que)
d = 0
do While d > -10
 Response.write("d es menor que -10 de momento: " & d & "<br>")
 d = d - 1
loop

 Response.write("Valor actual: " & d & "<br>")

Response.write("<br><b>DoUntil</b> Hasta que<br>")
'Estructura DoUntil (hasta que)
d = 0
do Until d < -10
 Response.write("d es mayor que -10 de momento: " & d & "<br>")
 d = d - 1
loop

%>
</body>

</html>