日韩一区二区三区有码,又黄又湿又免费视频,亚洲欧美丝袜另类,色女人综合,日本成a人片在线播放,两根黑人粗大噗嗤噗嗤视频,97吻就去吻色五月,久久99久久99这里只有精品,老司机精品视频在线,国产精品888

[點(diǎn)晴永久免費(fèi)OA]ASP基礎(chǔ)入門第五篇（ASP腳本循環(huán)語(yǔ)句）

當(dāng)前位置：點(diǎn)晴教程→點(diǎn)晴OA辦公管理信息系統(tǒng) →『經(jīng)驗(yàn)分享&問(wèn)題答疑』

admin

2022年6月21日 11:58 本文熱度 711

　　繼上一篇我們學(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ǔ)句。
　　For Each...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)看下例：　　

<html>
<head>
<title>DoLoop.asp</title>

<body bgcolor="#FFFFFF">

</head>

<p></p>
<p> 請(qǐng)將今年到本月為止的每個(gè)月份的銷售結(jié)算記錄填寫在本頁(yè)之上。<P>
<%
　　counter = 1
thismonth = month(now())
Do while counter <thismonth + 1
response.write " " & counter & " 月份 : "
response.write "______________________________" & "<BR><br>"
If counter >13 then
　　exit do
　　end if
　　counter = counter+1
Loop
%>
<hr>

</body>

</html>

　　這段 ASP 程序運(yùn)用循環(huán)語(yǔ)句制作了一張銷售結(jié)算記錄表，將以上代碼剪貼至記事簿保存為 DoLoop.asp，并在瀏覽器中以 HTTP 方式進(jìn)行瀏覽，根據(jù)當(dāng)前的月份的不同，你將看到如下圖的結(jié)果。
<img src='http://arch.pconline.com.cn/pcedu/empolder/wz/asp/10111/pic/2001124_asp_11.gif'>
我們來(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 則用 exit do 立即退出循環(huán)。
　　Do Loop 語(yǔ)句還可以使用以下語(yǔ)法：

　　[statements][Exit Do]

　　[statements]Loop [{While | Until} condition]

　　 While...Wend 語(yǔ)句是為那些熟悉其用法的用戶提供的。但是由于 While...Wend 缺少靈活性，所以建議最好使用 Do...Loop 語(yǔ)句。下面我們來(lái)看看 For Next 語(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ù)器變量每次加 1。　　

Sub DoMyProc50Times()
　　 Dim x
　　 For x = 1 To 50
　　 MyProc
　　 Next
End Sub

　　關(guān)鍵字 Step 用于指定計(jì)數(shù)器變量每次增加或減少的值。在下面的示例中，計(jì)數(shù)器變量 j 每次加 2。循環(huán)結(jié)束后，total 的值為 2、4、6、8 和 10 的總和。　　

Sub TwosTotal()
　　 Dim j, total
　　 For j = 2 To 10 Step 2
　　 total = total + j
　　 Next
　　 MsgBox " 總和為 " & total & "。"
End Sub

　　要使計(jì)數(shù)器變量遞減，可將 Step 設(shè)為負(fù)值。此時(shí)計(jì)數(shù)器變量的終止值必須小于起始值。在下面的示例中，計(jì)數(shù)器變量 myNum 每次減 2。循環(huán)結(jié)束后，total 的值為 16、14、12、10、8、6、4 和 2 的總和?！　?/p>

Sub NewTotal()
　　 Dim myNum, total
　　 For myNum = 16 To 2 Step -2
　　 total = total + myNum
　　 Next
　　 MsgBox " 總和為 " & total & "。"
End Sub

　　 Exit For 語(yǔ)句用于在計(jì)數(shù)器達(dá)到其終止值之前退出 For...Next 語(yǔ)句。因?yàn)橥ǔＶ皇窃谀承┨厥馇闆r下（例如在發(fā)生錯(cuò)誤時(shí)）要退出循環(huán)，所以可以在 If...Then...Else 語(yǔ)句的 True 語(yǔ)句塊中使用 Exit For 語(yǔ)句。如果條件為 False，循環(huán)將照常運(yùn)行。

　　最后，讓我們來(lái)看看 For Each...Next 語(yǔ)句 ,For Each...Next 循環(huán)與 For...Next 循環(huán)類似。For Each...Next 不是將語(yǔ)句運(yùn)行指定的次數(shù)，而是對(duì)于數(shù)組中的每個(gè)元素或?qū)ο蠹现械拿恳豁?xiàng)重復(fù)一組語(yǔ)句。這在不知道集合中元素的數(shù)目時(shí)非常有用。它的語(yǔ)法如下：　　

For Each element In group
　　 [statements]
　　 [Exit For]
　　 [statements]

[element]

　　如果 group 中有至少一個(gè)元素，就會(huì)進(jìn)入 For Each 塊執(zhí)行。一旦進(jìn)入循環(huán)，便首先對(duì) group 中第一個(gè)元素執(zhí)行循環(huán)中的所有語(yǔ)句。只要 group 中還有其他的元素，就會(huì)對(duì)每個(gè)元素執(zhí)行循環(huán)中的語(yǔ)句。當(dāng) group 中沒(méi)有其他元素時(shí)退出循環(huán)，然后從 Next 語(yǔ)句之后的語(yǔ)句繼續(xù)執(zhí)行。

