《ASP动态网站规划与设计：VBScript编程基础》由会员分享，可在线阅读，更多相关《ASP动态网站规划与设计：VBScript编程基础（34页珍藏版）》请在金锄头文库上搜索。
1、第2单元 VBScript编程基础内容提要nVBScript的全称是Microsoft Visual Basic Scripting Edition，它是专业编 程语言Visual Basic的子集。nVBScript编程是ASP的基础，本章主要 介绍VBScript的基本语法以及VBScript 的一些重要的函数的使用。脚本语言概述 n在网页编程中，常用脚本语言有3种： JavaScript、VBScript和Jscirpt。ASP并不是脚 本语言，ASP需要使用脚本语言才能工作。在 ASP程序中常用的脚本语言有VBScript和JScript 。系统默认的语言为VBScript语言，可以通
2、过 IIS的选项将默认的语言设置为JScirpt脚本语言 。nVBScript与Visual Basic语言有密切关系。如果 熟悉Visual Basic，将会发现VBScript很容易学 习和使用。VBScript可以认为是Microsoft Visual Basic的简化版本。VBScript基本语法 nVBScript是一种脚本语言，脚本语言的语 法比较简单。n可以在HTML文件中直接嵌入VBScript脚 本，从而能够扩展HTML语言。VBScript代码的基本格式 n在HTML页面中使用VBScript的基本格式 为：nnn在和 之间写VBScript代码，其中 language=“
3、VBScript“可以简写为： language=“VBS“。 VBScript的数据类型 nVBScript 只有一种数据类型，称为Variant，也叫做变体类型 。Variant类型可以在不同的场合代表不同的数据类型。n例如Variant类型用于数字时，将作为数值处理；用于字符串 时，将作为字符串处理。声明Variant变量使用 Dim 语句， 例如： nDim V1n声明多个变量时，使用逗号分隔变量。例如： n Dim Top, Bottom, Left, Right显示 Variant 包含的数据子类型 子类类型描述Empty未初始化的 Variant。对对于数值变值变量，值为值为 0
4、；对对于字符串变变量，值为值为零长长度字符串 (“) 。Null不包含任何有效数据的 Variant。Boolean包含 True 或 False。Byte包含 0 到 255 之间间的整数。Integer包含 -32,768 到 32,767 之间间的整数Currency表示-922,337,203,685,477.5808 到 922,337,203,685,477.5807的数Long包含 -2,147,483,648 到 2,147,483,647 之间间的整数。Single单单精度浮点数Double包含双精度浮点Date包含表示日期的数字Object包含对对象Error包含错误错误号
5、VBScript常量 n常数是具有一定含义的名称，用于代替 数字或字符串，它的值从不改变。可以 使用 Const 语句在 VBScript 中创建用户 自定义常数。使用 Const 语句可以创建 名称具有一定含义的字符串型或数值型 常数，并给它们赋值。例如： nConst MyString = “这是一个字符串。“nConst MyAge = 49VBScript变量 n除了使用Dim定义变量以外，还有一种方 式是直接在Script 中使用变量，不用使用 Dim语句进行定义。n为了强制数据必须声明，使用Option Explicit语句，并将其作为 Script 的第一 条语句。使用方法如程序
6、3-03.htm所示 。命名规则n遵循 VBScript 的标准命名规则，变量命 名必须遵循： n第一个字符必须是字母n不能包含嵌入的句点n长度不能超过 255 个字符n在被声明的作用域内必须唯一命名规则n通过变量的名称就能知道该变量的子类型 子类类 型前缀缀例子子类类 型前缀缀例子Intege rintintAgeLonglnglngSu m Curre nc ycurcurSal ar ySinglesngsngTo talDoubl edbldblTot alBytebytbytRa ste rD at a Boolea nblnblnMa rri edStringstrstrUse r
7、N a m e DatedtdtStar tT im eObjectobjobjCu rr en t数组 n有时候需要创建包含一系列值的变量， 称为数组变量。数组变量和一般变量是 以相同的方式声明的，唯一的区别是声 明数组变量时变量名后面带有括号()。比 如声明了一个包含11个元素的一维数组 ： nDim A(10)使用动态数组 n重新调整动态数组大小的次数是没有任 何限制的，但是应注意：将数组调小时 ，将会丢失被删除元素的数据。 n使用方法如程序3-05.htm所示。 常用的运算符 nVBScript 有一套完整的运算符，包括算术运算符、比较运算符、连接运 算符和逻辑运算符。n1、算术运算符
8、n算术运算符就是日常的数学运算，如加(+)、减(-)、乘(*)、除(/)、整除()、 取模(Mod)和指数()。n2、连接运算符n连接运算符是将两个字符表达式连接起来，生成一个新的字符串。连接运算 符有“+”和“&”。n3、关系运算符n关系运算符用来比较两个表达式的值的大小，如大于（）、小于（=）、小于等于（）和等于（=）。n关系运算符的结果是逻辑型值True或者False，关系运算符可以用于数值间的 比较，页可以用于字符串间的比较。当用作字符串间比较的时候，将按照 ASCII码值进行比较。n4、逻辑运算符n逻辑运算符通常称为布尔运算符，专门用于逻辑值之间的运算。 n5、运算符的优先顺序n当一
9、个表达式包含有多个运算符的时候，执行运算的符号有一个固定的计算 顺序，为：算术运算符 连接运算符 关系运算符 逻辑运算符。 VBScript的基本语句 n计算机语言有三种基本的结构：顺序结 构，分支结构和循环结构。n任何的算法都可以通过这三种结构实现 。分支语句nVBScirpt提供了两种分支语句， If.Then.Else 语句 和Select Case 语句 n1. If Then Else语句n2. Select Case 语句循环语句n循环用于重复执行一组语句。循环可分为三类 ：一类在条件变为 False 之前重复执行语句， 一类在条件变为 True 之前重复执行语句，另 一类按照指定
10、的次数重复执行语句。在 VBScript 中可使用4种格式的循环语句。nDo.Loop： 当（或直到）条件为 True 时循环。 nWhile.Wend： 当条件为 True 时循环。 nFor.Next： 指定循环次数，使用计数器重复运行 语句。 nFor Each.Next： 对于集合中的每项或数组中的每 个元素，重复执行。VBScript的过程和函数 n在 VBScript 中，可调用的程序段被分为 两类：nSub 过程和 Function 函数。 Sub过程nSub 过程是包含在 Sub 和 End Sub 语句 之间的一组 VBScript 语句，Sub过程不 可以有返回值。Sub
11、过程可以有输入参 数，如果 Sub 过程无任何参数，则必须 包含空括号 ()。其语法结构为：nSub 子程序(参数1，参数2，)nnEnd SubSub过程n定义一个Sub过程后，就可以在程序代码中调 用它。Sub过程的调用有两种方式。一种是使 用Call语句，它要求将所有参数包含在括号之 中，语法结构为：nCall Sub过程名(参数1， 参数2，)n在使用的时候，Call关键字可以省略。另一种 是直接使用子过程名，只需要输入过程名及其 所有参数值，参数值之间使用括号分隔，语法 结构为：nSub过程名 参数1， 参数2，Function函数 nFunction函数是包含在 Function
12、和 End Function 语句之间的一组 VBScript 语句。 Function 函数与 Sub 过程类似，但是 Function 函数可以返回值，Sub过程不能有返 回值。nFunction 函数可以使用输入参数。如果 Function 过程无任何参数，则 Function 语句 必须包含空括号 。 注释语句 n注释语句不被执行，也不会显示在页面 上，只是为了帮助自己和别人阅读源程 序。nVBScript有两种注释方式：1、使用Rem 语句；2、使用符号“”。使用Rem语句的 基本语法是：nRem 注释语句容错语句 n一般来说，当程序发生错误的时候，程 序会终止运行，并在页面上显示错
13、误信 息。有时候，不希望程序终止，也不希 望把程序错误暴露给访问者，这就需要 使用容错语句。基本语法格式为：nOn Error Resume Nextn如果碰到错误，就跳过去继续执行下一 句。VBScript重要函数分析 n除了可以使用自己编写的函数以外，系统还提 供了许多重要的函数，这些函数可以在程序中 直接使用。n可以将VBScript函数分成5大类：1、字符串处 理函数；2、转换函数；3、日期和时间函数； 4、数学函数；5、检验函数。在实际编写程序 的时候，其他可以查阅VBScript语言参考。字符串处理函数 函数功能用法Len(string)返回字符串string的长度比如：Len(“
14、hello“)返回5。Trim(string)将字符串string前后的空格 去掉比如：Trim(“ hello “)返回“hello“ 。 Mid(str, start, len)从字符串str的start位置取长 度为len的子字符串比如：Mid(“VB Script is fun!“, 4, 6) 返回“Script“。 Left(str, len)从左边取len个字符比如：Left(hello“, 3)返回“hel“。Right(str, len)从右边取len个字符比如：Right(hello“, 3)返回“llo“。Instr(str1, str2)返回str2在str1中第一次出
15、现 的位置，两字符串相同 返回0比如：Instr(“hello“, “ell“)返回2Split(str1, 符号)根据符号将str1拆分成一维 数据比如：Split(“VBScriptXisXfun!“, “X“)返回数据元素分别为 ： VBScript，is和fun。 Replace(str1, str2,str3)将str1中的str2全部换成str3比如：Replace(“VBVB“, “B“ , “C“) 返回“VCVC“。转换函数 函数功能用法CStr(Variant)将变量转换 成字符型比如：CStr(1234)返回“1234“。CDate(Variant)将变量转换为 日期型比
16、如：CDate(“2008-4-8“)返回日期型 的变量CInt(Variant)将变量转换为 整数类型比如：CInt(“2008“)返回整数2008CLng(Variant)将变量转换为长 整数类型比如：CLng(“200800“)返回长整型数CSng(Variant)将变量转换为 Single类型比如：CSng(“2008.8“)返回Single类 型 CDbl(Variant)将变量转换为 Double类型比如：CDbl (“2008.8“)返回Double类 型CBool(Variant)将变量转换为 布尔型比如：CDbl (“True“)返回真值日期和时间函数 函数功能用法Now()得到系统当前的日期 和时间比如：Now()返回当前 日期和时间 Date()得到系统的日期比如：Date()返回 “年: 月: 日” Time()得到系统的时间比如：Time()返回“时: 分: 秒” Year(Date)取得Date中的年比如：Year(#2008-10- 1#)返回2008 Month(Date)取得Date中的月比
