第二部分动态网站开发语言第 3 课动态网页脚本语言 VBScript 本课导读 VBScript 是由微软公司推出的, 其语法是由 Visual Basic(VB) 演化来的, 可以看作是 VB 语言的简化版, 与 VB 的关系也非常密切它具有原语言容易学习的特性目前这种语言广泛应用于网页和

Size: px

Start display at page:

Download "第二部分动态网站开发语言第 3 课动态网页脚本语言 VBScript 本课导读 VBScript 是由微软公司推出的, 其语法是由 Visual Basic(VB) 演化来的, 可以看作是 VB 语言的简化版, 与 VB 的关系也非常密切它具有原语言容易学习的特性目前这种语言广泛应用于网页和"

霈黑安
4 years ago
Views:

1 第二部分动态网站开发语言第 3 课动态网页脚本语言 VBScript 本课导读 VBScript 是由微软公司推出的, 其语法是由 Visual Basic(VB) 演化来的, 可以看作是 VB 语言的简化版, 与 VB 的关系也非常密切它具有原语言容易学习的特性目前这种语言广泛应用于网页和 ASP 程序制作, 同时还可以直接作为一个可执行程序, 用于调试简单的 VB 语句非常方便技术要点了解 VBScript 的基本概念熟悉 VBScript 数据类型掌握 VBScript 变量的使用掌握 VBScript 运算符的使用掌握条件语句的使用掌握循环语句的使用掌握 VBScript 过程的使用掌握 VBScript 函数的使用

2 Dreamweaver+ASP 网站创建课堂实录 3.1 VBScript 概述 VBScript 是一种脚本语言, 源自微软的 Visual Basic, 其目的是为了加强 HTML 的表达能力, 提高网页的交互性在网页中加入 VBScript 脚本语言后, 就可以制作出动态或者交互式的网页, 以增进客户端网页上数据处理与运算的能力 VBScript 通常和 HTML 结合在一起使用, 在一个 HTML 文件中,VBScript 有别于 HTML 其他元素的声明方式下面是一个在 HTML 页面中插入的 VBScript 实例 <HTML> <HEAD> <TITLE> 测试按钮事件 </TITLE> </HEAD> <BODY> <FORM NAME="Form1"> <INPUT TYPE="Button" NAME="Button1" VALUE=" 单击 "> <SCRIPT FOR="Button1" EVENT="onClick" LANGUAGE="VBScript"> MsgBox 按钮被单击!" </SCRIPT> </FORM> </BODY> </HTML> 在浏览器中浏览, 当单击单击按钮时, 效果如图 3-1 所示图 3-1 浏览效果从上面可以看出,VBScript 代码写在成对的 <SCRIPT> 标记之间代码的开始和结束部分都有 <SCRIPT> 标记, 其中 LANGUAGE 属性用于指定所使用的脚本语言这是由于浏览器能够使用多种脚本语言, 所以必须在此指定所使用的脚本语言注意 <SCRIPT> 中的 VBScript 代码被嵌入在注释标记 () 中, 这样能够避免不能识别 <SCRIPT> 标记的浏览器将代码显示在页面中 SCRIPT 块可以出现在 HTML 页面的任何地方 (BODY 或 HEAD 部分 ), 最好将所有的一般目标 Script 代码放在 HEAD 部分中, 以便所有的 Script 代码集中放置这样可以确保在 BODY 部分调用代码之前所有 Script 代码都被读取并解码 VBScript 具有如下特点简单易学 VBScript 的最大优点在于简单易学, 即使是一个对编程语言毫无经验的人也可以在短时间内掌握这种脚本语言这是因为 VBScript 去掉了 Visual Basic 中使用的大多数关键字, 而仅保留了其中少量的关键字, 从而大大地简化了 Visual Basic 的语法, 使得这种脚本语言更加易学易用安全性好由于 VBScript 是一种脚本语言而不是编程 48

