ASP 常用函数积累
LBound() 函数: 返回指定的数组维可用的最小下标。
UBound() 函数: 返回指定的数组维可用的最大下标。
InStr([start, ]string1, string2[, compare]) 返回字符或字符串在另一个字符串中第一次出现的位置
InStrRev()函数 返回某字符串在另一个字符串中最后出现的位置
CDate() 函数可把一个合法的日期和时间表达式转换为 Date 类型，并返回结果。
cstr()函数将括号中的内容转换为字符串
clng()是将数字转换成Long格式的数字类型，这样才能进行计算
CInt() 返回四舍五入的整数，当分数部分恰好为 0.5 时，CInt 函数通常将其四舍五入为最接近的偶数
Fix() 和 Int() 将数字的分数部分截尾取整，而不是四舍五入。
IsNumeric() 返回boolean 判断为数字且不为空
Trim() 功能删除字符串首部和尾部的空格。
LCase UCase函数 返回字符串的小写形式。仅大写字母转换成小写字母；所有小写字母和非字母字符保持不变。
Mid(string, start[, length]) 它的主要作用是从字符串中返回指定数目的字符。
Asc() 返回字符的ANSI值。
replace(string,"1","A")函数 若要把字符串 string 里面的 1 转化为A。
timer() 就是从零点开始今天过去的秒数
TypeName()函数 返回有关变量的类型信息。
Join() 函数 返回一个字符串,此字符串由包含在数组中的许多子字符串联接创建
相关文档：
Dim xmlDoc
NewsConfigFile=server.MapPath("/test.xml")
Set xmlDoc=Server.CreateObject("msxml2.FreeThreadedDOMDocument.3.0")
If Not xmlDoc.load(NewsConfigFile) Then
'XmlDoc.loadxml "<?xml version=""1.0"" encoding=""gb2312""?><NewscodeInfo/>"
response.Write("不存在数据")
& ......
<%
function decrypt(dcode)
dim texts
dim i
for i=1 to len(dcode)
texts=texts & chr(asc(mid(dcode,i,2))-i)
next
decrypt=texts
end function
function encrypt(ecode)
dim texts
dim i
for i=1 to len(ecode)
texts=texts & chr(asc(mid(ecode,i,2))+i)
next
en ......
'判断是否是数字（包括整数和浮点数）
function IsNumber(str)
if RegPatrn("^-?[1-9]\d*$",str) or RegPatrn("^-?([1-9]\d*\.\d*|0\.\d*[1-9]\d*|0?\.0+|0)$",str) then
IsNumber=true
else
IsNumber=false
end if
end function
'正则表达式判断是否匹配
Function RegPatrn(patrn, strng)
RegPatrn = false
Di ......
3、纯ASP代码生成图表函数——折线图
<%dim total(7,3)
total(1,0)="中国经营报"
total(2,0)="招聘网"
total(3,0)="51Job"
total(4,0)="新民晚报"
total(5,0)="新闻晚报"
total(6,0)="南方周末"
total(7,0)="羊城晚报"
total(0,1)="#FF0000,1.5,1,2,公司1"'参数1线条的颜色，参数2线条的宽度，参数3� ......
客户端脚本：<script language="scriptlanguage"></script>
服务器端脚本：<% ......%>
Vbscript是visual basic的一个子集，虽然限制了可以使用的内置函数的数量，但是也使得他非常小巧，从而提高了可移植性
Variant是vbscript的唯一数据类型，有13种子类型：
Empty,Null,Boolean,Byte,Integer,Curre ......
