ASP中if语句、select 、while循环的使用方法
<%@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 时执行了多项操作。
假如我们希望在条件为 true 时执行某条语句，并当条件不为 true 时执行另一条语句，就必须添加关键词 "Else"：
if i=10 then msgbox "Hello" else msgbox "Goodbye" end If
当条件为 true 时会执行第一段代码，当条件不成立时执行第二段代码（当 i 不等于 10 时）。
If....Then.....Elseif
假如你希望选择多套代码之一来执行，可以使用if...then...elseif语句：
if payment="Cash" then msgbox "You are going to pay cash!" elseif payment="Visa" then msgbox "You are going to pay with visa." elseif payment="AmEx" then msgbox "You are going to pay with American Express." else msgbox "Unknown method of payment." end If
Select Case
假如你希望选择多套代码之一来执行，可以使用 SELECT 语句：
select case payment case "Cash" msgbox "You are going to pay cash" case "Visa" msgbox "You are going to pay with visa" case "AmEx" msgbox "You are going to pay with American Express" case Else msgbox "Unknown method of payment" end select
以上代码的工作原理：首先，我们需要一个简单的表达式（常常是一个变量），并且这个表达式会被做一次求值运算。然后，表达式的值会与每个 case 中的值作比较，如果匹配，被匹配的 case 所对应的代码会被执行。
相关文章
Dom遍历XML的一个例子,结果为树状结构...2007-01-01
access数据库属于“文件型数据库”，创建时需要指定它要使用的文件2009-06-06
应用程序服务器被,或最终将被Web服务器所使用，它通常是运行 ASP 页面的 IIS 计算机。ASP 是您的对象的唯一客户机。它带来了专门的线程和安全考虑，本文介绍ASP的开发准则，一起来看2015-10-10
Server.Execute方法执行指定的ASP程序...2007-09-09
很多网站、博客都采用生成技术把网页生成html静态页面了，以利于搜索引擎的索引排名，减轻服务器负担。2008-08-08
SWFUpload上传组件，最初由Vinterwebb.se开发，组件主体由Flash与JavaScript整合而成，主要致力解决多文件、大文件等的上传问题，组件提供了丰富的事件与接口方便web开发者调用，开发者可以通过js与css等很方便的控制样式和实现想要的上传效果。2011-03-03
这篇文章主要介绍了ASP模拟POST请求异步提交数据的方法,本文使用MSXML2.SERVERXMLHTTP.3.0实现POST请求,需要的朋友可以参考下2014-07-07
这样的功能就是实现一般html,ubb标签的闭合，以前在pjblog中见过，一直没用，这个函数不错，建议可以参考下pjblog中的函数。2009-01-01
asp下最常用的19个基本技巧...2007-11-11
asp中向文本框输出数据原样式的函数...2007-03-03
最新评论