3 第 3 课动态网页脚本语言 VBScript 语言, 所以也就没有编程语言所具有的读写文件和访问系统的功能, 这就使得想利用该语言编写程序去侵入网络系统的人无从着手因为这种原因,VBScript 的安全性大为提高可移植性好 VBScript 不仅支持 Windows 系统, 同时也支持 UNIX 系统和 Mac 系统这就使得 VBScript 的可移植性大为增强 3.2 VBScript 数据类型 VBScript 只有一种数据类型, 称为 Variant Variant 是一种特殊的数据类型, 根据使用的方式, 它可以包含不同类别的信息因为 Variant 是 VBScript 中唯一的数据类型, 所以它也是 VBScript 中所有函数的返回值的数据类型最简单的 Variant 可以包含数字或字符串信息 Variant 用于数字上下文中时作为数字处理, 用于字符串上下文中时作为字符串处理这就是说, 如果使用看起来像是数字的数据, 则 VBScript 会假定其为数字并以适用于数字的方式处理与此类似, 如果使用的数据只可能是字符串, 则 VBScript 将按字符串处理也可以将数字包含在引号 (" ") 中使其成为字符串下面是在 VBScript 中常见的常数 True/False: 表示布尔值 Empty: 表示没有初始化的变量 Null: 表示没有有效数据的变量 Nothing: 表示不应用任何变量还可以自定义一些常数, 如 Const Name =Value 在定义变量名时, 应遵循 VBScript 的标准命名规则第一个字符必须是字母不能包含嵌入的句点长度不能超过 255 个字符在被声明的作用域内必须唯一当命名多个变量时, 使用逗号分隔变量, 如 Dim S1,S2,S3 3.3 VBScript 变量变量是一种使用方便的占位符, 用于引用计算机内存地址, 该地址可以存储脚本运行时可更改的程序信息例如, 可以创建一个名为 ClickCount 的变量用来存储用户单击网页上某个对象的次数使用变量并不需要了解变量在计算机内存的地址, 只要通过变量名引用变量就可以查看或更改变量的值在 VBScript 中只有一个基本数据类型即 Variant, 因此所有变量的数据类型都是 Variant 声明变量可以使用 Dim 语句 Public 语句和 Private 语句在脚本中声明变量, 例如 :Dim md 声明多个变量时可使用逗号分隔变量例如 :Dim sj,sa,gp 另一种方式是通过直接在脚本中使用变量名这一简单方式声明变量但这样有时会由于变量名被拼错而导致在运行脚本时出现意外的 49

4 Dreamweaver+ASP 网站创建课堂实录结果因此最好使用 Option Explicit 语句显式声明所有变量, 并将其作为脚本的第一条语句命名规则变量命名必须遵循 VBScript 的标准命名规则, 其规则如下第一个字符必须是字母不能包含嵌入的句点长度不能超过 255 个字符在被声明的作用域内必须唯一变量具有作用域与存活期变量的作用域由声明它的位置决定如果在过程中声明变量, 则只有该过程中的代码可以访问或更改变量值, 此时变量称为过程级变量如果在过程之外声明变量, 则该变量可以被脚本中的所有过程所识别, 称为 Script 级变量, 具有脚本作用域变量存在的时间称为存活期 Script 级变量的存活期从被声明的一刻起, 直到脚本运行结束时止对于过程变量, 其存活期仅是该过程运行的时间, 该过程结束后变量即随之消失给变量赋值可以创建如下形式的表达式给变量赋值, 变量在表达式左边, 要赋的值在表达式的右边例如,A= 北京多数情况下, 只需给声明的变量赋一个值只包含一个值的变量称为标量变量有时候将多个相关值赋给一个变量更为方便, 因此可以创建包含一系列值的变量, 这称为数组变量数组变量和标量变量是以相同的方式声明的, 唯一的区别是声明数组变量时变量名后面带有括号 () 下例即是声明了一个包含 4 个元素的唯一数组 Dim A(3) 虽然括号中显示的数字是 3 但由于在 VBScript 中所有的数组都是基于 0 的, 所以这个数组实际上包含了 4 个元素在基于 0 的数组中, 数组元素的数目总是括号显示的数目加 1 这种数组被称为固定大小的数组可在数组中使用索引为每个元素赋值, 如下所示 A(0)=5 A(1)=10 A(2)=15 A(3)= VBScript 运算符优先级 VBScript 包括算术运算符比较运算符连接运算符和逻辑运算符等当表达式包含多个运算符时, 将按预定顺序计算每一部分, 这个顺序称为运算符优先级可以使用括号越过这种优先级顺序, 强制首先计算表达式的某些部分运算时总是先执行括号中的运算符, 然后再执行括号外的运算符但是, 在括号中仍遵循标准运算符优先级当表达式包含运算符时, 首先计算算术运算符, 然后计算比较运算符, 最后计算逻辑运算符所有的比较运算符的优先级相同, 即按照从左到右的顺序计算算术运算符和逻辑运算符的优先级如表 3-1 所示表 3-1 算术运算符和逻辑运算符的优先级算术运算符比较运算符逻辑运算符描述符号描述符号描述符号求幂等于 = 逻辑非 Not 50

