动态网页设计ASP-教学课件-ppt-第3章-使用VBScript进行动态网页设计.ppt

1、第3章 使用VBScript进行动态网页设计【学习目标】 1）熟练掌握常量、变量及数据类型2）熟练掌握数组、语句、过程及函数3）能够根据实际需要在ASP中熟练应用VBScript脚本语言3.1.1 VBScript语言的特点1简单易学2以对象为基础3.1 VBScript语言概述3.1.2 在HTML中使用VBScript 在进行网页设计过程中，将VBScript嵌入至HTML文件中，可以扩展HTML的功能，获得仅仅由HTML开发的网页无法取得的效果。【例例3-1】在HTML中使用VBScript。 问题描述问题描述：本例将实现访问者登录该网页时，显示一个消息框式的欢迎信息。实现步骤实现步骤：

2、1）在系统盘中的Inetpubwwwrootasp目录下创建一个Welcome.html文件。2）文件中代码如下: 这是欢迎页 3）程序运行结果如图所示。3.1.3在ASP中使用VBScript ASP中默认使用的脚本语言是VBScript,该脚本语言包含在“”或与之间。【例例3-2】在ASP中使用VBScript 。问题描述问题描述：本例将实现访问者登录该网页时，显示“欢迎您来到吉购网！”。实现步骤实现步骤：1）在系统盘中的Inetpubwwwrootasp目录下创建一个Welcomejg.asp文件，代码如下： 2）程序运行结果如图所示。3.2 VBScript中的变量 一般程序语言在声明

3、变量时，必须指定变量的数据类型，但VBScript只为用户提供一种变量类型，即“不定型数据类型（Variant）”，它能够存储任何类型的数据。3.2.13.2.1变量的声明变量的声明1用Dim声明例如：Dim StuName StuName为所声明的变量名Dim StuName,StuTel 声明多个变量时，变量之间用逗号分隔2用Private声明 用Private强制声明的变量为私有变量，其作用域仅在其定义的脚本体内。 Private声明变量的语法格式如下： Private 变量名3用Public声明 用Public强制声明的变量为全局变量，其作用域在网站中所有网页上都能够使用。Public

4、声明变量的语法格式如下： Public 变量名4用Option Explicit声明 Option Explicit语句表示ASP网页中必须显示定义变量后才可以使用。3.2.23.2.2变量的赋值变量的赋值 使用“=”号为变量赋值。虽然形式上与等号一样，但是在此表示一个赋值运算符。变量在表达式的左侧，要赋的值在表达式的右侧。语法格式如下： 变量名=变量值 例如： sum=100 bookname=动态网页设计(ASP)3.2.3变量的命名规则变量的命名规则VBScript变量的命名应遵循如下规则： 变量名的第一个字符必须是字母； 变量名的长度不能超过255个字符； 变量名中间不能包含符号“.”

5、； 变量名不能使用保留的关键字； 变量在其作用域内，其名称必须是唯一的。3.2.4变量的作用域和生命周期变量的作用域和生命周期1变量的作用域2变量的生命周期3.3 数组3.3.1一维数组的定义 使用数组一定要先声明名称，这是与简单变量不同之处。语法格式如下： Dim 数组名(n) 例如：定义一包含6个元素的一维数组。 Dim Cityname(5) 在基于0的数组中，数组元素的数目为括号内的数字加1，所以此数组实际上包含6个元素。该数组也被称为固定大小的数组。3.3.2 数组的赋值数组的赋值可以使用索引为数组的各元素进行赋值。例如：为上例所定义的数组赋值。Cityname(0)=北京Cityn

6、ame(1)=长春Cityname(2)=沈阳Cityname(3)=上海Cityname(4)=昆明Cityname(5)=重庆3.3.3 数组元素的使用数组元素的使用例如：提取数组中第4个元素的数据。CCityName=Cityname(3)3.3.4 多维数组的定义 例如：定义一个包含5行2列的二维数组Student。 Dim Student(4,1) 定义多维数组时，用逗号将括号中每个表示数组大小的数字进行分隔。3.3.5 定义及使用动态数组 例如：定义一个动态数组Student。 Dim Student() 数组元素的大小可以是动态的。可以使用Dim或ReDim语句来定义动态数组，动

