【導(dǎo)讀】它與傳統(tǒng)的HTML有什么不同？DHTML就是當(dāng)網(wǎng)頁(yè)從WEB服務(wù)。排版樣式、動(dòng)畫(huà)。比如，當(dāng)鼠標(biāo)移至文章段落中，段落能夠變成藍(lán)色，或者當(dāng)你。點(diǎn)擊一個(gè)超鏈后會(huì)自動(dòng)生成一個(gè)下拉式的子超鏈目錄。它是一種通過(guò)各種技術(shù)的綜合發(fā)展而得以實(shí)現(xiàn)的概念，這些技術(shù)包括Java. 非常遺憾的是在網(wǎng)景Netscape和。微軟IE瀏覽器幾番大戰(zhàn)后，我們?nèi)詻](méi)有得到一個(gè)對(duì)DHTML支持的統(tǒng)一標(biāo)準(zhǔn)。此本文在介紹DHTML時(shí)不得不分別講述。讓我們先來(lái)看看MicrosoftIE4對(duì)。時(shí)插入、修改、或刪除網(wǎng)頁(yè)的元件，譬如文字、標(biāo)記等。Z軸的定位功能，讓設(shè)計(jì)者可以放置影像、控件、文字等在網(wǎng)頁(yè)上的任何位置上。對(duì)于設(shè)計(jì)者來(lái)說(shuō)始終是最重要的。二章《動(dòng)態(tài)網(wǎng)頁(yè)設(shè)計(jì)十八般武藝》中仔細(xì)講解，請(qǐng)密切關(guān)注。然而對(duì)于建立商業(yè)網(wǎng)站的企業(yè)而言，僅僅擁有DHTML是遠(yuǎn)遠(yuǎn)不夠的。詢，資源交互等“動(dòng)態(tài)”需求的。具實(shí)用性和交互性的“動(dòng)態(tài)”網(wǎng)站。時(shí)獲得信息反饋。語(yǔ)言的程序代碼、ASP語(yǔ)法、和結(jié)構(gòu)化查詢語(yǔ)言SQL指令。

　　

