實(shí)驗(yàn)四VBScript.doc

實(shí)驗(yàn)編號實(shí)驗(yàn)四實(shí)驗(yàn)地點(diǎn)實(shí)驗(yàn)成績實(shí)驗(yàn)項(xiàng)目VBScript應(yīng)用簡介授課教師實(shí)驗(yàn)時(shí)間 年 月 日 星期 第 節(jié)實(shí)驗(yàn)教師實(shí)驗(yàn)?zāi)康?撐握VBScript控制語句的應(yīng)用看懂實(shí)例, 調(diào)試程序原理簡介Microsoft Visual Basic Scripting Edition 是程序開發(fā)語言 Visual Basic 家族的最新成員，它將靈活的腳本應(yīng)用于更廣泛的領(lǐng)域，包括 Microsoft Internet Explorer 中的 Web 客戶機(jī)腳本和 Microsoft Internet Information Service 中的 Web 服務(wù)器腳本。VBSCRIPT 塊可以出現(xiàn)在 HTML 頁面的任何地方（BODY 或 HEAD 部分之中）。然而最好將所有的一般目標(biāo)腳本代碼放在 HEAD 部分中，以使所有腳本代碼集中放置。這樣可以確保在 BODY 部分調(diào)用代碼之前所有腳本代碼都被讀取并解碼。VBSCRIPT沒有具體的數(shù)據(jù)類型，而是使用一種稱為Varint（變體型）的特殊數(shù)據(jù)類型。它能句自動(dòng)區(qū)分和處理各種類型的數(shù)據(jù)。也是一種面象對象的編程語言。實(shí)驗(yàn)內(nèi)容1、 掌握VBSCRIPT的控制語句的應(yīng)用2、 比較在HTML網(wǎng)頁中和ASP網(wǎng)頁中的區(qū)別3、 掌握條件、循環(huán)的應(yīng)用實(shí)驗(yàn)步驟一、 在HTML網(wǎng)頁中加入VBSCRIPTSTEP1：打開網(wǎng)頁編輯工具，輸入下面的代碼!-Dim MyTime, MyHourMyTime = NowMyhour = Hour(myTime)If MyHour STEP2：瀏覽結(jié)果如下：問題：1、結(jié)果： 2、VBSCRIPT可以出現(xiàn) 位置3、VBSCRIPT是否區(qū)分大小寫 。二、 在ASP網(wǎng)頁中加入VBSCRIPT，IFTHENELSEEND IFSTEP1：配置好WEB服務(wù)器站點(diǎn)STEP2：打開網(wǎng)頁編輯工具，輸入下面的代碼%Dim MyTime, MyHourMyTime = NowMyhoure = Hour(myTime)If MyHoure STEP3：保存在站點(diǎn)目錄下，擴(kuò)展名為“.asp”STEP4：通過站點(diǎn)瀏覽結(jié)果問題：1、結(jié)果： 2、你的文件路徑： 3、ASP網(wǎng)頁代碼標(biāo)記是什么 。3、在ASP網(wǎng)頁中VBSCRIPT必須寫在什么（符號） 之間三、 Select Case語句的應(yīng)用STEP1：打開網(wǎng)頁編輯工具，輸入下面的代碼STEP2：保存在站點(diǎn)目錄下，擴(kuò)展名為“.asp”STEP3：通過站點(diǎn)瀏覽結(jié)果問題；1、結(jié)果： 2、請把“星期日”添加入上述網(wǎng)頁中，并寫出其代碼為： 四、FoxNext的應(yīng)用STEP1：打開網(wǎng)頁編輯工具，輸入下面的代碼STEP2：保存在站點(diǎn)目錄下，擴(kuò)展名為“.asp”STEP3：通過站點(diǎn)瀏覽結(jié)果問題：1、結(jié)果： 2、MyVar最終的值為 3、“&”符號的作用是 五、 枚舉一個(gè)數(shù)組或一個(gè)集合中的所有對象STEP1：打開網(wǎng)頁編輯工具，輸入下面的代碼STEP2：保存在站點(diǎn)目錄下，擴(kuò)展名為“.asp”STEP3：通過站點(diǎn)瀏覽結(jié)果結(jié)果： 六、WhileWend的應(yīng)用STEP1：打開網(wǎng)頁編輯工具，輸入下面的代碼%Dim MyVar, MySumMySum = 0MyVar = 0While MySum 100%STEP2：保存在站點(diǎn)目錄下，擴(kuò)展名為“.asp”STEP3：通過站點(diǎn)瀏覽結(jié)果問題：1、結(jié)果： 2、循環(huán)終止的條件是 七、DoLoop的應(yīng)用STEP1：打開網(wǎng)頁編輯工具，輸入下面的代碼 100 MyVar = MyVar + 2 MySun = MySun + MyVarLoopResponse.wri