第一类 数组函数
Array 【[值1，[值2[...[，值n]...]]]】
用途：返回一个以传入数值为数组元素的数组
参数说明：
参 数 名 称 数 据 类 型 选择性自变量 说明
值n 是 数组中的元素
使用范例 ：
<%
intAry = (1,3,5)
For i = 0 To 2
Response.Write "intAry("&i&") = "&inyAry(i) &"<BR>"
Next
%>
LBound 【数组名[,维数]】
用途：返回指定数组某维数可使用的最小索引值。
参数说明：
参 数 名 称 数 据 类 型 选择性自变量 说明
数组名 String 否 数组变量的名称
[维数] Varint(long) 是 指定欲取得的数组维数
使用范例：
<%
Dim tdAry(2,3)
Response.Write "tdAry 数组第二个维数的索引起始值为"
Response.Write LBound(tdAry,2) & ",最大值为" & UBound(tdAry,2)
%>
执行接过：
intAry(0) = 1
intAry(1) = 3
intAry(2) = 5
Join 【欲连接为字符串的数组[,分隔字符]】
用途：将传入之一维字符串数组的元素以分隔字符串联为一个字符串。
参数说明：
欲连接为字符串的数组：必要参数。欲串联为字符串的一维数组。
[分隔字符] 选择性参数。连接数组各元素时，在各元素间所使用的分隔字符。默认使用空白（“ ”）
分隔数组中的各元素。若传入零长度字符串（“”），则数值中所有元素将连接在一起，各元素间没有
分隔符。
使用范例：
<%
strAry = Array("John","Mary","Ken","Peter")
Response.Write "strAry数组元素串联后的字符串为" & Join(strAry,"/")
%>
执行结果：
strAry 数组串联后的字符串为John/Mark/Ken/Peter
UBound 【数组名[,维数]】
用途：返回指定数组某维数可使用的最大索引值。
参数说明：
参 数 名 称 数 据 类 型 选择性自变量 说明
数组名 String 否 数组变量的名称
[维数] Varint(long) 是 指定欲取得的数组维数
使用范例：
<%
Dim tdAry(2,3)
Responst.Write "tdAry 数组第二个维数的索引起始值为"
Response.Write LBound(tdAry,2) & ",最大值为' & UBound(tdAry,2)
%>
执行结果：
tdAry 数组第二个维数的所以起始值为0，最大值为3
第二类 转换函数
Asc 【字符串】
用途：返回字符串第一个字符的字符码。
参数说明：
参 数 名 称 数 据 类 型 选择性自变量 说明
字符串 String 否 欲执行计算的字符串
使用范例：
<%
Response.Write 'ABC字符串第一个自的字符码为" & Asc("ABC")
%>
执行结果：
ABC字符串第一个紫的字符码为65
CBool 【字符串或数值】
用途：传出有传入字符串或数值所转换出的Boolean值。若传入值为0则返回false，若为非零值贼
返回true。
参数说明：
字符串或数值：可传入字符串或数值表达式。
使用范例：
<%
Response.Write 'CBool(5)的返回值为' & CBool(5)
%>
执行结果：
CBool(5)的返回值为Ture
CByte 【数值】
用途：将传入数值的数据类型转换为Byte。
参数说明：
参 数 名 称 数 据 类 型 选择性自变量 说明
数值 否 0至255的数值
CCur 【字符串或数值】
用途：将闯入的字符串或数值之数据类型转换为Varinat的Currency类型。
参数说明：
字符串或数值：可传入字符串或数值表达式。
CDate 【字符串或数值】
用途：将闯入的字符串或数值之数据类型转换为Varinat的Date类型。
参数说明：
字符串或数值：可传入字符串或数值表达式。
CDbl 【字符串或数值】
用途：将闯入的字符串或数值之数据类型转换为Varinat的Double类型。
参数说明：
字符串或数值：可传入字符串或数值表达式。
Chr 【数值】
用途：返回一个相对于数值（字符码）的字符串。
参数说明：
数值：可以使数值表达式或数值。
使用范例：
<%
Response.Write '字符码为66的字符为" & Chr(66)
%>
执行结果：
字符码为66的字符为B
CInt 【字符串或数值】
用途：将闯入的字符串或数值之数据类型转换为Varinat的Integer子类型。
参数说明：
字符串或数值：可传入字符串或数值表达式。
CLng 【字符串或数值】
用途：将闯入的字符串或数值之数据类型转换为Varinat的Long子类型。
参数说明：
字符串或数值：可传入字符串或数值表达式。
CSng 【字符串或数值】
用途：将闯入的字符串或数值之数据类型转换为Varinat的Single子类型。
参数说明：
字符串或数值：可传入字符串或数值表达式。
CStr 【字符串或数值】
用途：将闯入的字符串或数值之数据类型转换为Varinat的String子类型。
参数说明：
字符串或数值：可传入字符串或数值表达式。
Hex 【数值】
用途：将相对于传入数值的十六进制值传出。
参数说明：
参 数 名 称 数 据 类 型 选择性自变量 说明
数值 数值 否 如果传入的数值不是整数，将会
先四舍五入成最接近的整数
使用范例：
<%
Response.Write "999的十六进制值为" & Hex(999)
%>
执行结果：
999的十六进制值为3E7
Oct 【数值】
用途：计算传入值的八进位值。
参数说明：
参 数 名 称 选择性自变量 说明
数值 否 亦可以及是字符串表达式。如果不是整数
时，将详四舍五入成最接近的整数。
使用范例：
<%
Response.Write "999的八进位值为" & Oct(999)
%>
执行结果：
999的八进位值为1747
第三类 对象函数
CreateObject 【对象类别】
用途：建立并返回某对象类别的对象
参数说明：
对象类别：对象类别自变量的使用方法为【类别库名称。对象类别】，如：建立一个ADO的数据库
连接对象，其建立语法为【CreateObject("ADODB.Connection")】。
GetObject 【[路径名称[,对象类别]]】
用途：返回其它文件中ActiveX对象的对象参照。
参数说明：
自变量名称 数据类型 选择性自变量 说明
[路径名称] String 是 欲取得对象的目录路径与文件名称
[对象类别] String 是 欲取得对象的类别，其语法为
【应用程序名称。对象类型】
第四类 日期/时间函数
Date
用途：返回目前的系统日期
使用范例：
<%
Response.Write "目前的系统日期为" & Date
%>
执行结果：
目前的系统日期为2000/4/20
DateAdd 【时间单位，时间单位个数，基准时间】
用途：将基准日加上或者减去数个指定的时间个数。
使用说明：
时间单位：字符串表达式，表示DateAdd函数运算时间的单位。
时间单位个数：设定将基准时间加(减)时间单位的个数。
基准时间：运算基准时间。
设定 时间单位
yyyy 公元年
q 季
m 月
y 一整年的第几天
d 日
w 一周的第几天
ww 周
h 小时
n 分
s 秒
使用范例：
2000/4/12加一年为<%= DateAdd("yyyy",1,"2000/4/12")%><br>
2000/4/12加一季为<%= DateAdd("q",1,"2000/4/12")%><br>
执行结果：
2000/4/12加一年为2001/4/12
2000/4/12加一季为2000/7/12
DateDiff【时间单位，日期1，日期2[,一周的第一天[,一年的第一周]]】
用途：计算日期1与日期2之间的时间单位
参数说明：
时间单位：计算时间差的时间间隔单位。
日期1、日期2：欲计算时间间隔的两日期。
[一周的第一天]：设定一周的第一天。
[一年的第一周]：设定一年中第一周的计算方法，当计算单位设为【w】或【ww】时，
此项设定将影响计算结果。
值 说明 常数
1 星期日 vbSunday
2 星期一 vbMonday
3 星期三 vbTuesday
4 星期四 vbTursday
5 星期五 vbFriday
6 星期六 vbSaturday
使用范例：
2000/4/12与2003/5/12相差
<%= DateDiff("yyyy","2000/4/12","2003/5/12",vbSunday,vbFirstJan1)%>年<br>
2000/4/12与2003/5/12相差
<%= DateDiff("q","2000/4/12","2003/5/12",vbSunday,vbFirstJan1)%>季<br>
2000/4/12与2003/5/12相差
<%= DateDiff("m","2000/4/12","2003/5/12",vbSunday,vbFirstJan1)%>月<br>
2000/4/12与2003/5/12相差(使用参数ww)
<%= DateDiff("ww","2000/4/12","2003/5/12",vbSunday,vbFirstJan1)%>周<br>
2000/4/12与2003/5/12相差(使用参数w)
<%= DateDiff("w","2000/4/12","2003/5/12",vbSunday,vbFirstJan1)%>周<br>
2000/4/12与2003/5/12相差
<%= DateDiff("y","2000/4/12","2003/5/12",vbSunday,vbFirstJan1)%>天<br>
2000/4/12与2003/5/12相差
<%= DateDiff("d","2000/4/12","2003/5/12",vbSunday,vbFirstJan1)%>天<br>
2000/4/12与2003/5/12相差
<%= DateDiff("h","2000/4/12","2003/5/12",vbSunday,vbFirstJan1)%>小时<br>
2000/4/12与2003/5/12相差
<%= DateDiff("n","2000/4/12","2003/5/12",vbSunday,vbFirstJan1)%>分钟<br>
2000/4/12与2003/5/12相差
<%= DateDiff("s","2000/4/12","2003/5/12",vbSunday,vbFirstJan1)%>秒<br>
执行结果：
2000/4/12与2003/5/12相差3年
2000/4/12与2003/5/12相差12季
2000/4/12与2003/5/12相差37月
2000/4/12与2003/5/12相差161周
2000/4/12与2003/5/12相差160周
2000/4/12与2003/5/12相差1125天
2000/4/12与2003/5/12相差1125天
2000/4/12与2003/5/12相差27000小时
2000/4/12与2003/5/12相差1620000分钟
2000/4/12与2003/5/12相差97200000秒
Day 【日期】
用途：将传出日期的日值。
参数说明：
参数名称 选择性自变量 说明
日期 否 欲取得的时间值
使用范例：
<%
D = #2000/4/20 13:10:20#
Response.Write D
%>
的日值为<%= Day(D)%>
执行结果：
2000/4/20 PM 01:10:20 的日期为20
Hour 【时间】
用途：将传出时间的小时值
参数说明：
参数名称 选择性自变量 说明
时间 否 欲运算的时间值
使用范例：
<%
D = #2000/4/20 13:10:20#
Response.Write D
%>
的小时值为<%= Hour(D)%>
执行结果：
2000/4/20 PM 01:10:20 的小时值为13
Minute 【时间】
用途：返回入值所代表之时间的【分】值。
参数说明：
参数名称 选择性自变量 说明
时间 否 传入值亦可以数值表达式、字符串表达式表示时间
使用范例：
<%
D = #2000/4/20 13:10:20#
Response.Write D
%>
的分值为<%= Minute(D)%>
执行结果：
2000/4/20 PM 01:10:20 的分值为10
Month【日期】
用途：返回入日期的月份值。
参数说明：
参数名称 选择性自变量 说明
日期 否 亦可以数值表达式、字符串表达式
使用范例：
<%
D = #2000/4/20 13:10:20#
Response.Write D
%>
的月值为<%= Month(D)%>
执行结果：
2000/4/20 PM 01:10:20 的月值为4
Now
用途：返回计算机目前的系统日期时间。
使用范例：
目前计算机的系统日期时间为<%= Now %>
执行结果：
目前计算机的系统日期时间为2000/4/20 PM 01:52:13
Second【时间】
用途：返回入时间的秒数。
Time
用途：返回目前的系统时间
使用范例：
目前计算机的系统时间为<%= time %>
执行结果：
目前计算机的系统时间为PM 01:52:59
WeekDay 【日期[,一周的第一天]】
用途：返回该日为星期几。
参数说明：
日期：欲得知星期几的日期或日期表达式。
[一周的第一天]：设定一周的第一天。
使用范例：
<%
D = #2000/4/20 13:10:20#
Response.Write D &"为星期"
SELECT CASE WeekDay(D)
Case 0
Respnse.Write "日"
Case 1
Respnse.Write "一"
Case 2
Respnse.Write "二"
Case 3
Respnse.Write "三"
Case 4
Respnse.Write "四"
Case 5
Respnse.Write "五"
Case 6
Respnse.Write "六"
End Select
%>
执行结果：
2000/4/20 PM 01:10:20 为星期五
Year【日期】
用途：将传入时间值或时间表达式的【年】值传出。
使用范例：
<%
D = #2000/4/20 13:10:20#
Response.Write D
%>
的年值为<%= Year(D)%>
执行结果：
2000/4/20 PM 01:10:20 的年值为2000
第五类 检查函数
IsArray 【变量】
用途：辨识传入的变量是否为一个数组，是则返回ture，否则返回false。
使用范例：
<%
Dim A(3,5)
If IsArray(A) Then
Response.Write "变量A是数组"
Else
Response.Write "变量A不是数组"
End If
%>
执行结果：
变量A是数组
IsDate【辨识值】
用途：辨识表达式的值是否为时间或日期类型，或者是否可被转换为日期或时间。是则返回True，
否则返回False。
使用范例：
<%
B = "2000/1/31"
If IsDate(B) then
Response.Write "变量B是日期值"
Else
Response.Write "变量B不是日期值"
End If
%>
执行结果：
变量B是日期值
IsEmpty【辨识值】
用途：辨识传入值是否为Empty，亦即判断传入变量是否已完成初始化。
若为真则返回True，为假则返回False。
使用范例：
<%
B = Empty
If IsEmpty(B) then
Response.Write "变量B中为空值"
Else
Response.Write "变量B中不为空值"
End If
%>
执行结果：
变量B中为空值
IsNull【辨识值】
用途：用途：辨识传入值是否为Null。若为真则返回True，为假则返回False。
使用范例：
<%
B = Null
If IsNull(B) then
Response.Write "变量B中为无效值"
Else
Response.Write "变量B中不为无效值"
End If
%>
IsNumeric【辨识值】
用途：用途：辨识传入值是否为数字。若为真则返回True，为假则返回False。
使用范例：
<%
B = 2355
If IsNumeric(B) then
Response.Write "变量B中为数值"
Else
Response.Write "变量B中不为数值"
End If
%>
第六类 数字函数
Abs【数字】
用途：返回入参数的绝对值，返回的数据类型与传入的自变量相同。
Atn【数字】
用途：返回数字的反正切值，返回值为弧度值介于∏/2至-∏/2，欲改为角度需乘以180/∏。
Cos【数值
用途：取得传入数值的余弦值。
Exp【次方数】
用途：计算e之某次方的数值。
Fix【数值】
用途：返回入值的整数部分。当传入值为负数时，将返回一个大于或者等于传入值的负整数。
Int【数值】
用途：返回入值的整数部分。当传入值为负数时，将返回一个小于或等于传入值的负整数。
Log【数值】
用途：计算传入值的自然对数值。
Rnd【[数值]】
用途：产生一个数据类型为Single的随机数值。
Sgn【数值】
用途：返回入数值的正负号。
Sin【数值】
用途：计算传入值的正弦函数值。
Sqr【数值】
用途：计算传入数值的平方根。
Tan【数值】
用途：计算传入数值的正切函数值。
第七类 信息函数
InputBox【消息正文[,对话框标题[,默认值[,左边界[,上边界[,说明文件名称[,说明识别码]]]]]]】
参数说明：
自变量名称 数据类型 选择性自变量 说明
消息正文 String否 显示在InputBox对话框中的消息正文
[对话框标题] String是 显示在对话框标题列的文字
[默认值] tring 是 使用者未输入其它值时所采用的输入值
[左边界] 数值 是 指定对话框左上角的X坐标
[上边界] 数值 是 指定对话框左上角的Y坐标
[说明文件名称] String是 说明文件
[说明识别码] 数值 是 主题代码
MsgBox【消息正文[,按钮型式[,标题[,说明文件[,说明主题代码]]]]】
用途：利用对话框显示信息，并提供按钮让使用者选择。在消息框中按下的按钮与返回的常数（值）
说明如下表。
按下按钮 传回值
代表常数 值
OK vbOK 1
Cancel vbCancel 2
Abort vbAbort 3
Retry vbRetry 4
Ignore vbIgnore 5
Yes vbYes 6
No vbNo 7
第八类 字符串函数
Filter【字符串数组，搜寻字符串[,是否包含[,比较方式]]】
用途：此函数用于搜寻字符串数组的每个元素中，所存储的字符串是否包含某特定字符串。
此函数可选择将包含搜寻字符串的数组元素，或者不包含的元素，以一个索引起始值为0之
数组返回。
InStr【[搜寻起点，]字符串1，字符串2[，比较类型]】
用途：搜寻字符串2存在于字符串1的位置。
LCase【转换字符串】
用途：将传入字符串中的英文大写转换成英文小写。
Left【字符串，字符位置】
用途：返回由字符串左边开始数起特定个数的部分字符串。
Len【字符串】
用途：检查软如字符串的字符数目。
LTrim【字符串】
用途：返回一个字符串开头没有空白的字符串。
Replace【传入字符串，被取代字符串，取代字符串[,搜寻起点[,取代次数[,比较方法]]]】
用途：将传入的字符串中，某特定子字符串以另一字符串取得，并可指定取代发生的次数。
Right，RightB【字符串，字符数】
用途：返回字符串中由右边数起的部分字符串。若日用RightB时，将返回由字符串右边数起的字节数。
Rtrim【字符串】
用途：返回一个字符串尾没有空把的字符串。
Space【空格数】
用途：返回特定个数的空格。
Split【字符串，[,分隔符[,字符串数[,比较方式]]]】
用途：返回一个索引值从0开始的一维数组，该数组的元素由传入字符串之子字符串所构成。
Trim【字符串】
用途：返回一个头尾都没有空白的字符串。
Mid【字符串，起始位置[,字符数]】
用途：返回指定的部分字符串。
UCase【字符串】
用途：将传入的字符串转换成大写。
set fs = Server.CreateObject("Scripting.FileSystemObject")
建立文件
set fs1 = fs.CreateTextFile(文件路径名称[,是否覆写[,文件格式]])
文件路径名称"c:\inetpub\wwwroot\file.txt"
是否覆写 默认为false
文件格式 默认为true，使用Unicode
fs.DeleteFile(文件路径名称[,删除只读文件])
文件存在返回true
删除只读文件 默认为false,则只读文件不删除 true 删除
fs.FileExists (文件路径名称)
存在返回true
set txtsobj = fs.opentextfile(文件路径名称[,输出/入模式[,建立新文件[,打开格式]]])
输出/入模式 1 只读，为默认值 2只写，清除原来数据 8 写入文件尾部
建立新文件 打开的文件存在时，是否覆写，默认为false
打开格式 0 ASII格式，为默认值 -1 unicode -2 文件原来格式
txtsobj.atendofstream 文件结尾
取得字符串= txtsobj.read (字符数)
readline 一次一行
readall
txtsobj.skip (略过的字符数)
skipline
txtsobj.Write (写入字符串)
writeline 写的时候会在最后加入换行符号
set fsobj=Server.CreateObject("Scripting.FileSystemObject")
filepath= server.mappath("./database/order_num.txt")
set txtsobj= fsobj.OpenTextFile(filepath,1)
ordernum=txtsobj.readline
set txtswrite= fsobj.OpenTextFile(filepath,2)
txtswrite.Write (ordernum+1) |
