ASP腳本循環(huán)語(yǔ)句詳細(xì)教學(xué)

ASP腳本循環(huán)語(yǔ)句詳細(xì)教學(xué)ASP動(dòng)態(tài)服務(wù)器頁(yè)面環(huán)境的特點(diǎn)就在于它是通過(guò)一種或幾種腳本語(yǔ)言而寫(xiě)成的，腳本語(yǔ)言可以看作是編程語(yǔ)言的簡(jiǎn)化版，它易于學(xué)習(xí)和掌握，這給廣大動(dòng)態(tài)網(wǎng)站的設(shè)計(jì)者們提供了相當(dāng)大的便利?？梢赃@么說(shuō)：腳本語(yǔ)言運(yùn)用的得當(dāng)與否直接關(guān)系到ASP應(yīng)用程序的優(yōu)與劣。繼上一篇我們學(xué)習(xí)了腳本語(yǔ)言VBScript的函數(shù)和條件語(yǔ)句后，今天我們繼續(xù)來(lái)看看VBScript中的循環(huán)語(yǔ)句。循環(huán)語(yǔ)句的作用就是重復(fù)執(zhí)行程序代碼，循環(huán)可分為三類：一類在條件變?yōu)椤凹佟敝爸貜?fù)執(zhí)行語(yǔ)句，一類在條件變?yōu)椤罢妗敝爸貜?fù)執(zhí)行語(yǔ)句，另一類按照指定的次數(shù)重復(fù)執(zhí)行語(yǔ)句。在VBScript中可使用下列循環(huán)語(yǔ)句：Do...Loop:當(dāng)(或直到)條件為“真”時(shí)循環(huán)。While...Wend:當(dāng)條件為“真”時(shí)循環(huán)。For...Next:指定循環(huán)次數(shù)，使用計(jì)數(shù)器重復(fù)運(yùn)行語(yǔ)句。ForEach...Next:對(duì)于集合中的每項(xiàng)或數(shù)組中的每個(gè)元素，重復(fù)執(zhí)行一組語(yǔ)句。我們先來(lái)看看Do...Loop,它是可以多次(次數(shù)不定)運(yùn)行語(yǔ)句塊。當(dāng)條件為“真”時(shí)或條件變?yōu)椤罢妗敝?，重?fù)執(zhí)行語(yǔ)句塊。請(qǐng)看下例：〈htmlXhead>title>DoLoop.asp</titleXbodybgcolor="#FFFFFF"X/headXp></p>p>請(qǐng)將今年到本月為止的每個(gè)月份的.銷售結(jié)算記錄填寫(xiě)在本頁(yè)之上。<p><%counter=1thismonth=month(now())Dowhilecounter<thismonth+1response,write〃〃&counter&〃月份:〃response,write〃〃&〃〈BRXbr>〃Ifcounter>13thenexitdoendifcounter=counter+1Loop%><hr></bodyX/html>這段ASP程序運(yùn)用循環(huán)語(yǔ)句制作了一張銷售結(jié)算記錄表，將以上代碼剪貼至記事簿保存為DoLoop.asp,并在瀏覽器中以HTTP方式進(jìn)行瀏覽，根據(jù)當(dāng)前的月份的不同，你將看到如下圖的結(jié)果。我們來(lái)分析一下此段程序，我們的目的是要根據(jù)當(dāng)前的月份打印一張表格，首先我們建立一個(gè)計(jì)數(shù)器“count”并將其值設(shè)為1,然后我們用函數(shù)month()和now()得到當(dāng)前的月份，最后建立循環(huán)，當(dāng)count的值小于當(dāng)前月份的值加1的時(shí)候，即顯示月份值及一條橫線并將count的值加1,循環(huán)語(yǔ)句重復(fù)執(zhí)行直到以上條件為假時(shí)退出循環(huán)。其中如果count大于13則用exitdo立即退出循環(huán)。DoLoop語(yǔ)句還可以使用以下語(yǔ)法：Do[statements][ExitDo.[statements]Loop[{While|Until}condition]While...Wend語(yǔ)句是為那些熟悉其用法的用戶提供的。但是由于While...Wend缺少靈活性，所以建議最好使用Do...Loop語(yǔ)句。下面我們來(lái)看看ForNext語(yǔ)句。For...Next語(yǔ)句用于將語(yǔ)句塊運(yùn)行指定的次數(shù)，在循環(huán)中使用計(jì)數(shù)器變量，該變量的值隨每一次循環(huán)增加或減少。下面的示例將過(guò)程MyProc重復(fù)執(zhí)行50次。For語(yǔ)句指定計(jì)數(shù)器變量x及其起始值與終止值。Next語(yǔ)句使計(jì)數(shù)器變量每次加loSubDoMyProc50Times()DimxForx=1To50MyProcNextEndSub關(guān)鍵字Step用于指定計(jì)數(shù)器變量每次增加或減少的值。在下面的示例中，計(jì)數(shù)器變量j每次加2o循環(huán)結(jié)束后，total的值為2、4、6、8和10的總和。SubTwosTotal()Dimj,totalForj=2To10Step2total=total+jNextMsgBox〃總和為〃&total&〃。〃EndSub要使計(jì)數(shù)器變量遞減，可將Step設(shè)為負(fù)值。此時(shí)計(jì)數(shù)器變量的終止值必須小于起始值。在下面的示例中，計(jì)數(shù)器變量myNum每次減2。循環(huán)結(jié)束后，total的值為16、14、12、10、8、6、4和2的總和。SubNewTotal()DimmyNum,totalFormyNum=16To2Step-2total=total+myNumNextMsgBox〃總和為〃&total&/zoEndSubExitFor語(yǔ)句用于在計(jì)數(shù)器達(dá)到其終止值之前退出For...Next語(yǔ)句。因?yàn)橥ǔＶ皇窃谀承┨厥馇闆r下(例如在發(fā)生錯(cuò)誤時(shí))要退出循環(huán)，所以可以在If...Then...Else語(yǔ)句的True語(yǔ)句塊中使用ExitFor語(yǔ)句。如果條件為False,循環(huán)將照常運(yùn)行。最后，讓我們來(lái)看看ForEach...Next語(yǔ)句,ForEach...Next循環(huán)與For...Next循環(huán)類似。ForEach...Next不是將語(yǔ)句運(yùn)行指定的次數(shù)，而是對(duì)于數(shù)組中的每個(gè)元素或?qū)ο蠹?/p>