电子商务网站建设 含1CD 教学课件 ppt 作者 薛万欣 第4章VBScript语言

第4章 VBScript语言,4.1认识VBScript,VBScript脚本语言是一种介于HTML语言和Visual Basic（简称VB）高级语言之间的一种语言。VBScript直接来源于VB，是高级语言VB的一个子集。 ASP为嵌入HTML页面中的脚本语言提供了运行的环境。ASP程序中常用的脚本语言有VBScript和JavaScript等，默认语言为VBScript语言。 VBScript脚本程序既可以在客户端执行，又可以在服务器端执行，一般是在服务器端执行。,4.2 VBScript代码的基本语法格式,一般情况下VBScript代码都是在服务器端执行。 当VBScript代码在服务器端执行时有2种语法格式: 格式1: 格式2: VBScript代码 ,4.2 VBScript代码的基本语法格式,有时，为了某种需要，会将VBScript代码放在客户端执行，这时的语法格式如下： VBScript代码 ,4.3 VBScript的数据类型,在VB、C+等高级语言中，有整数、字符、浮点数等不同的数据类型，而VBScript 只有一种数据类型，称为 Variant，也叫变体数据类型。Variant 类型可以在不同的场合代表不同类型的数据。,Variant类型的数据子类型,4.4 VBScript常量,常量是具有一定含义的名称，用于代替数字、日期或字符串，在程序的运行中，常量一经声明，其值将不能再改。 在VBScript 中，使用 Const 语句声明常量。 例如： Const PI = 3.1415926 表示数值型常数 Const MyString = “这是一个字符串。“ 表示字符串形常数 Const CutoffDate =#05/02/01# 表示日期型常数,4.5 VBScript变量,变量是计算机内存中已命名的内存位置，该位置可以存储 Script 运行时可更改的程序信息。 声明变量 定义变量的方法有两种，分别为显性声明（explicitly）和隐性声明（implicity）。 显性声明变量 使用 Dim 语句、Public 语句和 Private 语句在 Script 中显性声明变量。 例如：Dim student_score 声明多个变量时，使用逗号分隔变量。 例如：Dim Top, Bottom, Left, Right 隐性声明变量 通过直接在 Script 中使用变量名这一简单方式隐性声明变量。 例如：Student_name=”tom”,4.6 VBScript运算符,VBScript 继承了VB 的所有类别运算符，包括算术运算符、比较运算符、连接运算符和逻辑运算符。 当表达式包含多个运算符时，将按运算符的优先级进行计算。 运算符的优先级按从高到低的顺序分别为算术运算、比较运算和逻辑运算。,表达式的运算符,4.7 VBScript的函数,4.7.1 转换函数 转换函数用于将数据从一种数据类型转换为另一种数据类型，在Vbscript中，经常会用到各种转换函数来强制转换数据子类型。,常用的数据转换函数,常用的字符串函数,常用的日期和时间函数,例4-7：日期和时间函数应用示例 日期和时间函数应用示例 ,4.7.4数学函数,4.7.5检验函数,检验函数用于检验某变量是哪种数据类型，检验函数经常会和条件语句结合起来使用。,4.7.6 输入输出函数,输入输出函数可以在客户端弹出交互式窗口，用于发布信息或接受用户输入的信息。但这两个函数只能在客户端运行。 输出函数(msgbox) 语法格式： Msgbox(prompt,button,title) 输出函数中的参数意义如下： Prompt-显示窗口中的文字。 Button-可选项，用以指定窗口的外观和按钮的类型。 Title-可选项，显示在窗口标题中的文字。,4.7.6 输入输出函数,输入函数(Inputbox) 语法格式： String=Inputbox(prompt ,title,default) 输入函数中的参数意义如下： String-文本框中的内容，即用户输入的内容。 Prompt-显示窗口中的文字。 Title-可选项，显示在窗口标题中的文字。 default-可选项，用于指定窗口中文本输入框内的默认字符串。,输入输出函数应用示例,例4-11： 用户名输入与确认 用户名输入与确认 Dim name Name=InputBox(“请输入用户名：”, “输入用户名”) MsgBox name &“您好，欢迎您！” ,4.8 VBScript过程,过程是一组能执行指定任务且具有返回值的代码。可以将需经常重复执行的操作代码编写成过程，在需要时只要调用过程名即可。 在 VBScript 中，过程被分为两类：Sub 子程序和 Function 函数。两者的区别在于Sub 子程序只执行操作但不返回值，而 Function函数可以将执行操作后结果返回给调用程序。,4.8.1 Sub子程序,Sub子程序是包含在 Sub 和 End Sub 语句之间的一组 VBScript 代码。 其语法格式如下： Sub 子程序名（参数1，参数2，） End Sub 或 Sub 子程序名（） End Sub,调用Sub子程序,调用Sub子程序有两种方法： 使用Call语句： Call 子程序名（参数1，参数2，） 不使用Call语句： 子程序名（参数1，参数2，）,4.8.2 Function函数,Function函数的语法： Function 函数名（参数1，参数2，） End Function 或 Function 函数名（） End Function,调用Function 函数的方法是直接引用函数名，与Sub子程序不同的是调用Function 函数一定有一个返回值。,4.9 控制语句,一般情况下，VBScript脚本总是按代码书写的先后顺序来执行的。但在实际使用中，通常要根据条件的成立与否来判断程序的执行顺序，这是就需要使用控制语句。在VBScript中，控制语句有两种，即条件控制语句和循环控制语句。,4.9.1 条件语句,在VBScript中条件语句有两种格式：一个是If.Then.Else语句，另一个是Select Case 语句。其中If.Then.Else语句又有三种形式。 1If.Then.End If语句 语法格式： If 条件语句 Then 语句组 End If 执行时，若条件语句为True，则执行语句组，否则跳出该条件语句。,4.9.1 条件语句,2If.Then.ElseEnd If语句 语法格式： If 条件语句 Then 语句组1 Else 语句组2 End If 该语句又称分支语句，即若条件语句为True，则执行语句组1，否则执行语句组2。,If.Then.ElseEndIf语句用法示例如下：,例4-14：判断用户密码是否正确 If.Then.ElseEnd If语句用法示例 ,3If.Then.ElseIfEnd If语句 语法格式： If 条件语句1 Then 语句组1 ElseIf 条件语句2 Then 语句组2 Else 语句组n+1 End If,该语句又称为分支嵌套语句，即若条件语句1为True，则执行语句组1，然后跳出If语句；否则若条件语句2为True，则执行语句组2，然后跳出If语句；若条件都不符合，则执行语句组n+1。,If.Then.ElseIfEnd If语句用法示例如下：,例4-15： 根据用户访问网站的时间，自动作出相应问候。 If.Then.ElseIfEnd If语句用法示例 =#5:00:00# and Time=#12:00:00# and Time=#18:00:00# and Time ,4.Select Case 语句,语法格式： Select Case 表达式 Case 结果1 语句1 Case 结果2 语句2 Case 结果n 语句n Case Else 语句n+1 End Select 该语句又称为多路分支语句，是分支嵌套语句的另一种形式。比分支嵌套语句更加简洁明了。,执行时，先对表达式进行运算，这个运算可以为数学运算或字符串运算。然后将运算结果依次与结果1到结果n进行比较，当找到与运算结果相匹配的结果i时就执行相应的语句i，然后跳出Select Case语句；若一直比较到结果n都没有匹配到符合的结果，则执行语句n+1。,Select Case语句用法示例如下：,例4-16：根据学号判断学生所在系 Select Case语句用法示例 ,4.9.2 循环控制语句,循环结构用于重复执行一组语句。在 VBScript 中提供了三种循环结构：即Do循环、For循环、For Each循环。 1Do循环 Do循环是一种条件循环，当条件为 True 时，或条件变成True之前，重复执行循环体中的语句。具体语法格式如下： 语法格式一： Do While 条件 执行语句 Loop 执行时，首先测试条件，如果条件为False，那么跳过循环体，执行循环体以后的语句；如果条件为True，则执行循环体内的语句，直到条件变为False，退出循环，执行循环体以后的语句。,例4-17：求0-100之间的自然数之和 Do Loop循环语句用法示例 ,Do Loop循环语句用法示例,语法格式二： Do Until 条件 执行语句 Loop 或 Do 执行语句 Loop Until 条件 这种循环语法格式也是语法格式一的变种。与语法格式一不同的是，语法格式二是如果条件为False，就执行循环体内的语句，直到条件变为True。,2For循环 当不知道循环要执行多少次时，应使用Do循环。如果知道要执行多少次，最好使用For循环。For循环含有一个循环变量，每循环一次，循环变量都增加或减少。 For循环的语法格式如下： For 循环变量 = 循环初值 to循环终值 step 步长 执行语句 Next For循环的循环次数由循环变量的初值、终值和步长决定，循环变量从初值开始，在每次循环后，与终值进行比较，直到大于或小于终值后退出循环。步长是可选参数，步长可以为正、为负，可以是整数或小数，默认值为1。,例4-18：求1-100之间的奇数之和 For Next循环语句用法示例 ,For Next循环语句用法示例,3For EachIn循环 For EachIn循环与For循环类似，但它是对数组或集合中的每个元素重复一组语句，而不是重复一定的次数。如果不知道一个集合内有多少个元素，可以使用此种循环。 语法格式： For Each 元素 In 集合 执行语句 Next,例4-19：对数组中的数进行累加，然后输出结果 For EachIn循环语句用法示例 ,For EachIn循环语句用法示例,4循环嵌套与强行退出 循环可以多级嵌套。 所谓嵌套，就是在一个大的循环内可以套一个小循环。循环可以嵌套，但不可以交叉。 强行退出循环 一般在执行循环命令时，退出循环都是根据循环条件去判断，当条件不满足时，退出循环。但有时根据需要要强行退出循环。在For循环结构中可以用Exit For来完成此项功能，在Do循环结构中用Exit Do强行退出循环。,4.10 注释语句,注释语句在程序中不执行，也不会显示在页面上，只是在程序中起到注释的作用，方便自己和他人阅读。同时在调试程序时，也可以把暂时不执行的语句加上注释标记，方便程序的调试。 一般用Rem或 符号（单引号）来表示该符号所在行的语句是注释语句，语法如下： 或 ,4.11 容错语句,在ASP程序执行时，如果发生错误，会终止程序的运行，并在页面上显示错误信息。我们有时希望当程序发生错误时，不停止运行，也不让错误信息暴露在访问者面前，这时就需要用到容错语。 容错语句为： On Error Resume Next 这句话的意思是，如果碰到错误，就跳过去