7、态数组名称后面括号的内容为空。3.4 VBScript中的运算符3.4.1算术运算符VBScript中的算术运算符如表3-1所示。表3-1 算述运算符运算符运算符描述描述示例示例结果结果+加6+410-减6-42*乘6*424/除6/41.5整数除法641指数641296MOD余数（取模）6 MOD 42&字符串连接你&好你好3.4.2比较运算符 比较运算符能够比较两个表达式，如果比较的结果是正确的，则返回“True”,否则返回“False”。VBScript常用的比较运算符如表3-2所示。运算符运算符描述描述示例示例结果结果=等于11+2=12+1True不等于11+212-1True小于1

8、1-3大于11-312False=小于等于11-3=大于等于11-3=12Falseis对象引用比较,它并不比较对象或对象的值，而仅是进行检查，以判断两个对象引用是否是引用的同一个对象X is Y表3-2 比较运算符3.4.3逻辑运算符逻辑运算符也称为布尔运算符。VBScript常用的逻辑运算符如表3-3所示。 运算符描 述示 例结 果Not逻辑非Not 表达式1如果表达式1为True，则结果为False，否则结果为TureAnd逻辑与表达式1 AND 表达式2各个表达式同时为Ture时，结果为True，否则为FalseOr逻辑或表达式1 OR 表达式2只要有一个表达式为True时，结果就为T

9、rueXor逻辑异或表达式1 XOR 表达式2如果有且仅有一个表达式为 True，则 结果为 True。但是，如果任意一个表达式为 Null，则结果也为 Null。Eqv逻辑等价表达式1 EQV 表达式2如果任意一个表达式为 Null，则结果也为 Null。当两个表达式都不为 Null 时，则当两个表达式同时为True或同时为False时，结果为True，否则结果为FalseImp逻辑蕴涵表达式1 IMP 表达式2表达式1表达式2结果TrueTrueTrueTrueFalseFalseTrueNullNullFalseTrueTrueFalseFalseTrueFalseNullTrueNul

10、lTrueTrueNullFalseNullNullNullNull3.4.4运算符的优先级 若一个表达式中存在多种运算符时，应遵循一定的规律进行处理，具体如下： 1当一个表达式包含多种运算符时，优先级由高到低依次为算术运算符字符串运算符比较运算符逻辑运算符。 2能够使用括号越过优先级顺序，强制首先计算表达式的某个部分。运算时总是先执行括号中的运算符，然后再执行括号外的运算符，括号里面仍遵循运算符优先级。 3优先级相同的运算符在表达式中按照从左到右的顺序执行。 4当乘号与除号同时出现在一个表达式中时，按从左到右的顺序执行。同样当加与减同时出现在一个表达式中时，按从左到右的顺序执行。 5字符串连

11、接符(&)不是算术运算符，但是在优先级顺序中，它排在所有算术运算符之后和所有比较运算符之前。3.5 VBScript中的数据类型3.5.1 Variant数据类型3.5.2 Variant子数据类型 Variant数据类型包含的子数据类型如表3-4所示。子类型子类型说说 明明Empty未初始化的 Variant。对于数值变量，值为 0；对于字符串变量，值为零长度字符串 ()。Null不包含任何有效数据的Variant。Boolean逻辑型数据，值为True或FalseByte0255之间的整数Integer-32,76832,767 之间的整数Currency货币型数据，值为-922,337,

12、203,685,477.5808922,337,203,685,477.5807Long值为-2,147,483,6482,147,483,647 之间的整数Single单精度浮点数，负数范围为-3.402823E38-1.401298E-45，正数范围为 1.401298E-45 3.402823E38Double双精度浮点数，负数范围为-1.79769313486232E308 -4.94065645841247E-324，正数范围从 4.94065645841247E-324 1.79769313486232E308。Date日期型数据，数据范围为公元 100 年 1 月 1 日公元 9

13、999 年 12 月 31 日。String可变长字符串，最大长度为 20 亿个字符。Object对象Error错误号表3-4 Variant子数据类型3.6 在VBScript中定义常量 常量是具有一定含义的名称，用于代替数字或字符串，其值保持不变。 在 VBScript 中，使用 Const 语句创建用户自定义常量。使用 Const 语句可以创建名称具有一定含义的字符串型或数值型常量，并为其赋值。【例3-4】在VBScript中定义常量。问题描述问题描述： 定义常量SPName、 SPAmount和SPSaleDate，分为存放商品名称、商品数量及销售日期。 Const CSName =