5 第 3 课动态网页脚本语言 VBScript ( 续表 ) 算术运算符比较运算符逻辑运算符负号 - 不等于 <> 逻辑与 And 乘 * 小于 < 逻辑或 Or 除 / 大于 > 逻辑异或 Xor 整除 \ 小于等于 <= 逻辑等价 Eqv 求余 Mod 大于等于 >= 逻辑隐含 Imp 加 + 对象引用比较 Is 减 - 字符串连接 & 当乘号与除号同时出现在一个表达式中时, 将按照从左到右的顺序计算乘除运算符同样当加与减同时出现在一个表达式中时, 将按照从左到右的顺序计算加减运算符 3.5 使用条件语句重复操作的 VBScript 代码在 VBScript 中可使用以下条件语句 : If...Then...Else 语句 Select Case 语句使用条件语句可以控制脚本的流程, 使用条件语句可以编写进行判断和使用 If...Then...Else 进行判断 If...Then...Else 语句用于计算条件是否为 True 或 False, 并且根据计算结果指定要运行的语句通常条件是使用比较运算符对值或变量进行比较的表达式,If...Then...Else 语句可以按照需要进行嵌套下面范例演示了 If...Then...Else 语句的基本使用方法 <html> <head> <title>if...then...else 示例 </title> </head> <body> <Script Language=VBScript> <!-- dim hour hour=15 if hour<8 then document.write " 欢迎您的光临! 早上好!" elseif hour>=8 and hour<12 then 51

6 Dreamweaver+ASP 网站创建课堂实录 document.write " 欢迎您的光临! 上午好!" elseif hour>=12 and hour<18 then document.write " 欢迎您的光临! 下午好!" else document.write " 欢迎您的光临! 晚上好!" end if --> </Script > </body> </html> 本例演示了显示时间功能, 如果当前时刻在 8 点以前显示为欢迎您的光临! 早上好!,8~12 时显示为欢迎您的光临! 上午好!,12~18 时显示为欢迎您的光临! 下午好!, 其他时间为欢迎您的光临! 晚上好! 当前 hour 为 16, 因此显示为欢迎您的光临! 下午好!, 如图 3-2 所示图 3-2 If...Then...Else 语句示例使用 Select...Case 进行判断 Select Case 结构提供了 If...Then...Else If 结构的一个变通形式, 可以从多个语句块中选择执行其中的一个 Select Case 语句提供的功能与 If...Then...Else 语句类似, 但是可以使代码更加简练易读 Select Case 结构在其开始处使用一个只计算一次的简单测试表达式表达式的结果将与结构中每个 Case 的值比较如果匹配, 则执行与该 Case 关联的语句块下面范例演示了 SelectCase 语句的基本使用方法 <html> <head> <title>select case 示例 </title> </HEAD> <body> <Script Language=VBScript>  </Script > </body> </html> 52

