ASP中if語句、select 、while循環(huán)的使用方法
<%@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方法輸出地內(nèi)容!")
%>
<br />
<%
dim a,b
a=200
b=300
response.Write("兩數(shù)之和為:")
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("數(shù)值為100, 條件滿足!")
case 200
response.Write("數(shù)值為200,條件滿足 !")
case 300
response.Write("數(shù)值為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以內(nèi)所有整數(shù)的和為:")
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之內(nèi)的所有整數(shù)之和為:")
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 時,執(zhí)行某段代碼
選擇兩段代碼之一來執(zhí)行時
如果需要在條件為 true 時只執(zhí)行一行語句,可以把代碼寫為一行:
if i=10 Then msgbox "Hello"
在上面的代碼中,沒有 .else.. 語句。我們僅僅讓代碼在條件為 true 時執(zhí)行一項操作(當 i 為 10 時)。
假如我們需要在條件為 true 時執(zhí)行不止一條語句,那么就必須在一行寫一條語句,然后使用關(guān)鍵詞 "End If" 來結(jié)束這個語句:
if i=10 Then msgbox "Hello" i = i+1 end If
在上面的代碼中,同樣沒有 .else.. 語句。我們僅僅讓代碼在條件為 true 時執(zhí)行了多項操作。
假如我們希望在條件為 true 時執(zhí)行某條語句,并當條件不為 true 時執(zhí)行另一條語句,就必須添加關(guān)鍵詞 "Else":
if i=10 then msgbox "Hello" else msgbox "Goodbye" end If
當條件為 true 時會執(zhí)行第一段代碼,當條件不成立時執(zhí)行第二段代碼(當 i 不等于 10 時)。
If....Then.....Elseif
假如你希望選擇多套代碼之一來執(zhí)行,可以使用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
假如你希望選擇多套代碼之一來執(zhí)行,可以使用 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 所對應(yīng)的代碼會被執(zhí)行。
相關(guān)文章
一個非常簡單的將半角轉(zhuǎn)換為中文的函數(shù)
一個非常簡單的將半角轉(zhuǎn)換為中文的函數(shù)...2006-09-09
asp偽靜態(tài)情況下實現(xiàn)的utf-8文件緩存實現(xiàn)代碼
該程序通過使用ASP的FSO功能,減少數(shù)據(jù)庫的讀取。經(jīng)測試,可以減少90%的服務(wù)器負荷。頁面訪問速度基本與靜態(tài)頁面相當。2011-01-01
asp實現(xiàn)防止從外部提交數(shù)據(jù)的三種方法腳本之家補充
這篇文章主要介紹了asp實現(xiàn)防止從外部提交數(shù)據(jù)的三種方法,需要的朋友可以參考下2007-11-11

