ASP函数大全
asp函数大全
ASP函数大全1.函数array()功能:创建一个数组变量格式:array(list)参数:list 为数组变量中的每个数值列,中间用逗号间隔例子: |% i = array ("1","2","3") %|结果: i 被赋予为数组2.函数Cint()功能:将一表达式/其它类型的变量转换成整数类型(int)格式:Cint(expression)参数:expression 是任何有效的表达式/其它类型的变量例子: |% f = "234" response.write cINT(f) + 2 %|结果: 236函数Cint()将字符"234"转换成整数234.如果表达式为空, 或者无效时,返回值为0;3.函数:Creatobject()功能:创建及返回一个ActiveX对象.格式:Creatobject(obname)参数bname 是对象的名称例子:|% Set con =Server.CreateObject("ADODB.Connection") %| 结果:4.函数Cstr()功能:将一表达式/其它类型的变量转换成字符类型(string)格式:Cstr(expression)参数:expression是任何有效的表达式/其它类型的变量例子: |% s = 3 + 2 response.write "The result is: " & cStr(s) %|结果:函数Cstr()将整数 5 转换成字符"5".5.函数cutstr截取字符串的函数CutStr函数参数说明:str,待截取的原字符串;gtype,截取方向,1为左,0为右;lennum为截取长度当str的长度不超过lennum时,不执行截取,如超过,则截取,并在输出的字符串尾加上"..."Public Function CutStr(Str, Gtype, LenNum)5.函数Date()功能:返回当前系统(server端)的日期格式: Date()参数:无例子|% date () %|结果:05/10/006.函数Dateadd()描述:返回已添加指定时间间隔的日期。
ASP函数大全
IsEmpty函数:判断变量是否为空
IsNull函数:判断表达式中是否包含有效数据
IsNumeric函数:判断表达式的值是否为数字
Is_object_函数:判断表达式的值是否为某一对象
VarType函数:返回指定变量的子类型
CCur函数:将表达式转化为Currency子类型
CDate函数:将日期表达式转化为Date子类型
CSng函数:将表达式转化为Single数值子类型
Asc函数:返回与字符串首字母相对应的ANSI字符代码(~)
Oct函数:返回八进制的字符串
Hex函数:返回十六进制的字符串
格式化函数
TypeName函数:返回指定变量子类型的信息
对话框函数
MsgBox函数:弹出含有提示信息的对话框
InputBox函数:弹出可输入数据的对话框
脚本引擎函数
ScriptEngine函数:返回一个代表当前所使用的脚本语言的字符串
ScriptEngineBuildVersion函数:返回所使用的脚本引擎的编译版本号
实例: <%=Date%>
返回结果: 9/9/00
DateAdd()
函数返回一个被改变了的日期。
表达式 DateAdd(timeinterval,number,date)
允许数据类型:
timeinterval is the time interval to add;
number is amount of time intervals to add;
表达式 FormatCurrency(Expression [, Digit [, LeadingDigit [, Paren [, GroupDigit]]]])
ASP字符串函数大全
ASP字符串函数大全Len Len(string|varname) 返回字符串内字符的数目,或是存储一变量所需的字节数。
Trim Trim(string) 将字符串前后的空格去掉Ltrim Ltrim(string) 将字符串前面的空格去掉Rtrim Rtrim(string) 将字符串后面的空格去掉Mid Mid(string,start,length) 从string字符串的start字符开始取得length长度的字符串,如果省略第三个参数表示从start字符开始到字符串结尾的字符串Left Left(string,length) 从string字符串的左边取得length长度的字符串Right Right(string,length) 从string字符串的右边取得length 长度的字符串LCase LCase(string) 将string字符串里的所有大写字母转化为小写字母UCase UCase(string) 将string字符串里的所有大写字母转化为大写字母StrComp StrComp(string1,string2[,compare]) 返回string1字符串与string2字符串的比较结果,如果两个字符串相同,则返回0,如果小于则返回-1,如果大于则返回1InStr InStr(string1,string2[,compare]) 返回string1字符串在string2字符串中第一次出现的位置Split Split(string1,delimiter[,count[,start]]) 将字符串根据delimiter拆分成一维数组,其中delimiter用于标识子字符串界限。
如果省略,使用空格("")作为分隔符。
count返回的子字符串数目,-1指示返回所有子字符串。
start为1执行文本比较;如果为0或者省略执行二进制比较。
ReplaceReplace(expression,find,replacewith[,compare[,count[,start]]]) 返回字符串,其中指定数目的某子字符串(find)被替换为另一个子字符串(replacewith)。
asp常用函数
ASP常用内置函数在ASP中,把带有返回值的这样的一段代码叫做函数。
例如通过编写一段代码计算出一个自然数是否是质数,返回给调用程序,由于调用程序需要知道那个自然数是否是质数,所以必须要返回一个值。
1,日期/时间函数这些函数包括对“年”、“月”、“日”、“时”、“分”、“秒”、“星期”等的显示。
(1)Now函数:根据计算机系统设定的日期和时间,返回当前的日期和时间值。
使用方法now();(2)Date函数:只返回当前计算机系统设定的日期值。
使用方法:date();(3)Time函数:只返回当前计算机系统设定的时间值。
使用方法:time();(4)Year函数:返回一个代表某年的整数。
使用方法:year(date),其中date参数是任意的可以代表日期的参数,比如“year(date())”就表示是从“date()”得出的日期中提取其中“年”的整数。
另外,还可以这样应用:“year(#520,2006#)”表示提取“2006年5月20日”中“年”的整数值。
关于“520,2006”,也可使用“5-20-2006”、“5/20/2006”等形式表现,即“某月某日”和“某年”的组合。
同时注意使用“#”进行包括以表示日期值。
(5)Month函数:返回1到12之间的整数值,表示一年中某月。
使用方法:month(date)。
关于参数date的说明和year函数相同。
但要注意日期的正确性,比如“#13-31-2006#”,根本就没有“13”月,肯定是错误的了。
(6)Day函数:返回1到31之间的整数值,表示一个月中的某天。
使用方法:day(date)。
关于参数date的说明和year函数相同。
同样要注意日期的正确性,比如“#2-30-2006#”其中对“2”月定义的“30”日这天就是错误的。
(7)Hour函数:返回0到23之间的整数值,表示一天中的某个小时。
使用方法:hour(time)。
其中参数time是任意的可代表时间的表达式。
ASP中日期函数大全
ASP中日期函数大全1. Now 传回系统的日期及时间。
使用方法:无例:Now 传回值:2002/11/2 10:23:30 AM备注:无2. Date 传回系统的日期。
使用方法:无例:Date 传回值:2002/11/2备注:无3. Time 传回系统的时间。
使用方法:无例:Time 传回值:10;23:30 AM备注:无4. Year 传回系统的年份。
使用方法:Year[(1-3的时间函式)]例:Year(Now) 传回值:2002备注:无5. Month 传回系统的月份。
使用方法:Month[(1-3的时间函式)]例:Month(Now) 传回值:11备注:无6. Weekday 传回系统的星期几的数字。
使用方法:Weekday(1-3的时间函式,[星期天的开始数字])例:Weekday(Now,7) 传回值:14备注:若不设定开始数字,则星期天为1,.....星期六为7。
设定了则由星期天累加。
7. Day 传回系统的日子。
使用方法:Day[(1-3的时间函式)]例:Day(Now) 传回值:2备注:无8. Hour 传回系统的小时。
使用方法:Hour[(1-3的时间函式)]例:Hour(Now) 传回值:11备注:无9. Minute 传回系统的分钟。
使用方法:Minute[(1-3的时间函式)]例:Minute(Now) 传回值:23备注:无10. Second 传回系统的秒。
使用方法:Second[(1-3的时间函式)]例:Second(Now) 传回值:30备注:无11. Cdate 转换成日期变量型态。
使用方法:Cdate(日期表达式,上篇1-3项)例:Cdate(Now) 传回值:2002/11/2 10:23:30 AM备注:无12.DateAdd 用以计算时差,即时间加减。
使用方法:DateAdd("时间代码",加减数,日期表达式)例:DateAdd("H",2,Now) 传回值:2002/11/2 12:23:30 AM备注:日期表达式看备注13. DateDiff 计算两段时间差距。
asp常用函数
所有的关键字和运算等一切有关的关键词的集合HTML文件标记<html><head><!--><title><body>文字排版标记<br/><nobr><p><pre> 原始文字样式<center><blockquote> 向内缩排<h> 标题<strong>,<b> 粗体<em>,<i>,<cite> 斜体<U> 底线<strike> 删除线<blink> 文字闪烁<big> 大型字体<small> 小型字体<sup> 文字上标<SUB> 文字下标<basefont> 默认字体设置<font> 更改字体设置菜单标记<menu> 选项菜单<dir> 目录菜单<lh> 菜单格式(一)<ul> 菜单格式(二)<dl>,<dt>,<dd> 说明式菜单<ol>,<li> 标题菜单直线与表格标记<hr><table><tr><td><th><caption> 表格标题超链接标记<a> 锚图形标记<IMG> 插入图形框架标记<FRAME> 定义框架内容<NOFRAME> 不支持框架声明表单标记<FORM><INPUT><TEXTAREA><SELECT><OPTION>SCRIPT<script>VBSCRIPT标记索引基本运算+ 数字加法及字符串连接- 数字减法* 数字乘法/ 数字除法Mod 求余数\ 求商数& 字符串连接^ 次方= 相等<> 不相等>= 大于或等于> 大于<= 小于或等于< 小于Not 非And 且Or 或Xor 异或循环及决策if ....then 若...则...if ...then...else若...则...非else if...非若select case...群组选择条件end selectfor ... next计数循环while...wend 条件循环(一) do while...loop条件循环(二) do...loop while 条件循环(三) do until...loop条件循环(四) do...loop until 条件循环(五)数学函数Abs 绝对值Sgn 正负号Hex 转换成十六进制Oct 转换成八进制Sqr 平方根Int 取整数Fix 取整数Round 取整数Log 以e为底的对数Sin 正弦函数Cos 余弦函数Tan 正切函数字符串处理函数Len 字符串长度Mid 取部分字符串Left 从字符串开头取部分字符串Right 从字符串结尾取部分字符串Lcase 转换成小写Ucase 转换成大写Trim 清除字符串开头及结尾的空格符Ltrim 清除字符串开头空格符Rtrim 清除字符串结尾空格符Replace 替换字符串部分字符Instr 判断是否包含于另一个字符串(从起始搜寻) InstrRev 判断是否包含于另一个字符串(从结尾搜寻) Space 任意字符数的空格符String 任意字符数的任一字符StrReverse 反转字符串Split 以某字符分割字符串数据类型转换函数Cint 转换成整形Cstr 转换成字符串Clng 转换成常整数Cbool 转换成布尔函数Cdate 转换成日期函数CSng 转换成单精度CDbl 转换成双精度[page_break]日期时间函数Date 现在日期Time 现在时间NOw 现在日期时间DateAdd 增加日期DateDiff 两日期差DateSerial 日期设定Datevalue 日期设定Year 现在年份Month 现在月份Day 现在天Hour 现在时刻Minute 现在分钟Second 现在秒钟Timer 午夜距现在秒数TimeSerial 时间设定Timevalue 时间所属部分WeekDay 星期名称MonthName 月份名称其它函数Array 产生数组Asc 字符ASCII码Chr ASCII码字符Filter 过滤数组InputBox 输入窗口Join 合并数组中的元素MsgBox 信息窗口Lbound 数组下界Ubound 数组上界指令Const 设定常数Dim 定义变量或者数组Erase 清除数组ReDim 重新声明数组Randomize 起始随机数Rnd 取得随机数ASP对象Session对象IsEmpty 测试Session变量是否存在TimeOut 设定Session变量生存周期Abandon 强制清除Session变量Application对象IsEmpty 测试Application变量是否存在Lock 锁定Application变量Unlock 解除Lock指令的锁定Cookies对象Expires 设定Cookies变量的生存周期Connection对象Open 打开与数据库的连接Execute 打开Recordset对象Close 关闭Connection对象Recordset对象movefirst 将记录指针移至第一条movelast 将记录指针移至最后一条movenext 将记录指针移至下一条moveprevious 将记录指针移至上一条bof 测试是否为recordset的起始eof 测试是否为recordset的结束open 打开Recoreset对象close 关闭recordset对象fields 读取数据的子对象fileds.count 字段个数pagesize 每页记录条数absolutepage 设定为某页pagecount 总页数Absoluteposition 直接跳至某条记录sql="select * from bbs1 where xh like '%" & suibian & "%' or xq like '%" & suibian & "%'or bj like '%" & suibian & "%' or kc like '%" & suibian & "%'"。
asp系列vb函数
ASP系列VB函数大全ASP函数大全 ASP函数与VBSCRIPT类似,以下举一些常用的函数 Array() 函数返回一个数组 表达式Array(list) 允许数据类型: 字符,数字均可 实例:<% Dim myArray() For i = 1 to 7 Redim Preserve myArray(i) myArray(i) = WeekdayName(i) Next %> 返回结果: 建立了一个包含7个元素的数组myArray myArray("Sunday","Monday", ... ... "Saturday" CInt() 函数将一个表达式转化为数字类型 表达式CInt(expression) 允许数据类型: 任何有效的字符均可 实例:<% f = "234" response.write cINT(f) + 2 %> 返回结果: 236 转化字符"234"为数字"234",如果字符串为空,则返回0值 CreateObject() 函数建立和返回一个已注册的ACTIVEX组件的实例。
表达式CreateObject(objName) 允许数据类型: objName 是任何一个有效、已注册的ACTIVEX组件的名字. 实例:<% Set con = Server.CreateObject("ADODB.Connection" %> CStr() 函数转化一个表达式为字符串. 表达式CStr(expression) 允许数据类型: expression 是任何有效的表达式。
实例:<% s = 3 + 2 response.write "The 返回结果is: " & cStr(s) %> 返回结果: 转化数字“5”为字符“5”。
asp常用自定义函数大全(网站开发必备)
函数列表:'1:建立数据库的连接ConnOpen(DataBaseConnectStr,DBType,Conn_object)'2:断开数据库的连接ConnClose(Conn_object)'3:防止SQL注入SafeRequest(paraName,paraType)'4:格式化日期DateFormat(dateStr,dateType)'5:显示错误提示ShowErr(errStr)'6:查询字符串中特定数据SelectStr(contentStr,patternStr,patternNum)'7:过滤指定字符Leach(contentStr,badWords)'8:远程文件内容抓取Seize(urlStr)'9:数据流编码处理BytesToBstr(body,cset)'10:编码cookies codeCookie(contentStr)'11:解码cookies DecodeCookie(contentStr)'12:检验数据提交来源是否合法ChkPost()'13:个性化加密MyEncrypt(StrPassword)'14:禁止浏览器缓存本页NoBuffer()'15:网页格式化输入文本HTMLEncode(fString)'16:从头部截取字符串的指定长度(按字符数算) GotTopic(Str,StrLen)'17:检测验证码CheckRadomPass(RadomPass)'18:生成验证码GetCode()'19:获取客户端操作系统版本GetSystem()'20:数据库事务处理ConnManage(Conn_object)'21:快速排序(递归)QuickSort(arr,Low,High)'22:将数组的元素以特定字符串连起来arr_join(arr,character)'23:返回字符串以某分割符分割的数目count_character(str,character)'24:截取含有分割符的字符串中指定数目的字符串inter_str_by_character_num(str,character,start,num)'25:利用Stream下载文件downloadFile(strFile)'26:返回信息send_back(ResultWords)'27:获取错误信息get_err()'28:与SafeRequest相反SafeResponse(content)'29:保存远程图片SaveRemoteFile(LocalFileName,RemoteFileUrl)'30: ...dim language_arr(10)language_arr(0) = "数据库连接的参数设置错误!"language_arr(1) = "数据库连接的类型参数设置错误!"language_arr(2) = "数据库连接失败!"language_arr(3) = "非法的参数值!"language_arr(4) = "参数值不是有效的日期格式!"language_arr(5) = "操作失败!"language_arr(6) = "栏目有重名!"language_arr(7) = "栏目名称为空!"language_arr(8) = "栏目文件夹创建失败!"language_arr(9) = "您没有此权限!"'============================================================================================================================'函数ID:1'函数作用:建立数据库的连接'作者名称:茫仔xiamangmang@ 博客:'建立时间:2006-2-15 10:28'修改时间:'传人参数:' connectStr:数据库连接字符串' connectType:数据库类别-数字型,0为Access,1为MS SQL'返回值:'=================================================================== =========================================================sub ConnOpen(DataBaseConnectStr,DBType,Conn_object)Set Conn_object = Server.Createobject("adodb.connection")if DataBaseConnectStr = "" then call ShowErr(language_arr(0))if DBType = 0 thenConn_object.Open "driver={Microsoft Access Driver (*.mdb)};dbq=" & DataBaseConnectStrelseif DBType = 1 thenConn_object.Open "Provider=SQLOLEDB.1;" & DataBaseConnectStrelsecall ShowErr(language_arr(1))end iferr.clearend sub'=================================================================== ========================================================='函数ID:2'函数作用:断开数据库的连接'作者名称:茫仔xiamangmang@ 博客:'建立时间:2006-2-16 15:10'修改时间:'传人参数:'返回值:'=================================================================== =========================================================Sub ConnClose(Conn_object)Conn_object.closeset Conn_object = nothingEnd sub'=================================================================== ========================================================='函数ID:3'函数作用:防止SQL注入'作者名称:/infoview/Article_2906.html'建立时间:2006-2-16 15:32'修改时间:'传人参数:' paraName:参数名称-字符型' paraType:参数类型-数字型(1表示以上参数是数字,0表示以上参数为字符)'返回值:' 过滤后的字符串'=================================================================== =========================================================Function SafeRequest(paraName,paraType)dim paraValueparaValue = Request(paraName)select case paraTypecase 0paraValue = replace(paraValue,"'","[system:34]")paraValue = replace(paraValue,"=","[system:61]")case 1if not IsNumeric(paraValue) then call ShowErr(language_arr(3))case -1if not IsNumeric(paraValue) then call ShowErr(language_arr(3))if paraValue = "" then paraValue = 0case elseif len(paraValue) > paraType then call ShowErr(language_arr(3))paraValue = replace(paraValue,"'","[system:34]")paraValue = replace(paraValue,"=","[system:61]")end selectSafeRequest = paraValueEnd function'=================================================================== ========================================================='函数ID:4'函数作用:格式化日期'作者名称:茫仔xiamangmang@ 博客:'建立时间:2006-2-16 15:45'修改时间:'传人参数:' dateStr:日期字符串' paraType:日期类型-数字型'返回值:' 格式化后的日期'=================================================================== =========================================================Function DateFormat(dateStr,dateType)Dim dateStringif IsDate(dateStr) = False thencall ShowErr(language_arr(4))end ifSelect Case dateTypeCase "1"dateString = Year(dateStr)&"-"&Month(dateStr)&"-"&Day(dateStr)Case "2"dateString = Year(dateStr)&"."&Month(dateStr)&"."&Day(dateStr)Case "3"dateString = Year(dateStr)&"/"&Month(dateStr)&"/"&Day(dateStr)Case "4"dateString = Month(dateStr)&"/"&Day(dateStr)&"/"&Year(dateStr)Case "5"dateString = Day(dateStr)&"/"&Month(dateStr)&"/"&Year(dateStr)Case "6"dateString = Month(dateStr)&"-"&Day(dateStr)&"-"&Year(dateStr)Case "7"dateString = Month(dateStr)&"."&Day(dateStr)&"."&Year(dateStr)Case "8"dateString = Month(dateStr)&"-"&Day(dateStr)Case "9"dateString = Month(dateStr)&"/"&Day(dateStr)Case "10"dateString = Month(dateStr)&"."&Day(dateStr)Case "11"dateString = Month(dateStr)&language_arr(6)&Day(dateStr)&language_arr(7)Case "12"dateString = Day(dateStr)&language_arr(7)&Hour(dateStr)&language_arr(8)case "13"dateString = Day(dateStr)&language_arr(7)&Hour(dateStr)&language_arr(8)Case "14"dateString = Hour(dateStr)&language_arr(8)&Minute(dateStr)&language_arr(9)Case "15"dateString = Hour(dateStr)&":"&Minute(dateStr)Case "16"dateString = Year(dateStr)&language_arr(5)&Month(dateStr)&language_arr(6)&Day(dateStr)&languag e_arr(7)Case ElsedateString = dateStrEnd SelectDateFormat = dateStringEnd Function'=================================================================== ========================================================='函数ID:5'函数作用:显示错误提示'作者名称:茫仔xiamangmang@ 博客:'建立时间:2006-2-16 16:29'修改时间:'传人参数:' errStr:错误提示-字符型'返回值:返回提交页面'=================================================================== =========================================================sub ShowErr(errStr)Response.Write("<script>alert("""&errStr&""");location.href=""javascript:history.back()"";</ script>")Response.EndEnd sub'=================================================================== ========================================================='函数ID:6'函数作用:查询字符串中特定数据'作者名称:茫仔xiamangmang@ 博客:'建立时间:2006-2-16 16:40'修改时间:'传人参数:' contentStr:查询字符串' patternStr:匹配式字符串' patternNum:查询定位-数字型'返回值:' 找不到返回false' patternNum为-1返回所有匹配字符串并以[10]隔开' 否则返回指定位置的字符串'=================================================================== =========================================================Function SelectStr(contentStr,patternStr,patternNum)dim objRegExp,matches,matcheif contentStr = "" thencall ShowErr(language_arr(12))end ifSet objRegExp=new RegExp '建立正则表达式objRegExp.pattern = patternStr '设置模式objRegExp.IgnoreCase =False '设置是否区分字符大小写objRegExp.Global=true '设置全局可用性objRegExp.pattern = patternStr '匹配式if objRegExp.test(contentStr) = false then '全局匹配SelectStr = falseelseSet matches = objRegExp.Execute(contentStr) '执行搜索if patternNum = -1 thenfor each matche in matchesSelectStr = SelectStr &"[10]"& matche.valuenextelseSelectStr = matches.Item(patternNum).valueend ifend ifSet objRegExp=NothingEnd Function'=================================================================== ========================================================='函数ID:7'函数作用:过滤指定字符'作者名称:茫仔xiamangmang@ 博客:'建立时间:2006-2-16 16:59'修改时间:'传人参数:' contentStr:源字符串' badWords:要过滤的字符串,若数目大于1则用英文状态的"^"隔开'返回值:' 返回过滤后的字符串'=================================================================== =========================================================Function Leach(contentStr,badWords)dim badWordsArr,ibadWordsArr = Split(badWords,"^")for i = 0 to UBound(badWordsArr)contentStr = replace(contentStr,badWordsArr(i),"")nextleach = contentStrend Function'=================================================================== ========================================================='函数ID:8'函数作用:远程文件内容抓取'作者名称:茫仔xiamangmang@ 博客:'建立时间:2006-2-16 17:24'修改时间:'传人参数:' urlStr:远程文件地址'返回值:' 返回远程文件内容'=================================================================== =========================================================function Seize(urlStr)dim connectif urlStr = "" thencall ShowErr(language_arr(13))elseSet connect = CreateObject("Microsoft.XMLHTTP") '建立XMLHTTP对象connect.open "GET",urlStr,false '设置参数,通信方式为get,请求为同步,后面还有两个可选属性:userID,password用于用户验证connect.send() '数据发送,Send方法的参数类型可以是字符串、DOM树或任意数据流Seize = BytesToBStr(connect.responseBody,"GB2312") '返回信息,编码为中文set connect = nothingend ifend function'=================================================================== ========================================================='函数ID:9'函数作用:数据流编码处理'作者名称:茫仔xiamangmang@ 博客:'建立时间:2006-2-16 17:30'修改时间:'传人参数:' body:数据内容' cset:编码格式'返回值:' 编码处理后的信息'=================================================================== =========================================================Function BytesT oBstr(body,cset)dim objstreamset objstream = Server.CreateObject("adodb.stream")objstream.Type = 1 '以二进制模式打开objstream.Mode =3objstream.Openobjstream.Write bodyobjstream.Position = 0objstream.Type = 2objstream.Charset = csetBytesToBstr = objstream.ReadT extobjstream.Closeset objstream = nothingEnd Function'=================================================================== ========================================================='函数ID:10'函数作用:编码cookies'作者名称:茫仔xiamangmang@ 博客:'建立时间:2006-2-16 17:36'修改时间:'传人参数:' contentStr:数据内容'返回值:' 编码处理后的信息,字符以"a"隔开'=================================================================== =========================================================Function codeCookie(contentStr)Dim i,returnStrFor i = Len(contentStr) to 1 Step -1returnStr = returnStr & Ascw(Mid(contentStr,i,1))If (i <> 1) Then returnStr = returnStr & "a"NextCodeCookie = returnStrEnd Function'=================================================================== ========================================================='函数ID:11'函数作用:解码cookies'作者名称:茫仔xiamangmang@ 博客:'建立时间:2006-2-17 16:58'修改时间:'传人参数:' contentStr:数据内容'返回值:' 解码处理后的信息'=================================================================== =========================================================Function DecodeCookie(contentStr)Dim iDim StrArr,StrRtnStrArr = Split(contentStr,"a")For i = 0 to UBound(StrArr)If isNumeric(StrArr(i)) = True ThenStrRtn = Chrw(StrArr(i)) & StrRtnElseStrRtn = contentStrExit FunctionEnd IfNextDecodeCookie = StrRtnEnd Function'=================================================================== ========================================================='函数ID:12'函数作用:检验数据提交来源是否合法'作者名称:茫仔xiamangmang@ 博客:'建立时间:2006-2-18 18:55'修改时间:'传人参数:''返回值:' Boolean'=================================================================== =========================================================Function ChkPost()Dim server_v1,server_v2Chkpost=Falseserver_v1=Cstr(Request.ServerVariables("HTTP_REFERER"))server_v2=Cstr(Request.ServerVariables("SERVER_NAME"))If Mid(server_v1,8,len(server_v2))=server_v2 Then Chkpost=TrueEnd Function'=================================================================== =========================================================。
asp函数大全之函数(DOC)
1、asp函数大全之函数array()函数array()功能:创建一个数组变量格式:array(list)参数:list为数组变量中的每个数值列,中间用逗号间隔例子:<%asp=array("1","2","3")%>结果:asp被赋予为数组2、asp函数大全函数Creatobject()函数:Creatobject()功能:创建及返回一个ActiveX对象.格式:Creatobject(obname)参数bname是对象的名称例子:<%Set asp = Server.CreateObject("ADODB.Connection")%>3、asp函数大全之函数Date()函数Date()功能:返回当前系统(server端)的日期格式:Date()参数:无例子<%=date()%>4、asp函数大全函数Datediff()函数Datediff()功能:计算某量个指定的时间差格式: datediff(timeinterval,date1,date2[,firstdayofweek[,firs tdayofyear]])参数:timeinterval是时间单位;date1,date2是有效的日期表达式,firstdayofweek,firstdayofyear是任意选项.例子:<%fromDate=#8/8/2008#toDate=#8/8/2010#response.write"There are"&_DateDiff("d",fromDate,toDate)&_%>5、函数formatcurrency()函数formatcurrency()功能:转换成货币格式格式:formatcurrency(expression [,digit[,leadingdigit[,paren[,groupdigit]]]])参数:expression是有效的数字表达式;digit表示小数点后的位数;leadingdigit,paren,groupdigit是任意选项.例子<%=FormatCurrency(34.3456)%>结果34.356、asp函数大全之函数Isnumeric()函数Isnumeric()功能:返回一个布尔值,判断变量是否为数字变量,或者是可以转换成数字的其它变量.格式:isnumeric(expression)参数:expression是任意的变量.例子:<%i="234"response.write isnumeric(i)%>结果:true.7、asp函数大全之函数:Lbound()函数:Lbound()功能:返回一个数组的下界.格式:Lbound(arrayname[,dimension])参数:arrayname是数组变量,dimension是任意项例子:<%i=array("1","2","3")response.write lbound(i)%>结果:08、asp函数大全之函数left()功能:截取一个字符串的前部分;格式:left(string,length)参数:string字符串,length截取的长度.例子:<%=left("asp is a web!",3)%>结果:asp9、asp函数大全之函数ltrim()功能:去掉字符串前的空格.格式:ltrim(string)参数:string字符串.例子:<%=ltrim("this is a test!")结果:this is a test!10、asp函数大全之函数minute()功能:返回一数值,表示分钟格式:minute(time)参数:time是时间变量例子lt;%=minute(#12:23:34#)%>结果:2311、asp函数大全之函数monthname()功能:返回月份的字符串(名称).格式:Monthname(date[,abb])参数:date是日期变量,abb=true时则月份的缩写,例子:<%=monthname(#4/5/99#)%>结果:April12、asp函数大全之函数replace()功能:在字符串中查找,替代指定的字符串.格式:replace(strtobesearched,strsearchfor,strreplacewit h[,start[,count[,compare]]])参数:strtobesearched是字符串;strsearchfor是被查找的子字符串;strreplacewith是用来替代的子字符串.start,count,compare是任意选项.例子:<%strtest="this is an apple."response.write replace(strtest,"apple","orange") %>结果:this is an orange.13、asp函数大全之函数rnd()功能:返回一个随机数值格式:rnd[(number)]参数:number是任意数值.例子:<%randomize()response.write rnd()%>结果:0/1数值之一,无randomize(),则不能产生随机数.14、asp函数大全之函数rtrim()功能:去掉字符串后的空格.格式:rtrim(string)参数:string是字符串例子:<%response.write rtrim("this is a test!")%>结果:this is a test!15、asp函数大全之函数strReverse()功能:返回与原字符串排列逆向的字符串.格式:strreverse(string)参数:string是字符串例子<%=strreverse("this is a test!")结果:!tset a si siht16、asp函数大全之函数trim()功能:删去字符串前,后的空格.格式:trim(string)参数:string字符串.例子:<%strtest="this is a test!"response.write trim(strtest)%>结果:this is a test!17、asp函数大全之函数UCase()功能:将一字符类型变量的字符全部变换成大写字符.格式:Ucase(string)参数:string是字符串变量例子:<%str="THIS is Lcase!"response.write Lcase(str)%>结果:THIS IS LCASE!18、asp函数大全之函数Weekday()功能:返回一个整数,对应一周中的第几天.格式:Weekday(date[,firstofweek])参数:date为日期变量,firstofweek为任选项.例子:<%d=#5/9/00#response.write weekday(d)%>结果:3(3表示是星期二)19、asp函数大全之函数year()功能:返回日期表达式所在的年份.格式:year(date)参数:date是有效的日期表达式例子:<%=year(#8/9/99#)%>结果:199920、asp函数大全之函数Cint()函数Cint()功能:将一表达式/其它类型的变量转换成整数类型(int)格式:Cint(expression)参数:expression是任何有效的表达式/其它类型的变量例子:<%asp="234"response.write cINT(asp)+2%>结果:236函数Cint()将字符"234"转换成整数234.如果表达式为空,或者无效时,返回值为0;21、asp函数大全之函数Cstr()函数Cstr()功能:将一表达式/其它类型的变量转换成字符类型(string)格式:Cstr(expression)参数:expression是任何有效的表达式/其它类型的变量例子:<%asp=3+2response.write"Theresultis:"&cStr(asp)%>结果:函数Cstr()将整数5转换成字符"5".22、asp函数大全函数Dateadd()函数Dateadd()功能:计算某个指定的时间和格式:dateadd(timeinterval,number,date)参数:timeinterval是时间单位(月,日..);number是时间间隔值,date是时间始点.例子:<%currentDate=#8/8/2008#newDate=DateAdd("m",3,currentDate) response.write newDate%><%currentDate=#01:23:45PM#newDate=DateAdd("h",3,currentDate) response.write newDate其中"m"="month";"d"="day";如果是currentDate格式,则,"h"="hour";"s"="second";23、asp函数大全函数day()函数day()功能:返回一个整数值,对应于某月的某日格式:day(date)参数:date是一个有效的日期表达式;例子<%=date(#8/8/2010#)%>24、函数Formatdatetime()函数Formatdatetime()功能:格式化日期表达式/变量格式:formatdatetime(date[,nameformat])参数:date为有效的日期表达式/变量;nameformat是指定的日期格式常量名称.例子<%=formatdatetime("08/08/2008",vblongdate)%>--------------------------------------------------------------------------------描述返回表达式,此表达式已被格式化为日期或时间。
ASP常用函数表
Filter(sourcearray, match[, include[, compare]]) 搜寻字符串数组中的指定字符串,凡是数组元素中含有指定字符串,会将它们结合成新的字符串数组并传回。若是要传回不含指定字符串的数组元素,则include 参数设为False。compare 参数则是设定搜寻时是否区分大小写,此时只要给TextCompare 常数或1 即可。
Oct(number) 将数值参数转换为8 进制值。
Replace(expression, find, replace) 将字符串中find 参数指定的字符串转换为replace 参数指定的字符串。
Right(string,length) 由字符串右边开始取得length 参数设定长度的字符。
Str(number) 将数字转为字符串后传回。
StrReverse(expression) 取得字符串内容反转后的结果。
Tan(number) 取得某个角度的正切值。
TimeOfDay() 取得目前不包含日期的时间。
Timer() 取得由0:00 到目前时间的秒数,型态为Double。
Sin(number) 取得一个角度的正弦值。
Space(number) 取得number 参数设定的空白字符串。
Split(expression[, delimiter]) 以delimiter 参数设定的条件字符串来将字符串分割为字符串数组。
Sqrt(number) 取得一数值得平方根。
Weekday(date) 取的参数中的日期是一个星期的第几天,星期天为1、星期一为2、星期二为3 依此类推。
ASP常用的库函数大全
<%'判断文件名是否合法Function isFilename(aFilename)Dim sErrorStr,iNameLength,iisFilename=TRUEsErrorStr=Array("/","\",":","*","?","""","<",">","|") iNameLength=Len(aFilename)If iNameLength<1 Or iNameLength=null Then isFilename=FALSEElseFor i=0 To 8If instr(aFilename,sErrorStr(i)) ThenisFilename=FALSEEnd IfNextEnd IfEnd Function'去掉字符串头尾的连续的回车和空格function trimVBcrlf(str)trimVBcrlf=rtrimVBcrlf(ltrimVBcrlf(str))end function'去掉字符串开头的连续的回车和空格function ltrimVBcrlf(str)dim pos,isBlankCharpos=1isBlankChar=truewhile isBlankCharif mid(str,pos,1)=" " thenpos=pos+1elseif mid(str,pos,2)=VBcrlf thenpos=pos+2elseisBlankChar=falseend ifwendltrimVBcrlf=right(str,len(str)-pos+1)end function'去掉字符串末尾的连续的回车和空格function rtrimVBcrlf(str)dim pos,isBlankCharpos=len(str)isBlankChar=truewhile isBlankChar and pos>=2if mid(str,pos,1)=" " thenpos=pos-1elseif mid(str,pos-1,2)=VBcrlf thenpos=pos-2elseisBlankChar=falseend ifwendrtrimVBcrlf=rtrim(left(str,pos))end function'判断Email是否有效,返回1表示正确Function isEmail(aEmail)Dim iLocat,v,iLength,i,checkletterIf instr(aEmail,"@") = 0 Or instr(aEmail,".") = 0 ThenisEmail=0EXIT FUNCTIONEnd IfiLocat=instr(aEmail,"@")If instr(iLocat,aEmail,".")=0 Or instr(iLocat+1,aEmail,"@")>0 ThenisEmail=0EXIT FUNCTIONEnd IfIf left(aEmail,1)="." Or right(aEmail,1)="." Or left(aEmail,1)="@" Or right(aEmail,1)="@" Then isEmail=0EXIT FUNCTIONEnd Ifv="1234567890abcdefghijklmnopqrstuvwxyzABCDEFGHIJKLMNOPQRSTUVWXYZ_-.@" iLength=len(aEmail)For i=1 To iLengthcheckletter=mid(aEmail,i,1)If instr(v,checkletter)=0 ThenisEmail=0EXIT FUNCTIONEnd IfNextisEmail=1End Function'测试用:显示服务器信息Sub showServerDim nameResponse.write "<Table border=1 bordercolor=lightblue CELLSPACING=0>"for each name in request.servervariablesResponse.write "<tr>"Response.write "<td>"&name&"</td>"Response.write "<td>"&request.servervariables(name)&"<br></td>"Response.write "</tr>"nextResponse.write "</table>"End Sub'测试用:显示Rs结果集以及字段名称Sub showRs(rs)Dim strTable,whateverResponse.write "<center><table><tr>"for each whatever in rs.fieldsresponse.write "<td><b>" & & "</B></TD>"nextstrTable = "</tr><tr><td>"&rs.GetString(,,"</td><td>","</tr><tr><td>"," ") &"</td></tr></table></center>"Response.Write(strTable)End Sub'用HTML格式显示文本Function txt2Html(str)if isnull(str) thentxt2Html=""exit Functionend ifstr=Replace(str,chr(34),""")str=Replace(str,"<","<")str=Replace(str,">",">")str=Replace(str,chr(13)+chr(10),"<br>")str=Replace(str,chr(9)," ")str=Replace(str," "," ")txt2Html=strEnd Function'测试用:显示调试错误信息Sub showErrorDim sErrMsgsErrMsg=Err.Source&" "&Err.DescriptionResponse.write "<center>"&sErrMsg&"</center>"Err.clearEnd Sub'显示文字计数器Sub showCounterDim fs,outfile,filename,countfilename=server.mappath("count.txt")Set fs = CreateObject("Scripting.FileSystemObject")If fs.fileExists(filename) ThenSet outfile=fs.openTextFile(filename,1)count=outfile.readlinecount=count+1Response.write "<center>浏览人次:"&count&"<center>" outfile.closeSet outfile=fs.CreateTextFile(filename)outfile.writeline(count)ElseSet outfile=fs.openTextFile(filename,8,TRUE)count=0outfile.writeline(count)END IFoutfile.closeset fs=nothingEnd Sub%>Array()FUNCTION: 返回一个数组SYNTAX: Array(list)ARGUMENTS: 字符,数字均可EXAMPLE: <%Dim myArray()For i = 1 to 7Redim Preserve myArray(i)myArray(i) = WeekdayName(i)Next%>RESULT: 建立了一个包含7个元素的数组myArray myArray("Sunday","Monday", ... ... "Saturday")CInt()FUNCTION: 将一个表达式转化为数字类型SYNTAX: CInt(expression)ARGUMENTS: 任何有效的字符均可EXAMPLE: <%f = "234"response.write cINT(f) + 2%>RESULT: 236转化字符"234"为数字"234",如果字符串为空,则返回0值CreateObject()FUNCTION: 建立和返回一个已注册的ACTIVEX组件的实例。
asp常用函数集(ASPcommonfunctionsets)
asp 常用函数集(ASP common function sets)1.function array ()Function: create an array variableFormat: array (list)Argument: list is the column of each column in the array variable, with a comma interval in the middleExample:I = array (〃1〃,〃2〃,〃3〃)% >Results: I is assigned as an array2.function Cint ()Function: converts an expression / other type of variable into an integer type (int)Format: Cint (expression)Argument: expression is any valid expression / other type of variableExample:<F = 234Response, write cINT (f) + 2 % >Results: 236The function Cint () converts character 234 to integer 234. and returns 0 if the expression is null or invalid:3.function: Creatobject ()Function: creates and returns a ActiveX objectFormat: Creatobject (obname)The parameter bName is the name of the objectExample:<Set con = Server.CreateObject ("ADODB. Connection")% >Result:4.function Cstr ()a character type (string)Format: Cstr (expression)Argument: expression is any valid expression / other type of variable Example:<S = 3 + 2Response, write "The, result, is:" & cStr (s)% >Results: function Cstr () converts integer 5 to character "5”5.function Date ()Function: returns the date of the current system (server end) Format: Date ()Parameter: NoneExamples of date ()% >Results: 05/10/006.function Dateadd ()Function: calculates a specified time andFormat: DateAdd (timeinterval, number, date)Argument: timeinterval is the time unit (month, day, day). Number is the time interval value, and date is the time start pointExample:<CurrentDate = #8/4/99#NewDate = DateAdd ("m”, 3, currentDate)Response, write newDate% > <CurrentDate = #12:34:45 PM#NewDate = DateAdd ("H”, 3, currentDate)Response, write newDate% >Result:11/4/993:34:45 PMamong〃M〃 = "month"”;"D" = "day"”;If it is in currentDate format, then,〃TT〃〃1〃〃H = hour ;S = second ;7.function Datediff ()Function: calculates a specified amount of time differenceFormat: DateDiff (timeinterval, datel, date2[, firstdayofweek[, firstdayofyear>)Argument: timeinterval is a time unit: datel and date2 are valid date expressions: firstdayofweek and firstdayofyear are optionalExample:FromDate = #8/4/99#ToDate = #1/1/2000#Response, write "There are" & _DateDiff (D, fromDate, toDate & _)"Days, to, millenium, from, 8/4/99..% >Results: There, are, , days, to, millenium, from, 8/4/99.8.function day ()Function: returns an integer value corresponding to a certain month of the day Format: Day (date)Argument: date is a valid date expression;For example < = date (#8/4/99#)% >Results: 49.function formatcurrency ()Function: convert to currency format Format: formatcurrency (expression [, digit [, leadingdigit [, parent, groupdigit>>)Argument: expression is a valid numeric expression: digit stands for the digitsafter the decimal point: leadingdigit, paren, and groupdigit are optionalFor example < = FormatCurrency (34. 3456)% >Result 34. 3510.function Formatdatetime ()Function: formatting date expressions / variablesFormat: formatdatetime (date[, nameformat])Argument: date is a valid date expression / variable: nameformat is the specified date format constant nameFor example < = formatdatetime (08/04/99, vblongdate)% >Results: Wednesday, August 04,One thousand nine hundred and ninety-nineExplain:describeReturns an expression that has been formatted as date or time.grammarFormatDateTime (Date[, NamedFormat])The syntax of the FormatDateTime function has the following parameters:Parameter descriptionDate optional. A date expression to be formatted.NamedFormat optional. Indicates the value of the date / time format used, and if omitted, use vbGeneralDate.Set upThe NamedFormat parameter can have the following values:Constant value descriptionVbGeneralDate 0 displays date and / or time. If there is a part of the date, the part is displayed as a short date format. If there is a part of the time, the part is shown as a long format. If all of them exist, all parts are displayed.VbLongDate 1 displays the date in the long date format specified in the computer locale.VbShortDate 2 displays the date in a short date format specified in the computer locale.VbLongTime 3 displays the time in the time format specified in the computer locale.VbShortTime 4 displays the time in 24 hour format (hh:mm).ExplainThe following example uses the FormatDateTime function to format anexpression into a long date type and assigns it to MyDateTime:Function GetCurrentDate"FormatDateTime formats the date type as long date type. GetCurrentDate = FormatDateTime (Date, 1)End Function11.function Isnumeric ()Function: returns a Boolean value, determines whether a variable is a numeric variable, or any other variable that canbe converted into numbersFormat: IsNumeric (expression)Argument: expression is an arbitrary variableExample:<I = 234”Response, write IsNumeric (I)% >Results: true.12.function Isobject ()Function: returns a Boolean value to determine whether a variable is an object variable,Format: isobject (expression)Argument: expression is an arbitrary variableExample:Set con = server.creatobject ("adodb. connection")Response, write isobject (CON)% >Results: true13.function: Lbound ()Function: returns the lower bound of an arrayFormat: Lbound (arrayname[, dimension])Argument: arrayname is an array variable, and dimension is any entry Example:<I = array (〃1〃,〃2〃,〃3〃)Response, write lbound (I)% >Results: 014.function Lease ()Function: transforms all characters of a character type variable into lower case charactersFormat: Lease (string)Argument: string is a string variableExample:<STR = "THIS, is, Lease”!”Response, write Lease (STR)% >Results: this, is, lease!15.function left ()Function: to intercept the front part of a string;Format: left (string, length)Argument: string string, the length of length interception Example: < = left ("this is a test!”, 6)% >Results: this I16.function len ()Function: returns the length of a string or the length of a variableFormat: len (string, *varname)Argument: string string: Varname any variable name Example:<Strtest = "this, is, a, test”!”Response, write left (strtest)% >Results: 1517.function Itrim ()Function: removes the space before the string Format: Itrim (string)Argument: string stringExample: < = Itrim ("this is a test!”)Results: this, is, a, test!18.function Mid ()Function: intercepts strings from stringsFormat: Mid (string, start, [length]])Parameter: string string, the starting point of start interception, and the length of length to interceptExample:<Strtest = "this, is, a, test”,今天是星期一。
ASP 函数大全及使用技巧
附录一、ASP 函数大全1.函数array()功能:创建一个数组变量格式:array(list)参数:list为数组变量中的每个数值列,中间用逗号间隔例子:<%i=array("1","2","3")%>结果:i被赋予为数组2.函数Cint()功能:将一表达式/其它类型的变量转换成整数类型(int)格式:Cint(expression)参数:expression是任何有效的表达式/其它类型的变量例子:<%f="234"Response.write Cint (f)+2%>结果:236函数Cint()将字符"234"转换成整数234.如果表达式为空,或者无效时,返回值为0;3.函数:Createobject()功能:创建及返回一个ActiveX对象.格式:Createobject(obname)参数bname是对象的名称例子:<%Setcon=Server.CreateObject("ADODB.Connection")%>4.函数Cstr()功能:将一表达式/其它类型的变量转换成字符类型(string)格式:Cstr(expression)参数:expression是任何有效的表达式/其它类型的变量例子:<%s=3+2Response.write"Theresultis:"&cStr(s)%>结果:函数Cstr()将整数5转换成字符"5".5.函数Date()功能:返回当前系统(Server端)的日期格式:Date()参数:无例子<%date()%>结果:05/10/006.函数Dateadd()功能:计算某个指定的时间和格式:dateadd(timeinterval,number,date)参数:timeinterval是时间单位(月,日..);number是时间间隔值,date是时间始点.例子:<%currentDate=#8/4/99#newDate=DateAdd("m",3,currentDate)Response.write newDate%><%currentDate=#12:34:45PM#newDate=DateAdd("h",3,currentDate)Response.write newDate%>结果:11/4/993:34:45PM其中"m"="month";"d"="day";如果是Current Date格式,则,"h"="hour";"s"="second";7.函数Datediff()功能:计算某量个指定的时间差格式:datediff(timeinterval,date1,date2[,firstdayofweek[,firstdayofyear]])参数:timeinterval是时间单位;date1,date2是有效的日期表达式,firstdayofweek,firstdayofyear是任意选项.例子:<%fromDate=#12/25/2004#toDate=#7/26/2005#Response.write "从12/25/2004 到7/26/2005 共有"&_DateDiff("d",fromDate,toDate)&_" 天" %>结果: 从12/25/2004 到7/26/2005 共有213 天8.函数day()功能:返回一个整数值,对应于某月的某日格式:day(date)参数:date是一个有效的日期表达式;例子<%=date(#8/4/99#)%>结果:49.函数formatcurrency()功能:转换成货币格式格式:formatcurrency(expression[,digit[,leadingdigit[,paren[,groupdigit]]]])参数:expression是有效的数字表达式;digit表示小数点后的位数;leadingdigit,paren,groupdigit 是任意选项.例子<%=FormatCurrency(34.3456)%>结果34.3510.函数Formatdatetime()功能:格式化日期表达式/变量格式: FormatDateTime (date[,nameformat])参数:date为有效的日期表达式/变量;nameformat是指定的日期格式常量名称.例子<%= FormatDateTime ("12/23/65",vblongdate)%>结果: 1965年12月23日此表达式已被格式化为日期或时间。
ASP常用函数集范文
功能:创建一个数组变量格式:array(list)参数:list为数组变量中的每个数值列,中间用逗号间隔例子:<%i=array(“1”,”2”,”3”)%>结果:i被赋予为数组2.函数Cint()功能:将一表达式/其它类型的变量转换成整数类型(int)格式:Cint(expression)参数:expression是任何有效的表达式/其它类型的变量例子:<%f=”234”response.write cINT(f)+2%>结果:236函数Cint()将字符”234”转换成整数234.如果表达式为空,或者无效时,返回值为0;3.函数:Creatobject()功能:创建及返回一个ActiveX对象.格式:Creatobject(obname)参数bname是对象的名称例子:<%Set con=Server.CreateObject(“ADODB.Connection”)%>结果:功能:将一表达式/其它类型的变量转换成字符类型(string)格式:Cstr(expression)参数:expression是任何有效的表达式/其它类型的变量例子:<%s=3+2response.write”The result is:”&cStr(s)%>结果:函数Cstr()将整数5转换成字符”5”.5.函数Date()功能:返回当前系统(server端)的日期格式:Date()参数:无例子<%date()%>结果:05/10/006.函数Dateadd()功能:计算某个指定的时间和格式:dateadd(timeinterval,number,date)参数:timeinterval是时间单位(月,日..);number是时间间隔值,date是时间始点.例子:<%currentDate=#8/4/99#newDate=DateAdd(“m”,3,currentDate)response.write newDate%><%currentDate=#12:34:45PM#newDate=DateAdd(“h”,3,currentDate)response.write newDate%>结果:11/4/993:34:45PM其中“m”=”month”;“d”=”day”;如果是currentDate格式,则,“h”=”hour”;“s”=”second”;7.函数Datediff()功能:计算某量个指定的时间差格式:datediff(timeinterval,date1,date2[,firstdayofweek[,firstdayofyear]])参数:timeinterval是时间单位;date1,date2是有效的日期表达式,firstdayofweek,firstdayofyear是任意选项.例子:<%fromDate=#8/4/99#toDate=#1/1/2000#response.write”There are”&_DateDiff(“d”,fromDate,toDate)&_“days to millenium from8/4/99.”%>结果:There are150days to millenium from8/4/99.8.函数day()功能:返回一个整数值,对应于某月的某日格式:day(date)参数:date是一个有效的日期表达式;例子<%=date(#8/4/99#)%>结果:49.函数formatcurrency()功能:转换成货币格式格式:formatcurrency(expression[,digit[,leadingdigit[,paren[,groupdigit]]]])参数:expression是有效的数字表达式;digit表示小数点后的位数;leadingdigit,paren,groupdigit是任意选项.例子<%=FormatCurrency(34.3456)%>结果34.3510.函数Formatdatetime()功能:格式化日期表达式/变量格式:formatdatetime(date[,nameformat])参数:date为有效的日期表达式/变量;nameformat是指定的日期格式常量名称.例子<%=formatdatetime(“08/04/99”,vblongdate)%>结果:Wednesday,August04,1999说明:描述返回表达式,此表达式已被格式化为日期或时间。
好!asp常用函数大全
Request.form("PassStrName"):读取Post方法传递的纯表单域的值
Request.Form(Parameter)[(Index).Count]
Request.ServerVaribles(Server Environment Variable):读取客户端系统环境变量,详见参考
mid(str,起始字符,[读取长度]):截取字符串中间子字符串
left(str,nlen):从左边起截取nlen长度子字符串
right(str,nlen):从右边起截取nlen长度子字符串
Lcase(str):字符串转成小写
Ucase(str):字符串转成大写
trim(str):去除字符串两端空格
注:Session与Application变量都可以用来存储数组和系统对象,引用方法是变量名相当于数组名而已,但不能直接改变其值,需要借助临时
数组修改值后,再赋给Session与Application变量
Server:
Server.MapPath("FileUrl"):映射文件名的服务器站点绝对地址,Path=Server.MapPath(./)可以得到虚拟目录根路径
Response.write StrVar/"String":向网页写出参数值或字符串等同于在Html标记中嵌入
Response.End:停止页面编译,并将已经编译内容输出到浏览器
Response.Buffer=True|False:页面编译时是否使用缓存的设置,一般在页面头部设置
Response.Flush:强制输出页面已编译部分内容
ASP.NET中常用的函数
网络编程中常用到的27个函数集Abs(number)取得数值的绝对值。
Asc(String)取得字符串表达式的第一个字符ASCII 码。
Atn(number)取得一个角度的反正切值。
CallByName (object, procname, usecalltype,[args()])执行一个对象的方法、设定或传回对象的属性。
CBool(expression)转换表达式为Boolean 型态。
CByte(expression)转换表达式为Byte 型态。
CChar(expression)转换表达式为字符型态。
CDate(expression)转换表达式为Date 型态。
CDbl(expression)转换表达式为Double 型态。
CDec(expression)转换表达式为Decimal 型态。
CInt(expression)转换表达式为Integer 型态。
CLng(expression)转换表达式为Long 型态。
CObj(expression)转换表达式为Object 型态。
CShort(expression)转换表达式为Short 型态。
CSng(expression)转换表达式为Single 型态。
CStr(expression)转换表达式为String 型态。
Choose (index, choice-1[, choice-2, ... [, choice-n]])以索引值来选择并传回所设定的参数。
Chr(charcode)以ASCII 码来取得字符内容。
Close(filenumberlist)结束使用Open 开启的档案。
Cos(number)取得一个角度的余弦值。
Ctype(expression, typename)转换表达式的型态。
DateAdd(dateinterval, number, datetime)对日期或时间作加减。
DateDiff(dateinterval, date1, date2)计算两个日期或时间间的差值。
ASP实用函数库
ASP实用函数库<%'判断文件名是否合法Function isFilename(aFilename)Dim sErrorStr,iNameLength,iisFilename=TRUEsErrorStr=Array("/","\",":","*","?","""","<",">","|") iNameLength=Len(aFilename)If iNameLength<1 Or iNameLength=null Then isFilename=FALSEElseFor i=0 To 8If instr(aFilename,sErrorStr(i)) ThenisFilename=FALSEEnd IfNextEnd IfEnd Function'去掉字符串头尾的连续的回车和空格function trimVBcrlf(str)trimVBcrlf=rtrimVBcrlf(ltrimVBcrlf(str))end function'去掉字符串开头的连续的回车和空格function ltrimVBcrlf(str)dim pos,isBlankCharpos=1isBlankChar=truewhile isBlankCharif mid(str,pos,1)=" " thenpos=pos+1elseif mid(str,pos,2)=VBcrlf thenpos=pos+2elseisBlankChar=falseend ifwendltrimVBcrlf=right(str,len(str)-pos+1)end function'去掉字符串末尾的连续的回车和空格function rtrimVBcrlf(str)dim pos,isBlankCharpos=len(str)isBlankChar=truewhile isBlankChar and pos>=2if mid(str,pos,1)=" " thenpos=pos-1elseif mid(str,pos-1,2)=VBcrlf thenpos=pos-2elseisBlankChar=falseend ifwendrtrimVBcrlf=rtrim(left(str,pos))end function'判断Email是否有效,返回1表示正确Function isEmail(aEmail)Dim iLocat,v,iLength,i,checkletterIf instr(aEmail,"@") = 0 Or instr(aEmail,".") = 0 ThenisEmail=0EXIT FUNCTIONEnd IfiLocat=instr(aEmail,"@")If instr(iLocat,aEmail,".")=0 Or instr(iLocat+1,aEmail,"@")>0 ThenisEmail=0EXIT FUNCTIONEnd IfIf left(aEmail,1)="." Or right(aEmail,1)="." Or left(aEmail,1)="@" Or right(aEmail,1)="@" Then isEmail=0EXIT FUNCTIONEnd Ifv="1234567890abcdefghijklmnopqrstuvwxyzABCDEFGHIJKLMNOPQRSTUVWXYZ_-.@" iLength=len(aEmail)For i=1 To iLengthcheckletter=mid(aEmail,i,1)If instr(v,checkletter)=0 ThenisEmail=0EXIT FUNCTIONEnd IfNextisEmail=1End Function'测试用:显示服务器信息Sub showServerResponse.write "<Table border=1 bordercolor=lightblue CELLSPACING=0>"for each name in request.servervariablesResponse.write "<tr>"Response.write "<td>"&name&"</td>"Response.write "<td>"&request.servervariables(name)&"<br></td>"Response.write "</tr>"nextResponse.write "</table>"End Sub'测试用:显示Rs结果集以及字段名称Sub showRs(rs)Dim strTable,whateverResponse.write "<center><table><tr>"for each whatever in rs.fieldsresponse.write "<td><b>" & & "</B></TD>"nextstrTable = "</tr><tr><td>"&rs.GetString(,,"</td><td>","</tr><tr><td>"," ") &"</td></tr></table></center>"Response.Write(strTable)End Sub'用HTML格式显示文本function HTMLEncode(fString)if not isnull(fString) thenfString = replace(fString, ">", ">")fString = replace(fString, "<", "<")fString = Replace(fString, CHR(32), " ")fString = Replace(fString, CHR(34), """)fString = Replace(fString, CHR(39), "'")fString = Replace(fString, CHR(13), "")fString = Replace(fString, CHR(10) & CHR(10), "</P><P> ")fString = Replace(fString, CHR(10), "<BR> ")HTMLEncode = fStringend ifend function'测试用:显示调试错误信息Sub showErrorDim sErrMsgsErrMsg=Err.Source&" "&Err.DescriptionResponse.write "<center>"&sErrMsg&"</center>"End Sub'显示文字计数器Sub showCounterDim fs,outfile,filename,countfilename=server.mappath("count.txt")Set fs = CreateObject("Scripting.FileSystemObject")If fs.fileExists(filename) ThenSet outfile=fs.openTextFile(filename,1)count=outfile.readlinecount=count+1Response.write "<center>浏览人次:"&count&"<center>" outfile.closeSet outfile=fs.CreateTextFile(filename)outfile.writeline(count)ElseSet outfile=fs.openTextFile(filename,8,TRUE)count=0outfile.writeline(count)END IFoutfile.closeset fs=nothingEnd Sub%>Array()FUNCTION: 返回一个数组SYNTAX: Array(list)ARGUMENTS: 字符,数字均可EXAMPLE: <%Dim myArray()For i = 1 to 7Redim Preserve myArray(i)myArray(i) = WeekdayName(i)Next%>RESULT: 建立了一个包含7个元素的数组myArraymyArray("Sunday","Monday", ... ... "Saturday")CInt()FUNCTION: 将一个表达式转化为数字类型SYNTAX: CInt(expression)ARGUMENTS: 任何有效的字符均可EXAMPLE: <%response.write cINT(f) + 2%>RESULT: 236转化字符"234"为数字"234",如果字符串为空,则返回0值CreateObject()FUNCTION: 建立和返回一个已注册的ACTIVEX组件的实例。
- 1、下载文档前请自行甄别文档内容的完整性,平台不提供额外的编辑、内容补充、找答案等附加服务。
- 2、"仅部分预览"的文档,不可在线预览部分如存在完整性等问题,可反馈申请退款(可完整预览的文档不适用该条件!)。
- 3、如文档侵犯您的权益,请联系客服反馈,我们会尽快为您处理(人工客服工作时间:9:00-18:30)。
FUNCTION: 返回字符串右边第length个字符以前的字符(含第length个字符). SYNTAX: Right(string, length) ARGUMENTS: . EXAMPLE: $#@60;% strTest = "This is an test!" response.write Right(strTest, 3) %> RESULT: st!
Time()
FUNCTION: 返回系统时间. SYNTAX: Time() ARGUMENTS: . EXAMPLE: $#@60;%=Time%> RESULT: 9:58:28 AM
Trim()
FUNCTION: 去掉字符串左右的空格. SYNTAX: Trim(string) ARGUMENTS: string is any valid string expression. EXAMPLE: $#@60;% strTest = " This is a test!! " response.write Trim(strTest) %> RESULT: This is a test!!
Rnd()
FUNCTION: 产生一个随机数. SYNTAX: Rnd [ (number) ] ARGUMENTS: EXAMPLE: $#@60;% Randomize() response.write RND() %>
RESULT: 任何一个在0 到 1 之间的数
LCase()
FUNCTION: 返回字符串的小写形式 SYNTAX: Lcase(string) ARGUMENTS: string is any valid string expression. EXAMPLE: $#@60;% strTest = "This is a test!" response.write LCase(strTest) %> RESULT: this is a test!
FUNCTION: Returns a string in which a specified sub-string has been replaced with another substring a specified number of times. SYNTAX: Replace(strToBeSearched, strSearchFor, strReplaceWith [, start [, count [, compare]]]) ARGUMENTS: strToBeSearched is a string expression containing a sub-string to be replaced; strSearchFor is the string expression to search for within strToBeSearched; strReplaceWith is the string expression to replace sub-string strSearchFor; start (optional) is the numeric character position to begin search; count (optional) is a value indicating the comparision constant. EXAMPLE: $#@60;% strTest = "This is an apple!" response.write Replace(strTest, "apple", "orange") %> RESULT: This is an orange!
Now()
FUNCTION: Returns the current system date and time. SYNTAX: Now() ARGUMENTS: None EXAMPLE: $#@60;%=Now%> RESULT: 8/4/99 9:30:16 AM
Replace()
LTrim()
FUNCTION: 去掉字符串左边的空格. SYNTAX: LTrim(string) ARGUMENTS: EXAMPLE: $#@60;% strTest = " This is a test!" response.write LTrim(strTest) %> RESULT: This is aCTION: 返回秒. SYNTAX: Second(time) ARGUMENTS: . EXAMPLE: $#@60;%=Second(#12:34:28 PM#)%> RESULT: 28
StrReverse()
FUNCTION: 反排一字符串 SYNTAX: StrReverse(string) ARGUMENTS: EXAMPLE: $#@60;% strTest = "This is a test!!" response.write StrReverse(strTest) %> RESULT: !!tset a si sihT
Minute()
FUNCTION: 返回时间的分钏. SYNTAX: Minute(time) ARGUMENTS: EXAMPLE: $#@60;%=Minute(#12:45:32 PM#)%> RESULT: 45
Month()
FUNCTION: 返回日期. SYNTAX: Month(date) ARGUMENTS: date is any valid date expression. EXAMPLE: $#@60;%=Month(#08/04/99#)%> RESULT: 8
MonthName()
FUNCTION: Returns a string identifying the specified month. SYNTAX: MonthName(month, [, Abb]) ARGUMENTS: month is the numeric representation for a given month; Abb (optional) is a boolean value used to display month abbreviation. True will display the abbreviated month name and False (default) will not show the abbreviation. EXAMPLE: $#@60;%=MonthName(Month(#08/04/99#))%> RESULT: August
IsNumeric()
FUNCTION: 判断一对象是否为数字,返回布尔值. SYNTAX: IsNumeric(expression) ARGUMENTS: EXAMPLE: $#@60;% i = "345" response.write IsNumeric(i) %> RESULT: True 就算数字加了引号,ASP还是认为它是数字。
Len()
FUNCTION: 返回字符串的长度. SYNTAX: Len(string | varName) ARGUMENTS: EXAMPLE: $#@60;% strTest = "This is a test!" response.write Len(strTest) %> RESULT: 15
Round()
FUNCTION: 返回按指定位数进行四舍五入的数值. SYNTAX: Round(expression [, numRight]) ARGUMENTS: numRight数字表明小数点右边有多少位进行四舍五入。如果省略,则 Round 函数返回整数. EXAMPLE: $#@60;%i = 32.45678response.write Round(i)%> RESULT: 32
ASP函数
IsNull()
FUNCTION: 判断一对象是否为空,返回布尔值. SYNTAX: IsNull(expression) ARGUMENTS: EXAMPLE: $#@60;% Dim i response.write IsNull(i) %> RESULT: False
Mid()
FUNCTION: 返回特定长度的字符串(从start开始,长度为length). SYNTAX: Mid(string, start [, length]) ARGUMENTS: EXAMPLE: $#@60;% strTest = "This is a test! Today is Monday." response.write Mid(strTest, 17, 5) %> RESULT: Today
Rtrim()
FUNCTION: 去掉字符串右边的字符串. SYNTAX: Rtrim(string) ARGUMENTS: EXAMPLE: $#@60;% strTest = "This is a test!! " response.write RTrim(strTest) %> RESULT: This is a test!!
LBound()
FUNCTION: 返回指定数组维的最小可用下标. SYNTAX: Lbound(arrayname [, dimension]) ARGUMENTS: ; dimension 指明要返回哪一维下界的整数。使用 1 表示第一维,2 表示第二维,以此类推。如果省略 dimension 参数,默认值为 1. EXAMPLE: $#@60;% i = Array("Monday","Tuesday","Wednesday") response.write LBound(i) %> RESULT: 0