7 第 3 课动态网页脚本语言 VBScript 运行此程序, 在浏览器中浏览, 效果如图 3-3 所示图 3-3 Select Case 语句使用示例 3.6 使用循环语句之前重复执行语句, 一类在条件变为 True 之前重复执行语句, 一类则按照指定的次数重复执行语句循环语句用于重复执行一组语句循环可以分 3 类 : 一类是在条件变为 False 在 V B S c r i p t 脚本中可以使用以下循环语句 Do Loop: 当条件为 True 时循环使用 While...Wend : 当条件为 True 时循环使用 For...Next: 指定循环的次数, 使用技术器重复运行语句使用 Do Loop 循环可以使用 Do Loop 循环语句多次运行语句块, 当条件为 True 时, 或条件变为 True 之前, 重复执行语句块下面使用 Do Loop 循环语句计算的总和, 其代码如下 <% Dim I Sum Sum=0 i=0 Do i=i+1 Sum=Sum+i Loop Until i=5 Response.Write( =& Sum) %> 同样的语句, 也可以将 Do LoopUntil 改成 Do Until Loop 的写法, 其效果是一样的, 只是测试的条件在前或在后而已例如 : <% Dim i Sum Sum=0 i=0 Do Until i=5 i=i+1 Sum=Sum+i Loop Response.Write( =& Sum) %> 说明 : 有时候, 在处理循环时, 希望在某一个条件成立时, 可以中途退出这个循环, 这时我们可以使用 Exit Do 的命令, 若是在多重循环之下,Exit Do 会退出最近的循环使用 While...Wend While Wend 语句执行时, 首先会测试 While 后面的条件式, 当条件式成立时, 执行循环中的语句, 条件不成立时则退出 While 53

8 Dreamweaver+ASP 网站创建课堂实录 Wend 循环它的语法如下 : While ( 条件语句 ) 执行语句 Wend 说明 :Do Loop 语句提供更结构化与灵活性的方法来执行循环, 因此最好不要使用 While Wend 语句, 可以使用 Do Loop 语句来代替使用 For Next 当希望执行循环到指定的次数时, 最好使用 For Next 循环 For 的语句有一个控制变量 counter, 它的初值为 start, 终止值为 end, 每次增加值为 step, 该变量的值将在每次重复循环的过程中递增或递减它的语法如下 : For counter = start to end step 执行语句 Next 在上述的语法中, 其执行步骤如下 (1) 设置 counter 的初值 (2) 判断 counter 是否大于终止值 ( 或小于终止值, 依 step 的值而定 ) (3) 假如 counter 大于终止值, 程序跳至 Next 语句的下一行执行 (4) 执行 For 循环中语句 (5) 执行到 Next 语句时, 控制变量会自动增加 step 值, 若未指定 step 值, 默认值为每次加 1 (6) 跳至第二个步骤 3.7 VBScript 过程过程是 VBScript 脚本语言中最重要的部分为了使程序可重复利用和为了使程序简洁明了, 经常使用过程过程分类在 VBScript 中过程分为两类 :Sub 过程和 Function 过程下面分别对这两种过程进行讲述 1. Sub 过程 Sub 过程是指包含在 Sub 和 End Sub 语句之间的一组 VBScript 语句, 执行操作但不返回值 Sub 过程可以使用参数如果 Sub 过程无任何参数,Sub 语句则必须包含空括号 () 下面的 S u b 过程使用了两个固有的 VBScript 函数, 即 MsgBox 和 InputBox 来提示用户输入信息, 然后显示根据这些信息计算的结果计算过程由 VBScript 完成 Sub ConvertTemp() Temp=InputBox( 请输入华氏温度 :,1) MsgBox 温度为 &Celsius(temp)& 摄氏度 End Sub 2. Function 过程 Function 过程是包含在 Function 和 End Function 语句之间的一组 VBScript 语句 Function 过程与 Sub 过程类似, 但是 Function 过程可以返回值, 可以使用参数如果 Function 过程无任何参数,Function 语句则必须包含空括号 () Function 过程通过函数名返回一个值, 这个值是在过程的语句中赋给函数名的 Function 返回值的数据类型总是 Variant 在下面的示例中,Celsius 函数将华氏温度换算为摄氏温度 Sub 过程 ConvertTemp 调用此函数时, 包含参数值的变量将被传递给函数, 换算结果则返回到调用过程并显示在消息框中 Sub ConvertTemp() Temp=InputBox( 请输入华氏温度 :,1) MsgBox 温度为 &Celsius(temp)& 摄氏度 54