【正文】 set /form /body /html 將以下語(yǔ)句剪貼到記事簿中，并保存為 html head TITLE /TITLE /head % fname=(Firstname) lname=(Lastname) If fname=Gee and lname=Washington then % must be the first president! % else % Hi!Nice to Meet You %end if % /body /html 產(chǎn)生一個(gè)文本輸入框，要求用戶輸入姓、名，如下圖： 則是用 IF 語(yǔ)句 判斷用戶輸入的姓名是否為 “Gee Washington”, 并做出相應(yīng)的反饋。在此我們遇到了一個(gè) ASP 的內(nèi)建對(duì)象 request，通過(guò)使用 request 對(duì)象可以訪問(wèn)任何用 HTTP 請(qǐng)求傳遞的信息，包括從 HTML 表格中用 POST 方法或 GET 方法傳遞的參數(shù)、 cookie 和用戶認(rèn)證。而 QueryString 集合檢索 HTTP 查詢字符串中變量的值， HTTP 查詢字符串由問(wèn)號(hào) (?) 后的值指定。如： 生成值為 Firstname=Geeamp。Lastname=Washington 的變量名字符串。關(guān)于 ASP 對(duì)象作者將在今后的幾篇里重點(diǎn)講述。 If...Then...Else 語(yǔ)句的一種變形允許您從多個(gè)條件中選擇，即添加 ElseIf 子句以擴(kuò)充 If...Then...Else 語(yǔ)句的功能，使您可以控制基于多種可能的程序流程。 我們將 的程序部分?jǐn)U充如下： % fname=lcase((Firstname)) lname=lcase((Lastname)) If fname=gee and lname=washington then % must be the first president! p % elseIf fname=ronald and lname=reagan then % must be the actor president! p % elseIf fname=jimmy and lname=carter then % must be the peanut farmer president! p % elseIf fname=naoko or fname=charles then % name reminds me of someone,but I am not sure who! p % else % Hi!Nice to Meet You % end if % 可以添加任意多個(gè) ElseIf 子句以提供多種選擇。但使用多個(gè) ElseIf 子句經(jīng)常會(huì)使程序變得很累贅。在多個(gè)條件中進(jìn)行選擇的更好方法是使用 Select Case 語(yǔ)句。 Select Case 結(jié)構(gòu)提供了 If...Then...ElseIf 結(jié)構(gòu)的一個(gè)變通形式，可以從多個(gè)語(yǔ)句塊中選擇執(zhí)行其中的一個(gè)。 Select Case 語(yǔ)句提供的功能與 If...Then...Else 語(yǔ)句類似，但是可以使代碼更加簡(jiǎn)練易讀。 Select Case 結(jié)構(gòu)在其開(kāi)始處使用一個(gè)只計(jì)算一次的簡(jiǎn)單測(cè)試表達(dá)式。表達(dá)式的結(jié)果將與結(jié)構(gòu)中每個(gè) Case 的值比較。如果匹配，則執(zhí)行與該 Case 關(guān)聯(lián)的語(yǔ)句塊，我們同樣可以用 Select Case 語(yǔ)句來(lái)寫(xiě) 文件： % fname=lcase((Firstname)) lname=lcase((Lastname)) name=fname+lname Select case name case geewashington must be the first president! p case ronaldreagan must be the actor president! p case jimmycarter must be the peanut farmer president! p case naokocharles name reminds me of someone,but I am not sure who! p case else Hi!Nice to Meet You End Select % 請(qǐng)注意 Select Case 結(jié)構(gòu)只計(jì)算開(kāi)始處的一個(gè)表達(dá)式，并且只計(jì)算一次，而 If...Then...ElseIf 結(jié)構(gòu)計(jì)算每個(gè) ElseIf 語(yǔ)句的表達(dá)式，這些表達(dá)式可以各不相同。因此僅當(dāng)每個(gè) ElseIf 語(yǔ)句計(jì)算的表達(dá)式都相同時(shí)，才可以使用 Select Case 結(jié)構(gòu)代替 If...Then...ElseIf 結(jié)構(gòu)。 Select Case 語(yǔ)句也是可以是嵌套的，每一層嵌套的 Select Case 語(yǔ)句必須有與之匹配的 End Select 語(yǔ)句。 以上給大家介紹的腳本語(yǔ)言 VBScript 的函數(shù)和條件語(yǔ)句的使用方法，由于篇幅的緣故不能詳細(xì)展開(kāi)，希望各位有志學(xué)習(xí) ASP 的朋友，能在課后進(jìn)行一定程度的自學(xué)和練習(xí)。在日常開(kāi)發(fā) ASP 應(yīng)用程序的過(guò)程中作者本人日漸 體會(huì)到了腳本語(yǔ)言的重要性，靈活運(yùn)用腳本語(yǔ)言將非但可以大大提高 ASP 應(yīng)用程序的開(kāi)發(fā)過(guò)程，給廣大網(wǎng)站制作人員節(jié)省大量的時(shí)間，而且還能夠增強(qiáng) ASP 應(yīng)用程序的執(zhí)行效率和功能。欲善其事必先利其器，因此作者在此強(qiáng)烈建議諸君，熟練掌握腳本語(yǔ)言，這將對(duì)你的 ASP 程序開(kāi)發(fā)大有幫助。由于本文不是 VBScript 教程，因此只能用較小的篇幅給大家簡(jiǎn)要介紹一些 VBScript 基本常識(shí)，在下一期介紹完 VBScript 的循環(huán)語(yǔ)句后，我們將正式開(kāi)始學(xué)習(xí) ASP 的內(nèi)建對(duì)象，要深入 VBScript，建議大家找些教材 進(jìn)行自學(xué)。 在本文上兩篇中，我們學(xué)習(xí)了腳本語(yǔ)言 VBScript 的變量、函數(shù)、過(guò)程和條件語(yǔ)句，本篇將繼續(xù)給大家介紹 VBScipt 的循環(huán)語(yǔ)句，并對(duì)腳本語(yǔ)言在 ASP 中的應(yīng)用加以總結(jié)。 如果有人告訴你學(xué)習(xí) ASP 不需要任何編程知識(shí)，那么他錯(cuò)了；如果我告訴你學(xué)習(xí) ASP 必須掌握一門(mén)編程語(yǔ)言，那么我錯(cuò)了。 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ǔ)句。 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 /title body bgcolor=FFFFFF /head p /p p 請(qǐng)將今年到 本月為止的每個(gè)月份的銷售結(jié)算記錄填寫(xiě)在本頁(yè)之上。 P % counter = 1 thismonth = month(now()) Do while counter thismonth + 1 amp。 counter amp。 月份 : ______________________________ amp。 BR br If counter 13 then exit do end if counter = counter+1 Loop % hr /body /html 這段 ASP 程序運(yùn)用循環(huán)語(yǔ)句制作了一張銷售結(jié)算記錄表，將以上代碼剪貼至記事簿保存為 ，并在瀏覽器中以 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 則用 exit do 立即退出循環(huán)。 Do Loop 語(yǔ)句還可以使用以下語(yǔ)法： Do [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 的值為 8 和 10 的總和。 Sub TwosTotal() Dim j, total For j = 2 To 10 Step 2 total = total + j Next MsgBox 總和為 amp。 total amp。 。 End Sub 要使計(jì)數(shù)器變量遞減，可將 Step 設(shè)為負(fù)值。此時(shí)計(jì)數(shù)器變量的終止值必須小于起始值。在下面的示例中，計(jì)數(shù)器變量 myNum 每次減 2。循環(huán)結(jié)束后，total 的值為 1 1 1 4 和 2 的總和。 Sub NewTotal() Dim myNum, total For myNum = 16 To 2 Step 2 total = total + myNum Next MsgBox 總和為 amp。 total amp。 。 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]Next [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ǔ)言 VBSc