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

　　

【正文】 set /form /body /html 將以下語句剪貼到記事簿中，并保存為 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 語句 判斷用戶輸入的姓名是否為 “Gee Washington”, 并做出相應(yīng)的反饋。在此我們遇到了一個(gè) ASP 的內(nèi)建對(duì)象 request，通過使用 request 對(duì)象可以訪問任何用 HTTP 請(qǐng)求傳遞的信息，包括從 HTML 表格中用 POST 方法或 GET 方法傳遞的參數(shù)、 cookie 和用戶認(rèn)證。而 QueryString 集合檢索 HTTP 查詢字符串中變量的值， HTTP 查詢字符串由問號(hào) (?) 后的值指定。如： 生成值為 Firstname=Geeamp。Lastname=Washington 的變量名字符串。關(guān)于 ASP 對(duì)象作者將在今后的幾篇里重點(diǎn)講述。 If...Then...Else 語句的一種變形允許您從多個(gè)條件中選擇，即添加 ElseIf 子句以擴(kuò)充 If...Then...Else 語句的功能，使您可以控制基于多種可能的程序流程。 我們將 的程序部分?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 語句。 Select Case 結(jié)構(gòu)提供了 If...Then...ElseIf 結(jié)構(gòu)的一個(gè)變通形式，可以從多個(gè)語句塊中選擇執(zhí)行其中的一個(gè)。 Select Case 語句提供的功能與 If...Then...Else 語句類似，但是可以使代碼更加簡練易讀。 Select Case 結(jié)構(gòu)在其開始處使用一個(gè)只計(jì)算一次的簡單測試表達(dá)式。表達(dá)式的結(jié)果將與結(jié)構(gòu)中每個(gè) Case 的值比較。如果匹配，則執(zhí)行與該 Case 關(guān)聯(lián)的語句塊，我們同樣可以用 Select Case 語句來寫 文件： % 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ì)算開始處的一個(gè)表達(dá)式，并且只計(jì)算一次，而 If...Then...ElseIf 結(jié)構(gòu)計(jì)算每個(gè) ElseIf 語句的表達(dá)式，這些表達(dá)式可以各不相同。因此僅當(dāng)每個(gè) ElseIf 語句計(jì)算的表達(dá)式都相同時(shí)，才可以使用 Select Case 結(jié)構(gòu)代替 If...Then...ElseIf 結(jié)構(gòu)。 Select Case 語句也是可以是嵌套的，每一層嵌套的 Select Case 語句必須有與之匹配的 End Select 語句。 以上給大家介紹的腳本語言 VBScript 的函數(shù)和條件語句的使用方法，由于篇幅的緣故不能詳細(xì)展開，希望各位有志學(xué)習(xí) ASP 的朋友，能在課后進(jìn)行一定程度的自學(xué)和練習(xí)。在日常開發(fā) ASP 應(yīng)用程序的過程中作者本人日漸 體會(huì)到了腳本語言的重要性，靈活運(yùn)用腳本語言將非但可以大大提高 ASP 應(yīng)用程序的開發(fā)過程，給廣大網(wǎng)站制作人員節(jié)省大量的時(shí)間，而且還能夠增強(qiáng) ASP 應(yīng)用程序的執(zhí)行效率和功能。欲善其事必先利其器，因此作者在此強(qiáng)烈建議諸君，熟練掌握腳本語言，這將對(duì)你的 ASP 程序開發(fā)大有幫助。由于本文不是 VBScript 教程，因此只能用較小的篇幅給大家簡要介紹一些 VBScript 基本常識(shí)，在下一期介紹完 VBScript 的循環(huán)語句后，我們將正式開始學(xué)習(xí) ASP 的內(nèi)建對(duì)象，要深入 VBScript，建議大家找些教材 進(jìn)行自學(xué)。 在本文上兩篇中，我們學(xué)習(xí)了腳本語言 VBScript 的變量、函數(shù)、過程和條件語句，本篇將繼續(xù)給大家介紹 VBScipt 的循環(huán)語句，并對(duì)腳本語言在 ASP 中的應(yīng)用加以總結(jié)。 如果有人告訴你學(xué)習(xí) ASP 不需要任何編程知識(shí)，那么他錯(cuò)了；如果我告訴你學(xué)習(xí) ASP 必須掌握一門編程語言，那么我錯(cuò)了。 ASP 動(dòng)態(tài)服務(wù)器頁面環(huán)境的特點(diǎn)就在于它是通過一種或幾種腳本語言而寫成的，腳本語言可以看作是編程語言的簡化版，它易于學(xué)習(xí)和掌握，這給廣大動(dòng)態(tài)網(wǎng)站的設(shè)計(jì)者們提供了相當(dāng)大的便利?？梢赃@么說 : 腳本 語言運(yùn)用的得當(dāng)與否直接關(guān)系到 ASP 應(yīng)用程序的優(yōu)與劣。繼上一篇我們學(xué)習(xí)了腳本語言 VBScript 的函數(shù)和條件語句后，今天我們繼續(xù)來看看 VBScript 中的循環(huán)語句。 循環(huán)語句的作用就是重復(fù)執(zhí)行程序代碼，循環(huán)可分為三類：一類在條件變?yōu)?“ 假 ” 之前重復(fù)執(zhí)行語句，一類在條件變?yōu)?“ 真 ” 之前重復(fù)執(zhí)行語句，另一類按照指定的次數(shù)重復(fù)執(zhí)行語句。在 VBScript 中可使用下列循環(huán)語句： Do...Loop: 當(dāng)（或直到）條件為 “ 真 ” 時(shí)循環(huán)。 While...Wend: 當(dāng)條件為 “ 真 ” 時(shí)循環(huán)。 For...Next: 指定循環(huán)次數(shù)，使用計(jì)數(shù)器重復(fù)運(yùn)行語句。 For Each...Next: 對(duì)于集合中的每項(xiàng)或數(shù)組中的每個(gè)元素，重復(fù)執(zhí)行一組語句。 我們先來看看 Do...Loop，它是可以多次（次數(shù)不定）運(yùn)行語句塊。當(dāng)條件為 “ 真 ” 時(shí)或條件變?yōu)?“ 真 ” 之前，重復(fù)執(zhí)行語句塊。請(qǐng)看下例： html head title /title body bgcolor=FFFFFF /head p /p p 請(qǐng)將今年到 本月為止的每個(gè)月份的銷售結(jié)算記錄填寫在本頁之上。 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)語句制作了一張銷售結(jié)算記錄表，將以上代碼剪貼至記事簿保存為 ，并在瀏覽器中以 HTTP 方式進(jìn)行瀏覽，根據(jù)當(dāng)前的月份的不同，你將看到如下圖的結(jié)果。 我們來分析一下此段程序，我們的目的是要根據(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)語句重復(fù)執(zhí)行直到以上條件為假時(shí)退出循環(huán)。其中如果 count 大于 13 則用 exit do 立即退出循環(huán)。 Do Loop 語句還可以使用以下語法： Do [statements][Exit Do] [statements]Loop [{While | Until} condition] While...Wend 語句是為那些熟悉其用法的用戶提供的。但是由于 While...Wend 缺少靈活性，所以建議最好使用 Do...Loop 語句。下面我們來看看 For Next 語句。 For...Next 語句用于將語句塊運(yùn)行指定的次數(shù)，在循環(huán)中使用計(jì)數(shù)器變量，該變量的值隨每一次循環(huán)增加或減少。 下面的示例將過程 MyProc 重復(fù)執(zhí)行 50 次。 For 語句指定計(jì)數(shù)器變量 x 及其起始值與終止值。 Next 語句使計(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 語句用于在 計(jì)數(shù)器達(dá)到其終止值之前退出 For...Next 語句。因?yàn)橥ǔＶ皇窃谀承┨厥馇闆r下（例如在發(fā)生錯(cuò)誤時(shí)）要退出循環(huán)，所以可以在 If...Then...Else 語句的 True 語句塊中使用 Exit For 語句。如果條件為 False，循環(huán)將照常運(yùn)行。 最后，讓我們來看看 For Each...Next 語句 ,For Each...Next 循環(huán)與 For...Next 循環(huán)類似。 For Each...Next 不是將語句運(yùn)行指定的次數(shù)，而是對(duì)于數(shù)組中的每個(gè)元素或?qū)ο蠹现械拿恳豁?xiàng)重復(fù)一組語句 。這在不知道集合中元素的數(shù)目時(shí)非常有用。它的語法如下： 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)中的所有語句。只要 group 中還有其他的元素，就會(huì)對(duì)每個(gè)元素執(zhí)行循環(huán)中的語句。當(dāng) group 中沒有其他元素時(shí)退出循環(huán)，然后從 Next 語 句之后的語句繼續(xù)執(zhí)行。 至此，我們已經(jīng)完成了對(duì)腳本語言 VBSc