14、童装 Const CSAmount = 2 Const CSSaleDate = #12-10-2006#3.7 条件语句3.7.1 IfThenElse语句IfThenElse 语句用于判断条件是否为 True 或 False，并且根据判断结果指定要运行的语句。一般来讲，条件是使用比较运算符对值或变量进行比较的表达式。1 1条件为条件为TrueTrue时运行语句。时运行语句。【例例3-53-5】IfThenElse语句的应用。问题描述：问题描述：定义两个变量A1和A2，并为其赋值，并判断如果A1大于A2时，输出A1的值大于A2及输出“请调整A1及A2的值！”的信息。实现步骤：实现步骤：1）在

15、系统盘中的Inetpubwwwrootasp目录下创建一个acompareb.asp文件，代码如下： IfThen语句的应用示例% Dim A1 Dim A2 A1=89 A2=30 Response.write A1的值为：&A1& Response.write A2的值为：&A2& If A1A2 then Response.write A1的值大于A2! & Response.write 请调整A1及A2的值！ End if%2）程序运行结果如图3-3所示。图3-3 IfThen条件语句的应用2. 2. 条件为条件为 True True 和和 False False 时分别运行某些语句时

16、分别运行某些语句【例例3-63-6】IfThenElse条件语句的应用。问题描述问题描述：定义两个变量A1和A2，并为其赋值，并判断如果A1大于A2时，输出“A1的值大于A2！”；如果A1小于A2时，则输出“注意！A1的值小于A2了！”的信息。实现步骤：实现步骤：1）在系统盘中的Inetpubwwwrootasp目录下创建一个acompareb2.asp文件，代码如下：IFTHENELSE语句的应用示例% Dim A1 Dim A2 A1=29 A2=30 Response.write A1的值为：&A1& Response.write A2的值为：&A2& If A1A2 then Resp

17、onse.write A1的值大于A2! & ELSE Response.write 注意！A1的值小于A2了！ End if%2）程序运行结果如图3-4所示。图3-4 IfThenElse条件语句的应用3. 3. 对多个条件进行判断对多个条件进行判断 IfThenElse语句允许从多个条件中选择，即添加ElseIf子句以扩充IfThenElse语句的功能，从而能够控制基于多种可能的程序流程。语法格式如下：语法格式如下：If 条件表达式1 Then语句块1ElseIf 条件表达式2 Then 语句块2ElseIf 条件表达式3 Then Else 语句块n【例例3-7】IfThenElseif

18、 Else条件语句的应用。问题描述问题描述：判断并显示当前日期是星期几。实现步骤：实现步骤：1）在系统盘中的Inetpubwwwrootasp目录下创建一个judgeweek.asp文件，代码如下：判定星期%Dim curweek 声明变量curweek=Weekday(now) 利用 Weekday 函数得到指定日期为本周第几天 response.write now& 输出当前的日期 response.write curweek=&curweek& 输出变量curweek的值If curweek=1 thenResponse.write(星期日)ElseIf curweek=2 thenRe

19、sponse.write(星期一)ElseIf curweek=3 thenResponse.write(星期二)ElseIf curweek=4 thenResponse.write(星期三)ElseIf curweek=5 thenResponse.write(星期四)ElseIf curweek=6 thenResponse.write(星期五)ElseIf curweek=7 thenResponse.write(星期六)End if%2）程序运行结果如图3-5所示。图3-5 当前日期是星期几3.7.2 Select Case语句语句 Select Case 语句提供的功能与 IfTh

20、enElse语句类似，并且使代码更加简练易读。语法格式如下：SELECT CASE 变量CASE 值1 语句块1CASE 值2 语句块2CASE 值n 语句块nCASE ELSE 语句块n+1【例例3-8】SELECT CASE语句的应用。问题描述问题描述：使用SELECT CASE语句改写实例3-7。实现步骤：实现步骤：1）在系统盘中的Inetpubwwwrootasp目录下创建一个scjudgeweek.asp文件，代码如下：判定星期3.8 循环语句3.8.1 DoLoop语句当条件为 True 时或条件变为 True 之前重复执行某语句块。语法格式如下：Do While | Until

