2-3VBS重要函数.ppt

WEB开发技术 第二章 　课程引入与回顾 Vbscript的基本语法 条件语句 循环语句 VBScript 过程 目标 掌握Vbscript常见函数的用法,包括： 转换函数 输入/输出函数 字符串函数（重点） 日期与时间函数 常用数学函数 检验函数 转换函数 在使用过程中，Variant变量一般会根据需要自动转换成合适的数据类型；但有时，自动转换有可能造成数据类型不匹配错误。此时，就应使用VBScript的转换函数来强制转换数据的子类型。 % Num=1000 StrWelcom=“欢迎第”CStr(Num)”个来访者” % 转换函数(续) Asc 函数示例 下面例子中, Asc 返回每一个字符串首字母的 ANSI 字符代码: Dim MyNumber MyNumber = Asc(“A”) ‘返回 65。 MyNumber = Asc(“a”) ‘返回 97。 MyNumber = Asc(Apple) 返回 65。 Chr 函数示例 下面例子利用 Chr 函数返回与指定的字符代码相对应的字符: Dim MyChar MyChar = Chr(65) 返回 A。 MyChar = Chr(97) 返回 a。 MyChar = Chr(62) ‘返回 。 MyChar = Chr(37) 返回 %。 CStr 函数示例 CStr将变量num1由整数子类型强制转换为字符串子类型 % num1=666 StrWelcome=“欢迎第”CStr(num1)“个来访者” % CDate 函数示例 MyDate = “October 19, 1962”?? ‘ 定义日期。 MyShortDate = CDate(MyDate)?? ‘ 转换为日期数据类型。 MyTime = “4:35:47 PM”???????? ‘ 定义时间。 MyShortTime = CDate(MyTime)?? 转换为日期数据类型。 CInt 函数示例 Dim MyDouble, MyInt MyDouble = 2345.5678??????? ? MyDouble 是 Double。 MyInt = CInt(MyDouble)??????? MyInt 包含 2346。 CLng 函数示例 Dim MyVal1, MyVal2, MyLong1, MyLong2 MyVal1 = 25427.45　 MyVal1 是双精度值。 MyVal2 = 25427.55??‘ MyVal2 是双精度值。 MyLong1 = CLng(MyVal1)?? MyLong1 25427。 MyLong2 =CLng(MyVal2) MyLong2 包含 25428 。 CBool 函数示例 Dim A, B, Check A = 5: B = 5???????????????????????? ?‘ 初始化变量。 Check = CBool(A = B)??????? 复选框设为 True 。 A = 0?????????????????????????????????????‘定义变量。 Check = CBool(A)?????????????? 复选框设为 False 。 输入/输出函数 输入、输出函数只能在客户端运行，不能在服务器端运行，因为它们要在客户端弹出窗口。 输入、输出函数作用很大，因为信息验证类事务如放在客户端进行，既能减轻服务器负担，有能提高执行效率。 输入/输出函数(续1) ? 输出函数 MsgBox(prompt[,button][,title]) prompt：显示窗口中的提示信息 button： 指定窗口外观和按钮类型 title： 显示窗口标题中的文字 说明：[…]中为可选项 输入/输出函数(续2) ? 输入函数 String=InputBox(prompt [,title][,default]) String：用户输入的内容 prompt：显示窗口中的提示信息 title：显示窗口标题中的文字 default：指定窗口中的文本输入框内的默认字 符串，即默认输入内容 说明：[…]中为可选项 输入/输出函数举例 html head titleInputBox和MsgBox用法示例/title /head body script language=VBScript Option Explicit 强制要求变量必须声明 Dim Name1,Name2