9 第 3 课动态网页脚本语言 VBScript End Sub Function Celsius(fDegrees) Celsius=(fDegrees-32)*5/9 End Function 过程的输入输出给过程传递数据的途径是使用参数参数被作为要传递给过程的数据的占位符参数名可以是任何有效的变量名使用 Sub 语句或 Function 语句创建过程中, 过程名之后必须紧跟括号括号中包含所有的参数, 参数之间用逗号分隔如在下面的示例中,fDegrees 是传递给 Celsius 函数的值的占位符 Function Celsius(fDegrees) Celsius=(fDegrees-32)*5/9 End Function 要想从过程获取数据, 则必须使用 Function 过程 Function 过程可以返回值,Sub 过程不返回值在代码中使用 Sub 和 Function 过程调用 Function 过程时, 函数名须在变量赋值语句的右端或表达式中 Temp=Celsius(Fdegrees) 或 MsgBox 温度为 &Celsius(fDegrees)& 摄氏度调用 Sub 过程时, 只需输入过程名及所有的参数值即可, 参数值之间需使用逗号分隔不需使用 Call 语句, 如果使用此语句, 则必须将所有的参数包含在括号之中 3.8 VBScript 函数 VBScript 的函数有两种 : 一种是内部函数即 VBScript 自带的函数, 这些函数都已经包装好, 使用时直接调用即可 ; 另一种是自定义函数, 即用户在编程的过程中根据需要定义编辑的一些函数 VBScript 内包括很多基本函数, 如对话框处理函数字符串操作函数时间 / 日期处理函数及数学函数等关于 VBScript 具体的函数参考本书附录 B 下面的范例演示了时间 / 日期函数的使用, 代码如下 <html> <head> <title> 时间 / 日期函数的应用 </title> </head> <body> 时间 :<%=time()%> <br> 日期 :<%=date()%> <br> 时间和日期 :<%=now()%> </body> </html> 55

10 Dreamweaver+ASP 网站创建课堂实录运行程序后, 显示结果如图 3-4 所示图 3-4 时间 / 日期函数的应用范例 3.9 本课小结符优先级条件语句循环语句和 VBScript 过程的使用必须注意的是目前只有 Internet Explorer 本课主要讲述了网页脚本语言 VBScript 的概述数据类型变量运算才能解释客户端的 VBScript 程序, 而 NetScape 浏览器则不支持这种语言, 可在 NetScape 公司的相关主页上下载相关组件 56

untitled

untitled 說參例邏邏 1. 說 2. 數數 3. 8 4. 理念李龍老立 1. 理料 2. 理料 3. 數料 4. 流邏念 5. 良 6. 讀行行 7. 行例來邏 1. 說說識量 2. 說理類 3. 數數念 4. 令 5. 良 6. 流邏念 7. 說邏理力 1. 2. 3. 4. 5. 列念 1 參 1. ( Visual Basic 例 ) (1)