《ASP网络应用程序设计教学课件作者高怡新第3章节VBScript脚本语言》由会员分享，可在线阅读，更多相关《ASP网络应用程序设计教学课件作者高怡新第3章节VBScript脚本语言（53页珍藏版）》请在金锄头文库上搜索。
1、第3章 VBScript脚本语言,3.1 VBScript概述 3.2 VBScript语法基础 3.3 VBScript输入与输出 3.4 VBScript内置函数 3.5 VBScript流程控制 3.6 VBScript过程,3.1 VBScript概述,3.1.1 什么是 VBScript VBScript的全称为Microsoft Visual Basic Scripting Edition，是Microsoft Visual Basic语言的一个子集，它并不是一个完整的程序设计语言，仅包含语言中的一些基本功能。VBScript的最大优点是：用纯文本建立、直接包含在HTML文档中、编
2、辑和修改都十分便利。,VBScript将灵活的脚本语言应用于广泛的领域，包括 Microsoft Internet Explorer 中的 Web 客户端脚本和 Microsoft Internet Information Server 中的 Web 服务器端脚本。在HTML中嵌入VBScript代码，既可开发出 Web 客户端的脚本程序，也可开发出 Web 服务器端的脚本程序。,3.1.2 用VBScript开发客户端脚本,1客户端脚本示例 客户端脚本举例 ,2运行的结果,图3-1 客户端脚本举例,3.1.3 用VBScript开发服务器端脚本,1服务器端脚本示例 服务器端脚本举例 传承文明
3、！开拓进取! ,2混合使用 HTML 和脚本命令 示例1： ,示例2： 早上好！ 您好！ ,示例3： ,3.1.4 VBScript语句书写规则,l VBScript代码编写的脚本程序由一条或多条语句组成，语句中可以包括命令词、常量、变量、函数、运算符、运算式等。 l 编写客户端脚本时，注释语句应被包含在 之间。编写服务器端脚本时，注释语句由单引号“”开头，在其后可以书写任何注释文字，在程序运行时并不执行。 l VBScript语句以行的形式编写，一条长语句在一行中写不下时，可在每行的尾部添加下划线“_”而写在多行上。 l VBScript语句中的英文字母不区分大小写。 l VBScript脚
4、本语言不是一种独立的语言，必须依附HTML而存在。 l VBScript脚本代码是一种纯文本，可以用任何一种文本编辑器编写。,3.2 VBScript语法基础,3.2.1 VBScript 数据类型 VBScript只有一种称为Variant的数据类型。Variant是一种特殊的可变数据类型，根据使用的方式，它可以包含不同类别的信息。Variant 包含的数据子类型如下表所示。,3.2.2 VBScript 常量,在VBScript 中，常量是具有一定含义的名称，用于代替数字或字符串，其值从不改变。VBScript 定义了许多固有常量，例如：Empty、Null、True、False等。用户也
5、可以使用 Const 语句创建名称具有一定含义的字符型或数值型常量，并给它们赋原值。例如： Const MyString = “这是一个字符串。“ Const MyAge = 28 Const MyBirthDay = #5-18-98#,3.2.3 VBScript 变量,1变量的声明 示例： Dim Degrees Dim Top, Bottom, Left, Right Top = 100 Bottom = 180,2变量命名规则 l 变量名只能由英语字母、数字和下划线组成。 l 变量名第一个字符必须是英语字母。 l 变量名中不能包含嵌入的句点。 l 变量名长度不能超过 255 个字符。
6、 l 变量名不能和VBScript的保留字同名。 l 变量名在被声明的作用域内必须唯一。,3变量的作用域与存活期 变量的作用域由声明它的位置决定。如果在过程中声明变量，则只有该过程中的代码可以访问或更改变量值，此时变量具有局部作用域并被称为过程级变量。如果在过程之外声明变量，则该变量可以被脚本中所有过程所识别，称为Script级变量，具有脚本级作用域。 变量存在的时间称为存活期。Script 级变量的存活期从被声明的一刻起，直到脚本运行结束。对于过程级变量，其存活期仅是该过程的运行期间，该过程运行结束后，过程级变量随之消失。,4给变量赋值 示例： bb = 150*4 xm = “Tony“,
7、5标量变量和数组变量 多数情况下，只需为所声明的变量赋一个值，只包含一个值的变量被称为标量变量。然而，有时把多个相关值赋给一个变量更为方便，因此可以创建包含一系列值的变量，称为数组变量。数组变量和标量变量以相同的方式声明，唯一的区别是声明数组变量时变量名后面带有括号。数组定义与使用示例： Dim a(10) a(2) = 324 SomeVariable = a(8) 二维数组定义示例： Dim MyTable(5, 10),3.2.4 VBScript 运算符,3.3 VBScript输入与输出,VBScript语言以对话框的形式提供各种数据的输入与输出功能。其中，InputBox() 函数
8、提供一个供用户输入数据的对话框；MsgBox() 函数或MsgBox语句则提供一个输出指定数据的对话框。需要注意的是：这里介绍的输入、输出函数和语句只能在浏览器端脚本中使用，而不能在服务器端脚本中使用。,3.3.1 输入函数 InputBox() 格式： 变量 = InputBox(prompt , title , default , xpos , ypos) 示例： InputBox 函数举例 ,3.3.2 输出函数 MsgBox (),格式： 变量 = MsgBox(prompt , buttons , title) 示例： MsgBox 函数举例 ,3.3.3 输出语句 MsgBox,格
9、式： MsgBox prompt , buttons , title 示例： MsgBox 语句举例 ,3.4 VBScript内置函数,3.4.1 日期时间函数,3.4.2 数学运算函数,3.4.3 字符处理函数,3.4.4 数据类型判别函数,3.4.5 数据类型转换函数,3.5 VBScript流程控制,3.5.1 If.Then.Else语句 1条件为 True 时执行单行语句 格式： If 条件 Then 语句 说明：整条语句写在一行上，其中不包含关键字 Else。执行过程为：当条件成立时，执行Then后的语句；条件不成立时，跳过本语句执行本语句的后续语句。,2条件为 True 时执行
10、多行语句 格式： If 条件 Then 语句序列 End If 说明：允许在Then后换行写多条语句，其中也没有关键字 Else，要求在最后有一条End If语句表示整个条件结构的结束。当条件成立时，执行Then与End If之间的若干条语句；条件不成立时，则跳过本语句结构执行后续语句。,3条件为 True 和 False 时分别执行指定语句 格式： If 条件 Then 语句序列1 Else 语句序列2 End If 说明：本格式包含Else语句，且Else应单独占据一行。当条件成立时，执行Then与Else之间的语句序列1；条件不成立时，则执行Else与End If之间的语句序列2。,4对
11、多个条件进行判断 格式： If 条件1 Then 语句块1 ElseIf 条件2 语句块2 ElseIf 条件3 语句块3 Else 语句块n+1 End If 说明：本语句结构可以处理多个不同的条件，根据对条件顺序判断的结果执行首先成立的条件所对应的一个语句块。执行过程为：当条件1成立时，执行对应的语句块1；若条件1不成立而条件2成立，则执行对应的语句块2；若条件1和2都不成立而条件3成立，则执行对应的语句块3；以此类推。,3.5.2 Select .Case 语句 格式： Select Case 表达式 Case 值1 语句块1 Case 值2 语句块2 Case Else 语句块n+1
12、End Select 说明：Select Case语句结构仅在其开始处使用一个只计算一次的简单测试表达式。该表达式的结果将依次与整个结构中每个Case语句的值进行比较，如果匹配即执行与该Case对应的语句块。,3.5.3 DO . Loop循环,1Do While . Loop循环 格式： Do While 条件 语句块 Loop 说明：首先判断Do While语句中的条件成立与否，不成立则不执行指定的语句块，直接转去执行Loop后的语句。若条件成立，则反复执行DO While与Loop之间的语句块，每执行一遍后就再对条件判断一次，一旦条件不成立就结束循环转去执行Loop后的语句。,2Do U
13、ntil . Loop循环 格式： Do Until 条件 语句块 Loop 说明：首先判断Do Until语句中的条件成立与否，不成立则执行DO Until与Loop之间的语句块；若条件成立，则直接转去执行Loop后的语句。每执行一遍后就再对条件判断一次，一旦条件成立就结束循环转去执行Loop后的语句。,3Do . Loop While循环 格式： Do 语句块 Loop While 条件 说明：首先执行一遍循环，然后再判断Loop While语句中的条件成立与否，条件成立就再次执行DO与Loop之间的语句块；条件不成立就结束循环转去执行Loop后的语句。,4Do . Loop Until循
14、环 格式： Do 语句块 Loop Until 条件 说明：首先执行一遍循环，然后再判断Loop Until语句中的条件成立与否，条件不成立就再次执行DO与Loop之间的语句块；而条件成立就结束循环转去执行Loop后的语句。,3.5.4 While . Wend循环 格式： While 条件 语句块 Wend 说明：每当遇到While语句时，首先判断条件是否成立，如果成立就执行循环，不成立则退出循环。,3.5.5 For . Next循环 格式： For 循环变量 = 初始值 To 终止值 Step 步长值 语句块 Next 说明：首先将初始值赋给指定的循环变量，然后判断其值是否超过终止值，不
15、超过即执行循环体，超过则不执行循环体。在执行完循环体中的若干条语句后会遇到循环终端语句Next，此时系统将自动给循环变量增加一个步长值，然后再判断循环变量的当前值是否超过终值，不超过将再次执行循环体，超过则结束循环转去执行Next后的语句。,3.5.6 For Each In . Next循环 格式： For Each 变量 In 集合或数组名 语句序列 Next 说明：For Each InNext语句无需指定循环结束的条件，会自动按集合或数组元素的个数重复执行指定的操作。,3.5.7 循环语句的嵌套 VBScript允许在一个循环结构的循环体内包含另一个循环语句结构，即允许循环嵌套。对于前面所介绍的各种循环语句结构，不仅自身可以实行循环的嵌套，而且相互之间也可以实行循环嵌套。下面的例子是利用ForNext双重循环来显示乘法九九表。,1. 2. 循环语句嵌套举例 3. 4. 5. 6. 7. “ 12. For j =1 To 9 13. Str = Str & “ & i & “*“ & j & “=“ & i*j & “ 14. Next 15. Str = Str & “ 16. Response.Write Str 17. Next 18. % 19. 20. 21. ,在程序设计中，所谓过程（Procedure）是指具