21、条件表达式语句块Exit Do语句块Loop 或Do语句块Exit Do语句块Loop While | Until 条件表达式【例例3-9】DoLoop语句的应用一。问题描述问题描述：计算100以内整数的和。实现步骤：实现步骤：1）在系统盘中的Inetpubwwwrootasp目录下创建一个sum100.asp文件，代码如下：doloop语句的应用100 sum=sum+x x=x+1 LoopResponse.write(100以内的整数和为：)Response.write sum%2）程序运行结果如图3-6所示。图3-6 100以内的整数和【例例3-10】DoLoop语句的应用二。问题描述

22、问题描述：用Do whileLoop改写实例3-9。实现步骤：实现步骤：1）在系统盘中的Inetpubwwwrootasp目录下创建一个sum100-1.asp文件，代码如下：doloop语句的应用%Dim x 声明变量Dim sumX=0 为变量赋初值Sum=0Do while x【例例3-11】Exit Do语句的应用问题描述问题描述：设置一个死循环，使用Exit Do语句跳出死循环并输出循环的次数。实现步骤：实现步骤：1）在系统盘中的Inetpubwwwrootasp目录下创建一个exitdo.asp文件，代码如下：Exit do语句的应用% Dim loopnum,myValue lo

23、opnum = 0 myValue = 4 myValue 的初始值将导致死循环 Do Until myValue = 5 myValue = myValue - 1 loopnum = loopnum + 1 If myValue 2）程序运行结果如图3-7所示。图3-7 Exit Do语句的应用3.8.2 WhileWend语句 WhileWend语句用来重复执行一段代码，直到满足某一条件为止。语法格式如下：While 条件 语句块Wend 【例例3-12】WhileWend语句的应用问题描述问题描述：用WhileWend语句改写实例3-9。实现步骤：实现步骤：1）在系统盘中的Inetpu

24、bwwwrootasp目录下创建一个whilewend.asp文件，代码如下：WhileWend语句的应用%Dim x 声明变量Dim sumX=0 为变量赋初值Sum=0While x2）程序运行结果如图3-8所示。图3-8 WhileWend语句的应用3.8.3 ForNext语句 ForNext 语句用于将语句块运行指定的次数。在循环中使用计数器变量，该变量的值随每一次循环增加或减少。语法格式如下：For 计数变量=起始值 To 终止值 STEP 步长值 语句块Next【例例3-13】ForNext语句的应用问题描述问题描述：用ForNext语句改写实例3-9。实现步骤：实现步骤：1）在

25、系统盘中的Inetpubwwwrootasp目录下创建一个fornext.asp文件，代码如下：FORNEXT语句的应用2）运行结果如图）运行结果如图3-9所示。所示。3.8.4 For EachNext语句 For EachNext 语句与 ForNext语句相似。For EachNext不是将语句运行指定的次数，而是对于数组中的每个元素或对象集合中的每一项重复一组语句。这在不知道集合中元素的数目时非常有用。语法格式如下： For Each 元素变量 in 数组或对象的集合 语句块 Next 【例例3-14】For EachNext语句的应用 问题描述问题描述：使用For EachNext语

26、句输出每种商品的名称。 实现步骤：实现步骤： 1）在系统盘中的Inetpubwwwrootasp目录下创建一个foreachnext.asp文件，代码如下：For Each.Next语句的应用语句的应用%dim SPName(3) 定义一个有定义一个有4个变量的数组个变量的数组SPName(0)=SQL Server 数据库及应用数据库及应用SPName(1)=动态网页设计（动态网页设计（ASP）SPName(2)=物流服务营销物流服务营销SPName(3)=Java语言程序设计语言程序设计用循环输出每种商品的名称用循环输出每种商品的名称For Each I in SPName respons

27、e.write I &Next% 2）运行结果如图3-10所示。3.9 VBScript过程3.9.1 Sub过程过程Sub过程是一组包含在过程是一组包含在sub与与end sub之间的之间的VBScript语句，执行操语句，执行操作但不返回值。作但不返回值。1Sub过程的声明过程的声明1）不带参数的）不带参数的Sub过程过程若若Sub过程无任何参数，则过程无任何参数，则sub语句应包含空括号。语法格式如下：语句应包含空括号。语法格式如下：Sub 过程名过程名() 语句块语句块End Sub 2)带参数的带参数的Sub过程过程Sub过程能够使用参数，参数是由调用过程传递的常数、变量或表达过程能