　　至此，我們已經(jīng)完成了對(duì)腳本語(yǔ)言 VBscript 所有的基本知識(shí)的學(xué)習(xí)，但是僅憑閱讀現(xiàn)有的這幾篇文章你是無(wú)法熟練運(yùn)用 VBscript 的，你必須通過(guò)不斷的實(shí)踐來(lái)提高自己的等級(jí)。當(dāng)然，如果你熟悉 C，你也可以選擇Javascript 來(lái)作為 ASP 應(yīng)用程序的腳本語(yǔ)言。不知大家有沒(méi)有發(fā)現(xiàn) ASP 程序的調(diào)試比較困難，因?yàn)闆](méi)有什么現(xiàn)成的工具，在這里我向大家簡(jiǎn)要介紹一下 Microsoft script Debugger，我們可以運(yùn)用它來(lái)進(jìn)行一定量的程序調(diào)試工作。

　　IIS4.0 所包括的 Microsoft script Debugger（script 偵錯(cuò)工具），提供腳本程序的偵錯(cuò)功能。您可以使用 Microsoft script 偵錯(cuò)工具來(lái)進(jìn)行對(duì)使用 VBscript、Jscript 編寫的腳本程序，以及 Java applets、beans 和 ActiveX 組件的偵錯(cuò)工作。

　　有的腳本程序在用戶端瀏覽器執(zhí)行，有的腳本程序（<% … %> 中的部份）在服務(wù)器端執(zhí)行。Microsoft script Debugger，可以偵錯(cuò)用戶端執(zhí)行的腳本程序以及服務(wù)器端執(zhí)行腳本程序。　　在用戶端瀏覽器執(zhí)行的腳本程序是在用戶端的瀏覽器當(dāng)中執(zhí)行，包括在標(biāo)準(zhǔn) HTML 代碼中的 VBscript、Jscript 部份。在瀏覽器載入此 HTML 代碼或譬如按下按鈕觸發(fā)事件時(shí)，將執(zhí)行此包括腳本程序的 HTML 代碼。用戶端瀏覽器執(zhí)行的腳本程序，主要用于對(duì) HTML 表單輸入的基本檢查等功能。
　　在服務(wù)器端執(zhí)行的腳本程序是在 IIS 服務(wù)器端執(zhí)行，包括在 .asp 程序中。先在 IIS 服務(wù)器上執(zhí)行，執(zhí)行結(jié)果產(chǎn)生標(biāo)準(zhǔn)的 HTML 代碼，再傳送到用戶端瀏覽器。服務(wù)器端執(zhí)行的腳本程序，主要用于多個(gè)網(wǎng)頁(yè)之間的連結(jié)，HTML 表單輸入的處理，以及存取服務(wù)器上數(shù)據(jù)庫(kù)的資料等。

Microsoft script Debugger 提供以下的除錯(cuò)功能：

　　 1、設(shè)定中斷點(diǎn)

　　 2、逐步追蹤腳本程序。

　　 3、設(shè)定書簽。

　　 4、檢視呼叫堆疊。

　　 5、檢視和更改變數(shù)值。

　　 6、執(zhí)行腳本指令。

從下一篇開(kāi)始，我們將開(kāi)始學(xué)習(xí)ASP 的內(nèi)建對(duì)象，大家不要走開(kāi)呀。

該文章在 2022/6/21 14:31:59 編輯過(guò)

關(guān)鍵字查詢

腳本

基礎(chǔ)

相關(guān)文章

正在查詢...

點(diǎn)晴ERP是一款針對(duì)中小制造業(yè)的專業(yè)生產(chǎn)管理軟件系統(tǒng),系統(tǒng)成熟度和易用性得到了國(guó)內(nèi)大量中小企業(yè)的青睞。

點(diǎn)晴PMS碼頭管理系統(tǒng)主要針對(duì)港口碼頭集裝箱與散貨日常運(yùn)作、調(diào)度、堆場(chǎng)、車隊(duì)、財(cái)務(wù)費(fèi)用、相關(guān)報(bào)表等業(yè)務(wù)管理，結(jié)合碼頭的業(yè)務(wù)特點(diǎn)，圍繞調(diào)度、堆場(chǎng)作業(yè)而開(kāi)發(fā)的。集技術(shù)的先進(jìn)性、管理的有效性于一體，是物流碼頭及其他港口類企業(yè)的高效ERP管理信息系統(tǒng)。

點(diǎn)晴WMS倉(cāng)儲(chǔ)管理系統(tǒng)提供了貨物產(chǎn)品管理,銷售管理,采購(gòu)管理,倉(cāng)儲(chǔ)管理,倉(cāng)庫(kù)管理,保質(zhì)期管理,貨位管理,庫(kù)位管理,生產(chǎn)管理,WMS管理系統(tǒng),標(biāo)簽打印,條形碼,二維碼管理,批號(hào)管理軟件。

點(diǎn)晴免費(fèi)OA是一款軟件和通用服務(wù)都免費(fèi)，不限功能、不限時(shí)間、不限用戶的免費(fèi)OA協(xié)同辦公管理系統(tǒng)。