电子商务网站建设与维护第3章VBScript语言基础

1、第3章 VBScript语言基础学习目标知识目标： 了解服务器端脚本和客户端脚本的概念及使用，了解VBScript脚本语言的数据类型和三种主要的控制结构，掌握VBScript常用函数的格式及用法，了解VBScript子程序和函数的编写方法。技能目标： 掌握服务器端脚本和客户端脚本的区别，掌握VBScript语言常用的语法格式，掌握VBScript语言的编程技术。能力目标： 具备分析、修改及编写VBScript程序的能力，能编写一些简单的客户端脚本。 电子商务网站建设与维护 第3章引例 一个简单的VBScript实例电子商务网站建设与维护 第3章一个简单首页一个简单首页 电子商务网站建设与维护

2、第3章3.1 VBScript概述3.1.1 什么是VBScript3.1.2 在HTML页面中添加 VBScript代码电子商务网站建设与维护 第3章3.1.1 什么是VBScript VBScript（Microsoft Visual Basic Scripting Edition）是ASP（ Active Server Pages，活动服务器页）的默认语言，它是一种介于HTML语言和Visual Basic、Java等高级语言之间的一种脚本语言。VBScript可以自由嵌入静态HTML网页中，以增强网页的动态效果及交互功能，带有VBScript脚本的网页可以对用户的操作作出动态响应。VB

3、Script脚本程序既可以在客户端执行，也可以在服务器端执行。电子商务网站建设与维护 第3章3.1.2 在HTML页面中添加 VBScript代码 在HTML页面添加VBScript脚本代码时，应以 标记开始，而以 标记结束。基本语法格式如下： 电子商务网站建设与维护 第3章3.1.2 在HTML页面中添加 VBScript代码SCRIPT标记具有以下4个属性：(1)Language：指定脚本代码所使用的脚本语言。对于Internet Explorer浏览器来说，该属性的取值可以是“VBScript或JScript，前者可以简写为VBS。(2)EVENT：指定与脚本代码相关联的事件。(3)FO

4、R：指定与事件相关联的对象。(4)RUNAT=Server表示脚本要在服务器端执行。如果是客户端脚本则无须添加这一项。电子商务网站建设与维护 第3章【例3.1】 使用“记事本”程序编辑一个含有VBScript脚本的html网页，效果如下图所示。 分析：这个例子使用了VBScript语言作为客户端脚本添加到html源代码中，在网页中动态的显示文字以及弹出对话框，要注意在“记事本”程序中将编辑好的代码另存为html文档。 电子商务网站建设与维护 第3章3.2 VBScript的基本元素3.2.1 数据类型3.2.2 常量和变量3.2.3 运算符电子商务网站建设与维护 第3章3.2.1 数据类型 V

5、BScript 只有一种数据类型，称为Variant。Variant是一种特殊的数据类型，根据使用的方式，它可以包含不同类别的信息。因为Variant是VBScript中唯一的数据类型，所以它也是VBScript中所有函数的返回值的数据类型。 Variant包含的数值信息类型称为子类型。大多数情况下，可将所需的数据放进Variant中，而Variant也会按照最适用于其包含的数据的方式进行操作。 电子商务网站建设与维护 第3章表3-1 Variant 包含的数据子类型 电子商务网站建设与维护 第3章3.2.2 常量和变量1）变量变量用于存储脚本运行时可更改的数据。（1）声明变量 一种方式是使用

6、 Dim 语句，Public 语句和 Private 语句在 Script 中显式声明变量。例如：Dim ClickCount 声明多个变量时，使用逗号分隔变量。例如： Dim Top， Bottom， Left， Right 另一种方式是直接使用变量名隐式声明变量，但有时会由于变量名被拼错而导致在运行 程序时出现意外的结果。因此，最好使用 Option Explicit 语句显式声明所有变量，并将其作为第一条语句。电子商务网站建设与维护 第3章3.2.2 常量和变量（2）命名规则 变量命名必须遵循 VBScript 的标准命名规则。变量命名必须遵循： 第一个字符必须是字母。 不能包含嵌入的句

7、点。 长度不能超过 255 个字符。 在被声明的作用域内必须唯一。 电子商务网站建设与维护 第3章3.2.2 常量和变量（3）变量的作用域与存活期 变量的作用域由声明它的位置决定。如果在过程中声明变量，则只有该过程中的代码可以访问或更改变量值，此时变量具有局部作用域并被称为过程级变量。如果在过程之外声明变量，则该变量可以被脚本中所有过程所识别，称为脚本级变量，具有全局作用域。 变量存在的时间称为存活期。脚本级变量的存活期从被声明的一刻起，直到脚本运行结束。对于过程级变量，其存活期仅是该过程运行的时间，该过程结束后，变量随之消失。电子商务网站建设与维护 第3章3.2.2 常量和变量（4）给变量赋

