ASP函数语法速查表
Abs （数值）
绝对值。一个数字的绝对值是它的正值。空字符串 (null) 的绝对值，也是空字符串。未初始化的变数，其绝对为 0
例子：ABS(-2000)
结果：2000
Array （以逗点分隔的数组元素）
Array 函数传回数组元素的值。
例子：
A=Array(1,2,3)
B=A(2)
结果： 2
说明：变量Ｂ为Ａ数组的第二个元素的值。
Ａsc （字符串）
将字符串的第一字母转换成 ANSI （美国国家标准符号）字码。
例子：Ａsc（＂Internet＂）
结果：73
说明：显示第一字母 I 的 ANSI 字码。
CBool（表达式）
转换成布尔逻辑值变量型态（Ｔrue 或Ｆalse ）
例子：CBool（1+2）
结果：True
CDate （日期表达式）
换成日期变量型态。可先使用 IsDate 函数判断是否可以转换成日 期。
例子： CDate (now( )+2)
结果：2000/5/28 10:30:59
CDbl（表达式）
转换成DOUBLE变量型态。
Chr （ ANSI 字码）
将ASCII 字码转换成字符。
例子： Chr （ 72 ）
结果： H
CInt （表达式）
转换成整数变量型态。
例子： CInt ("3.12")
结果： 3
CLng （表达式）
转换成LONG 变量型态。
CSng （表达式）
转换成SINGLE 变量型态。
CStr （表达式）
转换成字符串变量型态。
Date （ ）top
传回系统的日期。
例子： Date
结果： 2000/5/13
DateAdd （ I , N , D ）
将一个日期加上一段期间后的日期。 I ：设定一个日期（ Date ）所加上的一段期间的单位。譬如 interval="d" 表示 N的单位为日。 I的设定值如下：
yyyy Year 年
q Quarter 季
m Month 月
d Day 日
w Weekday 星期
h Hour 时
n Minute 分
s Second 秒
N ：数值表达式，设定一个日期所加上的一段期间，可为正值或负值，正值表示加（结果为 >date 以后的日期），负值表示减（结果为 >date 以前的日期）。
D ：待加减的日期。
例子： DateAdd （ "m" , 1 , "31-Jan-98")
结果： 28-Feb-98
说明：将日期 31-Jan-98 加上一个月，结果为 28-Feb-98 而非 31-Fe-98 。
例子： DateAdd （ "d" , 20 , "30-Jan-99")
结果： 1999/2/9
说明：将一个日期 30-Jan-99 加上 20 天后的日期。
DateDiff (I , D1 , D2[,FW[,FY]])
计算两个日期之间的期间。
I ：设定两个日期之间的期间计算之单位。譬如 >I="m" 表示计算的单位为月。 >I 的设定值如：
yyyy > Year 年
q Quarter 季
m Month 月
d Day 日
w Weekday 星期
h H
相关文档：
新建立一个ASP文件 把 以下代码复制进去
<%
ip=request.ServerVariables("REMOTE_ADDR") '获取来访的IP地址
dim conn
set conn=server.CreateObject("ADODB.connection")
conn.open "Dbq="&server.MapPath("yb/dat/data.mdb")&";Driver={Microsoft Access Driver (*.mdb)}" '建立数据库连接 这里你� ......
1. ASP连接Access数据库语句
Set Conn=Server.CreateObject("ADODB.Connection")
Connstr="DBQ="+server.mappath("www/bbs.mdb")+";DefaultDir=;DRIVER={Microsoft
AccessDriver(*.mdb)};"
Conn.Open connstr
其中Set Conn=Server.CreateObject("ADODB.Connection")为建立一个访问数据的对象
server.mappath("w ......
VBS里，超出Integer类型的取值范围，该类型的取值范围为-32,768 到 32,767 之间的整数。
出错的根源：
在ASP里，有时候为了仿止注入，所以在接收参数的时候直接使用Cint函数把接过来的参数转换为Integer（数字）类型，这就存在一个潜在问题，当页面接收的某个参数（Request("xxx")）超过取值范围时（可简单理解为5位数字� ......
将以下代码放到一个单独的页面checkcode.asp
<%
Option Explicit
Response.buffer=true
Call Com_CreatValidCode("validateCode")
Sub Com_CreatValidCode(pSN)
' 禁止缓存
Response.Expires = -9999
Response.AddHeader "Pragma","no-cache"
Response.AddHeader "cache-ctrol","no-cache"
Response.ContentTy ......
<%
If Not IsNull(Request("fileName")) Then r = DownLoadFile(Request("fileName"))
Function DownLoadFile(fileName)
Dim s,fso,f,fLen
fileName = Server.MapPath(fileName)
'create stream
Set s = Server.CreateObject("ADODB.Stream")
s.Open()
s.Type = 1
Set fso = Server.CreateObject ......