28、够使用参数，参数是由调用过程传递的常数、变量或表达式等。语法格式如下：式等。语法格式如下：Sub 过程名过程名(参数参数1,参数参数2) 语句块语句块End Sub 2Sub过程的调用 1）使用call语句调用 使用Call语句调用Sub过程时，变量参数应包含在括号内。语法格式如下： Call 过程名(变量参数) 2）直接引用Sub过程名和变量参数调用 直接引用Sub过程名和变量参数调用过程是一种比较简单的调用方法。应用此方法时，变量参数可以放在括号中，也可以没有括号。 【例例3-15】Sub过程的应用 问题描述问题描述：使用Sub过程显示欢迎信息。 实现步骤：实现步骤： 1）在系统盘中的In

29、etpubwwwrootasp目录下创建一个subWelcome.asp文件，代码如下：Sub过程的应用过程的应用%定义无参数的定义无参数的SubSub mysub1() Response.write(欢迎来到吉购网！欢迎来到吉购网！) response.write End sub定义带参数的定义带参数的SubSub mysub2(namekh) Response.write(namekh & 欢迎来到吉购网！欢迎来到吉购网！) response.write End sub% 运行结果如图3-11所示。3.9.2 Function过程 Function过程是包含在过程是包含在Function与

30、与End Function语句之语句之间的一组间的一组VBScript语句。语句。Function过程与过程与sub过程相似，过程相似，但但Function过程可以返回值。过程可以返回值。Function 过程可以使用参过程可以使用参数（由调用过程传递的常数、变量或表达式）。如果数（由调用过程传递的常数、变量或表达式）。如果 Function 过程无任何参数，则过程无任何参数，则 Function 语句必须包含语句必须包含空括号空括号 ()。Function 过程通过函数名返回一个值，这个过程通过函数名返回一个值，这个值是在过程的语句中赋给函数名的。值是在过程的语句中赋给函数名的。Functi

31、on 返回值的返回值的数据类型总是数据类型总是 Variant。语法格式如下：。语法格式如下： Function 函数名函数名(参数参数1,参数参数2,) 语句块语句块 End Function 【例例3-16】Function过程的应用。 问题描述问题描述：使用Function过程对两个数的大小进行比较，返回其中较大的值。 实现步骤：实现步骤： 1）在系统盘中的Inetpubwwwrootasp目录下创建一个selectMax.asp文件，代码如下：Function过程的应用过程的应用myNum2) then maxValue=myNum1 Else maxValue=myNum2 End