8、值 在VBScript中，可以通过赋值语句指定变量的值，等号左边是变量名，等号右边可以是任何数值、字符串、常数或表达式。例如： Username=”Michael” Num=403电子商务网站建设与维护 第3章3.2.2 常量和变量（5）标量变量和数组变量 多数情况下，只需为声明的变量赋一个值，如ClickCount =100。只包含一个值的变量被称为标量变量。有时候，将多个相关值赋给一个变量更为方便，因此可以创建包含一系列值的变量，称为数组变量。数组变量和标量变量是以相同的方式声明的，唯一的区别是声明数组变量时变量名后面带有括号 ( )。 例如： Dim A(10)，声明了一个包含 11 个

9、元素的一维数组： 电子商务网站建设与维护 第3章3.2.2 常量和变量数组并不仅限于一维。数组的维数最大可以为 60。声明多维数组时用逗号分隔括号中每个表示数组大小的数字。在下例中，MyTable 变量是一个有 6 行和 11 列的二维数组： Dim MyTable(5， 10)也可以声明动态数组，即在运行脚本时大小发生变化的数组。对于动态数组，括号中不包含任何数字。例如： Dim MyArray() ReDim AnotherArray()电子商务网站建设与维护 第3章3.2.2 常量和变量要使用动态数组，必须随后使用 ReDim 确定维数和每一维的大小。在下例中，ReDim 将动态数组的初

10、始大小设置为 25，而后面的 ReDim 语句将数组的大小重新调整为 30，同时使用 Preserve 关键字在重新调整大小时保留数组的内容。 ReDim MyArray(25) ReDim Preserve MyArray(30)电子商务网站建设与维护 第3章3.2.2 常量和变量2）常量 常量是具有一定含义的名称，用于代替数字或字符串。在程序运行期间，常量的值不会发生改变。在VBScript中，常量分为普通常量和符号常量两种。 （1）普通常量 按照数据类型的不同，普通常量分为字符串常量和数值常量两种。电子商务网站建设与维护 第3章3.2.2 常量和变量字符串常量 字符串常量由一对双引号括起

11、来的字符序列组成，其中可以包含字母、汉字、数字、空格以及标点符号等，例如“VBScript语言”，“计算机网络”。电子商务网站建设与维护 第3章3.2.2 常量和变量数值常量 数值常量分为整型数、长整型数和浮点数。整型数和长整型数都可以用十进制、十六进制和八进制3种形式来表示。系统默认为十进制，十六进制数前面加&H前缀，八进制数前面加&O前缀，例如&O31，&H5A。对于长整型数，使用十六进制或八进制表示时，还要在数字后面加上后缀&。电子商务网站建设与维护 第3章3.2.2 常量和变量 浮点数也称为实型数，分为单精度浮点数和双精度浮点数。浮点数可以用小数形式表示，也可以用科学计数法表示。 在科

12、学计数法种，浮点数由尾数、指数符号和指数3部分组成，其中尾数本身也是一个浮点数。对于单精度浮点数，指数符号为E；对于双精度浮点数，指数符号为D。例如1.23E12，416D-3。电子商务网站建设与维护 第3章3.2.2 常量和变量（2）符号常量 符号常量是用一个标识符表示的常量，用于代替字符串或数字。VBScript中提供了一些预定义的符号常量，可以在需要的时候直接调用。如vbCrLf表示回车/换行符，vbTab表示制表符。 另外，用户还可以使用 Const 语句创建自定义常量，并给它们赋值。例如： Const MyString = 您好 Const MyAge = 28 日期文字和时间文字包

13、含在两个#号之间。例如： Const CutoffDate = #1-15-2006#电子商务网站建设与维护 第3章3.2.3 运算符 VBScript 有一套完整的运算符，包括算术运算符、比较运算符、连接运算符和逻辑运算符。当表达式包含多个运算符时，将按预定顺序计算每一部分，这个顺序被称为运算符优先级。可以使用括号改变这种优先级顺序，优先级相同时按照从左到右的顺序计算。电子商务网站建设与维护 第3章表3-2 运算符优先级（从左到右，运算优先级从高到低）电子商务网站建设与维护 第3章3.3 VBScript控制语句3.3.1 条件语句3.3.2 循环语句电子商务网站建设与维护 第3章3.3.1

