<%@LANGUAGE="VBSCRIPT" CODEPAGE="936"%>
<!DOCTYPE html PUBLIC "-//W3C//DTD XHTML 1.0 Transitional//EN" "http://www.w3.org/TR/xhtml1/DTD/xhtml1-transitional.dtd">
<html xmlns="http://www.w3.org/1999/xhtml">
<head>
<meta http-equiv="Content-Type" content="text/html; charset=gb2312" />
<title><%="页面标题"%></title>
</head>
<body>
<%="多条件判断"%>
<%
response.Write("<br />")
response.Write("利用response对象的Write方法输出地内容！")
%>
<br />
<%
dim a,b
a=200
b=300
response.Write("两数之和为：")
response.Write(a+b)
response.Write("<br />")
if a=100 then
response.Write("a=100,第一个条件满足。")
elseif a=200 then
response.Write("a=200,第二个条件满足。")
elseif a=300 then
response.Write("a=300,第三个条件满足。")
else
response.Write("三个条件都不满足。")
end if
%>
<%
response.Write("<br />")
dim textnumber
textnumber=200
select case textnumber
case 100
response.Write("数值为100， 条件满足！")
case 200
response.Write("数值为200，条件满足 ！")
case 300
response.Write("数值为300 ，条件满足！")
case else
response.Write("以上条件，条件都不满足！")
end select
%>
<%
response.Write("<br />")
dim i,sum
i=0
sum=0
while i<=100
sum=sum+i
i=i+1
wend
response.Write("100以内所有整数的和为：")
response.Write(sum)
%>
<%
response.Write("<br />")
dim w,s
w=0
s=0
do
s=s+w
w=w+1
loop while w<=100
response.Write("100之内的所有整数之和为：")
response.Write(s)
response.Write("<br/>")
response.Write("w的值是：")
response.Write(w)
%>
</body>
</html>
具体的介绍就不多说了，大家看下实例就可以了
考虑后期的便于阅读，黑区网络小编再为大家整理一下
asp if语句
①if A then B
②if A then
B
end if
③if A then
B
else
C
end if
④if A then
B
elseif C then
D
end if
⑤if A then
B
elseif C then
D
else
E
end if
If....Then.....Else
在下面的情况中，您可以使用 If...Then...Else 语句：
在条件为 true 时，执行某段代码
选择两段代码之一来执行时
如果需要在条件为 true 时只执行一行语句，可以把代码写为一行：
if i=10 Then msgbox "Hello"
在上面的代码中，没有 .else.. 语句。我们仅仅让代码在条件为 true 时执行一项操作（当 i 为 10 时）。
假如我们需要在条件为 true 时执行不止一条语句，那么就必须在一行写一条语句，然后使用关键词 "End If" 来结束这个语句：
if i=10 Then msgbox "Hello" i = i+1 end If
在上面的代码中，同样没有 .else.. 语句。我们仅仅让代码在条件为 true 时执行了多项操作。