六、asp 控制语句

控制语句就是说能够控制那条语句执行哪条不执行，或者按照条件去选择某个语句执行命令

1、If...Then...Else 条件语句 
语句用于计算条件是否为True 或False，并且根据计算结果指定要运行的语句。通常，条件是使用比较运算符对值或变量进行比较的表达式。
---------------------------------------------------------------------------
if strUsername="admin" and strPwd="123" then
response.Write "登录成功！"
else
response.Write "用户名或密码错！"
end if
----------------------------------------------------------------------------
如果  条件为真(用户名等于admin 并且 密码等于123)  则
让计算机执行 在客户端浏览器中输出显示“登录成功！”语句
否则
让计算机执行 在客户端浏览器中输出显示“用户名或密码错误！”语句
结束
-----------------------------------------------------------------------------
例子1---一次比较：
<%
dim zhangsan
zhangsan="男"
if zhangsan="男" then
response.Write "他是人"
end if
%>


例子2---两次比较
<%
if zhangsan="男" then    '比较条件是真（true）
response.Write "他是爷们"
else
response.Write "她是女性"
end if
%>


例子3---嵌套多次比较
'嵌套式条件语句
<%
if zhangsan="男" then
response.Write "他是爷们"
elseif zhangsan="女" then
response.Write "她是女性"
else
response.Write "我也闹不清楚"
end if
%>


例子4
<%
dim chengji
chengji = 59


if chengji>=90 then
response.Write "优秀"
elseif chengji >=80 then
response.Write "良好"
elseif chengji >=70 then
response.Write "一般"
elseif chengji >=60 then 
response.Write "合格"
else
response.Write "不及格"
end if
%>






测试：兽人的领袖“加尔鲁什”的 抗攻击值为80，魔力值为75，你若当前发功用90的攻击力和70的魔力是否可以打败“加尔鲁什”这个怪兽？
dim gs_01  '怪兽的抗击力
dim gs_02  '怪兽的魔法力
gs_01=80
gs_02=75


dim guess_01  '玩者的攻击力
dim guess_02  '玩者的魔法力
guess_01=90
guess_02=70


if guess_01>gs_01 then
response.Write "坚持！加油！"
elseif guess_02>gs_02 then
response.Write "胜利！"
else
response.Write "失败！"
end if




2、For…Next循环语句
为指定次数重复执行一组语句（一组语句可以有多条语句组成，至少一条）
格式如下：
For counter = start To end [Step step]
[statements]
[Exit For]
[statements]
Next
其中，
1） counter：用做循环计数器的数值变量。
2） start：counter 的初值。
3） end：counter的终值。
4） step：counter 的步长，的默认值为 1，step 参数可以是正数或负数。
5） statements：For 和 Next 之间的一条或多条语句，将被执行指定次数。
Exit For只能用于For...Next结构中，提供一种非正常退出循环的方法


例如：
for i=1 to 1000
response.write i&"<br>"
next


例如：步长2循环
for i=1 to 10 step 2
response.write i&"<br>"
next


例如：复合循环
For I = 1 To 10
    For J = 1 To 10
        For K = 1 To 10
        . . .
        Next
    Next
Next




测试：在页面中输出1-1000的奇数，一共多少个？
for k=1 to 1000 step 2
response.Write k&"<br>"
next


for m=1 to 1000
if m/2 then

else
response.Write m&"<br>"
end if
next




3、Do while ... Loop 循环语句


例如：输出1-1000
i=1
do while i<=1000
response.write i&"<br>"
i=i+1
loop