14、 条件语句1）IfThenElse 语句 If语句有两种形式：单行形式和块形式。语法格式如下：If 条件1 Then 语句1ElseIf 条件2 Then 语句2 Else 语句3End If单行形式的 If 语句，如：If A 10 Then A = A + 1电子商务网站建设与维护 第3章【例3.2】 编写一个HTML页面，在其中输入两个整数并能够求出较小数，页面效果如下图所示。分析：这个例子可以让用户在页面上自行输入两个整数，点击“显示结果”按钮后，在结果文本框中能够显示最小的那个数是多少。 电子商务网站建设与维护 第3章3.3.1 条件语句2）Select Case 语句 Select

15、 Case 表达式Case 值1 语句1Case 值2 语句2case Else 语句End Select电子商务网站建设与维护 第3章【例3.3】 编写一个HTML页面，显示当前日期和系统时间。效果如下图所示。分析：这个例子使用VBScript语言作为客户端脚本，使页面打开时能够显示当前系统时间年月日，星期几以及分时秒。电子商务网站建设与维护 第3章3.3.2 循环语句 使用循环语句可以重复执行一组语句，这组语句也称为循环体。循环语句可分为三类：一类在条件变为 False 之前重复执行语句，一类在条件变为 True 之前重复执行语句，另一类按照指定的次数重复执行语句。 在 VBScript

16、中可使用下列循环语句： DoLoop： 当（或直到）条件为 True 时循环。 WhileWend： 当条件为 True 时循环。 ForNext： 指定循环次数，使用计数器重复运行语句。 For EachNext： 对于集合中的每项或数组中的每个元素，重复执行一组语句。 电子商务网站建设与维护 第3章3.3.2 循环语句1）Do 循环使用 DoLoop 语句可以多次运行语句块。当条件为 True 时或条件变为 True 之前，重复执行语句块。语法格式有以下两种：（1）当条件为 True 时重复执行语句Do While | Until 条件Loop（2）重复执行语句直到条件变为 TrueDo

17、循环体Loop While | Until 条件电子商务网站建设与维护 第3章【例3.4】 编写一个HTML页面，求1加到100的整数和，效果如下图所示。分析：这个例子要求使用VBScript语言作为客户端脚本，用户在打开页面时，通过点击“计算结果”按钮，能够显示出1加到100的整数之和为5050。电子商务网站建设与维护 第3章3.3.2 循环语句2）While循环While 循环条件 循环体Wend While循环先判断循环条件，根据循环条件的值来决定是否执行循环体。如果循环条件为真或不为0时执行循环体，直到循环条件不满足时退出While循环。电子商务网站建设与维护 第3章3.3.2 循环语

18、句3）For循环For 循环变量初值 To 终值 Step 步长 循环体Exit ForNext 循环变量For循环按指定的次数执行循环体。执行For循环时，先将循环变量设为初值，测试循环变量是否小于（步长为正值）或大于（步长为负值）终值，若是，则执行循环体，否则退出循环。关键字 Step 用于指定计数器变量每次增加或减少的值。Exit For 语句用于在计数器达到其终止值之前退出 ForNext 语句。电子商务网站建设与维护 第3章【例3-5】 编写一个HTML页，求1到100之间所有的偶数之和。效果如下图示。分析：这个例子要求使用VBScript语言作为客户端脚本，用户在打开页面时，通过点

19、击“计算结果”按钮，能够显示出1加到100的所有偶数之和为2550。电子商务网站建设与维护 第3章3.3.2 循环语句4）For Each循环 For EachNext 循环与 ForNext 循环类似。For EachNext 不是将语句运行指定的次数，而是对于数组中的每个元素或对象集合中的每一项重复一组语句。这在不知道集合中元素的数目时非常有用。电子商务网站建设与维护 第3章【例3-6】 编写一个HTML页面检测用户输入的内容。效果如下图所示。分析：这个例子要求使用VBScript语言编写，用户在页面中输入用户名和密码，点击“显示”按钮，在“您输入的内容是”文本框中能够显示出用户刚刚输入的

