asp之转换函数示例

1、     asp之转换函数示例Variant变量一般会将其代表的数据子类型自动转换成合适的数据类型,但有时候,自动转换也会造成一些数据类型不匹配的错误.这时,可使用转换函数来强制转换数据的子类型.函数功能Asc 函数返回与字符串的第一个字母对应的 ANSI 字符代码。Chr 函数返回与指定的 ANSI 字符代码相对应的字符Hex 函数返回表示十六进制数字值的字符串。Oct 函数返回表示数字八进制值的字符串。CStr 函数返回表达式，该表达式已被转换为 字符串 子类型。CDate 函数返回表达式，此表达式已被转换为 日期 子类型。CInt 函数返

2、回表达式，此表达式已被转换为 整数 子类型。CLng 函数返回表达式，此表达式已被转换为 长整数 子类型CSng 函数返回表达式，该表达式已被转换为 Single 子类型CDbl 函数返回表达式，此表达式已被转换为 Double 子类型CBool 函数返回表达式，此表达式已转换为 布尔 子类型1、Asc 函数示例下面例子中, Asc 返回每一个字符串首字母的 ANSI 字符代码: Dim MyNumberMyNumber = Asc("A")    '返回 65。MyNumber = Asc("a")

3、60;   '返回 97。MyNumber = Asc("Apple") '返回 65。2、Chr 函数示例下面例子利用 Chr 函数返回与指定的字符代码相对应的字符: Dim MyCharMyChar = Chr(65)    '返回 A。MyChar = Chr(97)    '返回 a。MyChar = Chr(62)    '返回 >。MyChar = Chr(37)

4、60;   '返回 %。3、Hex 函数示例下面的示例利用 Hex 函数返回数字的十六进制数：Dim MyHexMyHex = Hex(5) ' 返回 5。MyHex = Hex(10) ' 返回A。MyHex = Hex(459) ' 返回 1CB。4、Oct 函数示例下面的示例利用 Oct 函数返回数值的八进制数：Dim MyOctMyOct = Oct(4)    ' 返回 4。MyOct = Oct(8)    ' 返回 10。M

5、yOct = Oct(459) ' 返回 713。5、 CStr 函数示例<%num1=666StrWelcome="欢迎第"&CStr(num1)&"个来访者"%>CStr将变量num1由整数子类型强制转换为字符串子类型6、CDate 函数示例MyDate = "October 19, 1962"   ' 定义日期。 MyShortDate = CDate(MyDate)   ' 转换为日期数据类型。 MyTime = "4:35:

6、47 PM"         ' 定义时间。 MyShortTime = CDate(MyTime)   ' 转换为日期数据类型。7、CInt 函数示例Dim MyDouble, MyIntMyDouble = 2345.5678         ' MyDouble 是 Double。MyInt = CInt(MyDouble)    

7、60;   ' MyInt 包含 2346。8、CLng 函数示例Dim MyVal1, MyVal2, MyLong1, MyLong2MyVal1 = 25427.45: MyVal2 = 25427.55         ' MyVal1, MyVal2 是双精度值。MyLong1 = CLng(MyVal1)              

8、;                    ' MyLong1 25427。MyLong2 = CLng(MyVal2)                        

9、60;         ' MyLong2 包含 25428 。9、CBool 函数示例Dim A, B, CheckA = 5: B = 5                          ' 初始化变量。Check = CBool(A = B)        '复选框设为 True 。A = 0