ASP常用函数
若水印象
不积硅步无以至千里_QQ_407593529
展开
-
Get_hydlzt()栏目是否只有会员查看权限,如是检查会员是否登录
' ============================================' Get_hydlzt()栏目是否只有会员查看权限,如是检查会员是否登录' ============================================Function Get_hydlzt() dim Resultzt Resultzt=False '登陆检测 I原创 2012-02-24 15:44:58 · 672 阅读 · 0 评论 -
ASP获取字符串长度的自定义函数
ASP获取字符串长度的自定义函数'----------------------------------------------------------------'' getStrLen' 获取字符长度,一个中文字符长度算 2' 参数:' str 需要获取长度的字符串' 返回值:整数 (字符串的长度)'--------------------------------原创 2012-02-25 13:08:48 · 2990 阅读 · 0 评论 -
asp去除html代码的方法
关于去除asp中html的方法有很多,现在我在这里说几种简单的,希望对大家有用。1.'=============================='功能描述: 用正则除去HTML标记'==============================Function RemoveHTMLTag(str)Set re = New RegExpre.Pattern = "]*>"原创 2012-02-25 13:21:07 · 1393 阅读 · 0 评论 -
getpy() 汉字转为拼音
'取字段数据每个汉字的拼音首字母Function getpychar(char) tmp = 65536 + Asc(char) If(tmp>= 45217 And tmp getpychar = "A" ElseIf(tmp>= 45253 And tmp getpychar = "B" ElseIf(tmp>=原创 2012-02-25 13:20:22 · 20401 阅读 · 1 评论 -
一些常用的ASP自定义函数全集
<%'========================================================'函数导航'FormatDate(DT,tp) ------------------------------------------日期格式化'IsInteger(para) ---------------------------检测传递的参数是否为数字型转载 2012-02-25 13:28:28 · 1346 阅读 · 0 评论 -
asp实现文章摘要功能
通过去除HTML标签的方式来选取前一部分,这个代码不是很完善后期我会拿出完善的代码出来。'去除html标记的函数Function RemoveHTML(strHTML) Dim objRegExp, Match, Matches Set objRegExp = New Regexp objRegExp.IgnoreCase = True objRegExp.Glob原创 2012-02-25 13:07:02 · 830 阅读 · 0 评论 -
gotTopic()截字符串函数
'*************************************************'函数名:gotTopic'作 用:截字符串,汉字一个算两个字符,英文算一个字符'参 数:str ----原字符串' strlen ----截取长度'返回值:截取后的字符串'*****************************************原创 2012-02-24 15:49:37 · 1188 阅读 · 0 评论 -
GetTimeNumber()当前时间生成的整数
' ============================================' GetTimeNumber()当前时间生成的整数' ============================================Function GetTimeNumber() 'GetTimeNumber=Year(Date)*31104000+Month(Date)*2原创 2012-02-24 15:48:36 · 1084 阅读 · 0 评论 -
过滤非法字符函数
' ============================================' 过滤非法字符函数' ============================================function killstr(str) dim tempstr if str="" then exit function tempstr=replace(str,ch原创 2012-02-24 15:47:40 · 1533 阅读 · 0 评论 -
Go_Error(str) 错误返回处理
' ============================================' 错误返回处理' ============================================Sub Go_Error(str) Call CloseConn() Response.Write "alert('" & str & "\n\n"& p_xtjzd &"');原创 2012-02-24 15:46:52 · 639 阅读 · 0 评论 -
AspCms统计产品数量或新闻数量的解决办法
统计产品数量或新闻数量的解决办法例如子页面导航为产品总分类(18)产品分类一(10)产品分类二(3)产品分类三(5)数字代表该栏目下有多少产品。以下内容是模拟显示产品数量的解决办法。此文仅提供解决思路,如果使用以下代码有问题,还需自行修改。打开inc/AspCms_MainClass.asp在479行左右找到for each matchfie转载 2014-05-15 18:05:21 · 2050 阅读 · 0 评论