20、所有内容。电子商务网站建设与维护 第3章3.4 过程3.4.1 Sub 过程3.4.2 Function 过程3.4.3 VBScript常用内部函数电子商务网站建设与维护 第3章3.4.1 Sub 过程 Sub 过程是包含在 Sub 和 End Sub 语句之间的一组 VBScript 语句，Sub 过程可以使用参数（由调用过程传递的常数、变量或表达式）。如果 Sub 过程无任何参数，则 Sub 语句必须包含空括号 ()。语法格式如下：Public | PrivateSub过程名 (参数1，参数2，) 语句块Exit Sub语句块End Sub 其中，Public表示Sub过程可以被所有脚本

21、中的其他程序访问。Private表示Sub过程只能在声明该过程的脚本内部被访问。电子商务网站建设与维护 第3章【例3-7】 编写一个HTML页面，用户进入该页时，显示欢迎信息及登录时间。效果如下图所示。分析：这个例子要求使用VBScript语言编写，用户在打开页面时，首先要输入姓名，然后弹出一个消息框，显示欢迎用户信息和当前系统时间。电子商务网站建设与维护 第3章【例3-8】 编写一个HTML页面，弹出消息框，显示两个参数的乘积值。效果如下图所示。分析：这个例子要求使用VBScript语言编写，用户在打开页面时，弹出一个消息框，显示8和9的乘积。电子商务网站建设与维护 第3章3.4.2 Fun

22、ction 过程 Function 过程是包含在 Function 和 End Function 语句之间的一组 VBScript 语句。Function 过程与 Sub 过程类似。Function 过程通过函数名返回一个值，这个值是在过程的语句中赋给函数名的。Function 返回值的数据类型总是 Variant。语法格式如下：Public | PrivateFunction 过程名 (参数1，参数2，) 语句块函数名表达式Exit FunctionEnd Sub电子商务网站建设与维护 第3章【3-9】 编写一个HTML页面，要求使用函数求两个数的乘积。效果如下图所示。分析：这个例子要求使用

23、VBScript语言来编写，在页面上弹出消息框，显示8和9这两个数的乘积，效果和例3-8相同，但要求使用函数来实现。电子商务网站建设与维护 第3章3.4.3 VBScript常用内部函数 用户除了可以自行定义函数和过程以外，VBScript中还提供了丰富的内部函数供用户直接调用。1）数值型函数：主要用来完成各种数学运算。Abs(num): 返回绝对值。Sgn(num): 判断数值正负。若num0，返回1;若 num=0，返回0;若 num0 电子商务网站建设与维护 第3章3.4.3 VBScript常用内部函数Int(num): 取整。如：int(99.8)=99; int(-99.2)=10

24、0 Log(num): 取以e为底的对数，要求num0 。Exp(n): 取e的n次幂。Sin(num)、Con(num)、Tan(num)、Atn(num): 三角函数，以弧度为值计算，弧度= (角度*Pai)/180。2）字符串函数：主要用于对字符串进行相应的处理。Len(str)：计算字符串长度。如：Len(“广东，广州”)=5电子商务网站建设与维护 第3章3.4.3 VBScript常用内部函数Mid(str,起始字符,读取长度)：截取字符串中间子字符串。如：Mid(“广东农工商职业技术学院”,3,3）=”农工商”Left(str,n)：从左边起截取n个长度的子字符串。 如：Left(

25、“广东农工商职业技术学院”,2）=”广东”Right(str,n)：从右边起截取n个长度的子字符串。如：Right(“广东农工商职业技术学院”,2）=”学院”Lcase(str)：字符串中的大写字母转成小写字母。如：Lcase(“HELLO”)=”hello”Ucase(str)：字符串中的小写字母转成大写字母。如：Ucase(“yes”)=”YES”Trim(str)：去除字符串两端空格。如： Trim(“ 你好！ ”)=”你好！”电子商务网站建设与维护 第3章3.4.3 VBScript常用内部函数InStr(起始字符,str,查找字符串,比较方法)：检测是否包含子字符串，若找到则返回起始

26、位置。如： Instr(“动态网页设计”，“设计”）=53）数据类型转换函数：用于将一种类型的数据转换成其他类型的数据。CInt(str)：将数据转换成一个整数。若有小数部分则先进行四舍五入。如：CInt(112.6)=113CStr(str)：将数据转换成一个字符串。如：CStr(165.36)=”165.36”CDate(str)：将数据转换成一个日期。如：CDate(123.5)=#1900-5-2 12:00:00# CLng(str)：将数据转换成长整型数。电子商务网站建设与维护 第3章3.4.3 VBScript常用内部函数Csng(str)：将数据转换为单精度数值。Cdbl(str)：将数据转换为双精度数值。4）日