32、ifEnd function% 2）运行结果如图3-12所示。 图3-12 Function过程的应用3.10 VBScript函数3.10.1 转换函数VBScript脚本中常用的转换函数如表3-5所示。函数名称函数名称说说 明明实实 例例结果结果Asc(XAsc(X) )返回字符串中的首字母对应的返回字符串中的首字母对应的 ANSI ANSI 字符代码字符代码Asc(GoodAsc(Good)7171CBool(XCBool(X) )转换为布尔型转换为布尔型CBool(1+2)CBool(1+2)TrueCByte(XCByte(X) )转换为转换为ByteByte子类型子类型CByte(

33、50)CByte(50)5050CCur(XCCur(X) )转换为转换为CurrencyCurrency子类型子类型CCur(50.23)50.2350.23CDate(XCDate(X) )转换为转换为DateDate子类型。其中，子类型。其中，X X参数是参数是任意有效的日期表达式。任意有效的日期表达式。CDate(nowCDate(now) )2006-12-21 13:51:34CDbl(XCDbl(X) )转换为转换为 DoubleDouble子类型子类型CDbl(23+100.1234) 123.1234Chr(XChr(X) )返回与指定的返回与指定的 ANSI ANSI 字符

34、代码相对字符代码相对应的字符应的字符Chr(71)G GCInt(XCInt(X) )转换为转换为 IntegerInteger子类型子类型CInt(70)CInt(70)7070CLng(XCLng(X) )转换为转换为 LongLong子类型子类型CLng(71.000)7171CSng(XCSng(X) )转换为转换为 Single Single 子类型子类型CSng(71.000)7171CStr(XCStr(X) )转换为转换为 String String 子类型子类型CStr(GoodCStr(Good)GoodGood3.10.2 字符串函数VBScript脚本中常用的字符串函数

35、如表3-6所示。函数名称函数名称说说 明明实实 例例结果结果AscAsc返回字符串中首字母的返回字符串中首字母的ANSIANSI字符编码字符编码Asc(AAsc(A)6565ChrChr返回与所指定的返回与所指定的ANSIANSI字符编码相关的字符字符编码相关的字符Chr(65)Chr(65)A ALcaseLcase将字符串转换为小写将字符串转换为小写Lcase(VeRyLcase(VeRy)veryveryUcaseUcase将字符串转换为大写将字符串转换为大写Lcase(VeRyLcase(VeRy)VERYVERYInstrInstr返回一个字符串在另一个字符串中首次出现的位返回一个字

36、符串在另一个字符串中首次出现的位置置InstrInstr(动态网页设计动态网页设计,网页网页)3 3LenLen返回字符串中的字符数返回字符串中的字符数Len(veryLen(very)4 4LeftLeft提取字符串左端的指定数量的字符提取字符串左端的指定数量的字符Left(very,2)Left(very,2)veveRightRight提取字符串右端的指定数量的字符提取字符串右端的指定数量的字符Right(very,2)Right(very,2)ryryLTrimLTrim删除字符串左边的空字符串删除字符串左边的空字符串LTrimLTrim( very )&(good)( very )&

37、(good)very goodRTrimRTrim删除字符串右边的空字符串删除字符串右边的空字符串RTrimRTrim( very )&(good)( very )&(good)verygoodStrCompStrComp返回一个值，指明字符串比较的结果。返回一个值，指明字符串比较的结果。StrComp(GOOD,GOOD,0)StrComp(GOOD,GOOD,0)0 0MidMid提取字符串中某个起始位置开始的某几个字符提取字符串中某个起始位置开始的某几个字符Mid(student,2,3)Mid(student,2,3)tudSpaceSpace返回一个由指定数量的空格组成的字符串返回一

38、个由指定数量的空格组成的字符串a+space(2)+ba+space(2)+ba bStringString返回一个指定长度的重复字符串。返回一个指定长度的重复字符串。String(5, String(5, * *)*ReplaceReplace在一个字符串中用指定的字符串代替某些字符串在一个字符串中用指定的字符串代替某些字符串Replace(HELANDHEO,HE,heReplace(HELANDHEO,HE,he)heLANDheOStrReverseStrReverse将字符串中的字符顺序颠倒过来将字符串中的字符顺序颠倒过来StrReverse(abcdeStrReverse(abcd

39、e)edcba 3.10.3 日期和时间函数 VBScript脚本中常用的日期和时间函数如表3-7所示。函数名称函数名称说说 明明实实 例例结果结果NowNow返回系统当前日期和时间返回系统当前日期和时间Now()Now()2006-12-21 16:43:05YearYear返回一个代表年份的整数返回一个代表年份的整数Year(nowYear(now()()2006MonthMonth返回返回 0 012 12 之间的一个之间的一个整数，包括整数，包括 0 0 和和 1212，代表一年中的月份值。代表一年中的月份值。month(nowmonth(now()()1212DayDay返回一个返回

40、一个 1 131 31 之间的之间的整数，包括整数，包括 1 1 和和 3131，代表一个月中的日期代表一个月中的日期值。值。Day(nowDay(now()()2121TimeTime返回当前的系统时间。返回当前的系统时间。Time()Time()16:43:05HourHour返回一个返回一个 0 02323之间的整之间的整数，包括数，包括0 0和和2323，代，代表一天中的小时值。表一天中的小时值。Hour(timeHour(time()()1616MinuteMinute返回返回 0 05959之间的一个整之间的一个整数，包括数，包括0 0和和5959，代，代表小时中的分钟值。表小时中

41、的分钟值。Minute(timeMinute(time()()4343表表3-7 VBScript中的日期和时间函数中的日期和时间函数SecondSecond返回一个返回一个 0 05959之间的整数之间的整数，包括，包括0 0和和5959，代表分钟内的，代表分钟内的秒。秒。Second(timeSecond(time()()5 5DateDate返回系统当前的日期。返回系统当前的日期。Date()Date()2006-12-21DatepartDatepart返回一个给定日期的指定部返回一个给定日期的指定部分分Datepart(m,2006-12-21)Datepart(m,2006-12-

42、21)1212DateaddDateadd返回加上所指定时间后的日返回加上所指定时间后的日期值期值Dateadd(d,2, 2006-12-21)Dateadd(d,2, 2006-12-21)2006-12-23DatediffDatediff返回两个日期之间间隔的天返回两个日期之间间隔的天数数Datediff(d,2006-10-01,2006-Datediff(d,2006-10-01,2006-10-12)10-12)11IsdateIsdate判断日期或字符串表达式是判断日期或字符串表达式是否可转换为日期否可转换为日期Isdate(2006-10-01)Isdate(2006-10-

43、01)TrueDateSerialDateSerial返回所指定的年月日的返回所指定的年月日的DateDate子类型的子类型的VariantVariant。DateSerial(2006,12,21)DateSerial(2006,12,21)2006-12-21TimeSerialTimeSerial返回一个子类型为返回一个子类型为DateDate的的VariantVariant，包含特定时分秒的，包含特定时分秒的时间。时间。TimeSerial(16,23,45)TimeSerial(16,23,45)16:23:45WeekdayWeekday返回星期几的整数返回星期几的整数Weekda

44、y(2006-12-21)Weekday(2006-12-21)5WeekDayNameWeekDayName返回一个字符串，表示星期返回一个字符串，表示星期中指定的某一天。中指定的某一天。WeekDayName(6, True)WeekDayName(6, True)星期五星期五3.10.4 数学函数VBScript脚本中常用的数学函数如表3-8所示。表表3-8 VBScript3-8 VBScript中的数学函数中的数学函数函数名称函数名称说说 明明实实 例例结果结果AbsAbs取数字的绝对值。取数字的绝对值。Abs(-123)Abs(-123)123123SinSin返回某个角的正弦值。

45、返回某个角的正弦值。Sin(1)Sin(1).841470984807897CosCos返回某个角的余弦值。返回某个角的余弦值。Cos(1)Cos(1).54030230586814TanTan返回某个角的正切值。返回某个角的正切值。Tan(1)Tan(1)1.5574077246549AtnAtn返回数值的反正切值。返回数值的反正切值。Atn(Atn(1.5574077246549) ).999999999999999SqrSqr平方根。平方根。Sqr(2)Sqr(2)1.4142135623731ExpExp返回返回 e（自然对数的底）（自然对数的底）的幂次方。的幂次方。Exp(1)Exp

46、(1)2.71828182845905LogLog自然对数自然对数Log(1)Log(1)0 0SgnSgn返回一个整数，指明一返回一个整数，指明一个数的正负个数的正负Sgn(10)Sgn(10)1 1本章小结本章小结 ASP中默认使用的脚本语言是中默认使用的脚本语言是VBScript,该脚本语言包含在该脚本语言包含在“”或或与与之间。之间。 变量的声明可以使用变量的声明可以使用Dim、private或或public语句，语句，Option Explicit语句表示语句表示ASP网页中必须显示定义变量后才可以使用。网页中必须显示定义变量后才可以使用。 Variant 是是 VBScript 中

47、唯一的数据类型，它也是中唯一的数据类型，它也是 VBScript 中中所有函数返回值的数据类型。所有函数返回值的数据类型。 VBScript中的条件语句有中的条件语句有IfThenElse、Select Case等语等语句；循环语句有句；循环语句有DoLoop、WhileWend、ForNext及及For EachNext等语句。等语句。 Sub过程是一组包含在过程是一组包含在sub与与end sub之间的之间的VBScript语句，语句，执行操作但不返回值。执行操作但不返回值。 Function过程是包含在过程是包含在Function与与End Function语句之间的语句之间的一组一组VBScript语句。语句。Function过程与过程与sub过程相似，但过程相似，但Function过程可以返回值。过程可以返回值。 VBScript脚本包含多种函数，有转换函数、字符串函数、日脚本包含多种函数，有转换函数、字符串函数、日期和时间函数及数学函数等。期和时间函数及数学函数等。