ASP
chlung
这个作者很懒,什么都没留下…
展开
-
asp 判断字符串是否在数组中
function inArray(str,arr) inArray=false if not isnull(arr) and isarray(arr) then for ii=0 to ubound(arr) if ucase(trim(arr(ii)))=ucase(trim(str)) then inAr...翻译 2020-04-08 15:48:42 · 1201 阅读 · 0 评论 -
asp base64 解码
Function Base64Decode(ByVal base64String) 'rfc1521 '1999 Antonin Foller, Motobit Software, http://Motobit.cz Const Base64 = "ABCDEFGHIJKLMNOPQRSTUVWXYZabcdefghijklmnopqrstuvwxyz0123456789+/" ...转载 2020-04-07 15:03:50 · 585 阅读 · 0 评论 -
asp 生成guid
dim objTypeLib set objTypeLib = CreateObject("Scriptlet.TypeLib")'获取guid值guid = cstr(mid(objTypeLib.Guid, 2 ,len(objTypeLib.Guid)-4))原创 2018-07-17 14:45:23 · 896 阅读 · 0 评论 -
ASP中文URL解码URLDecode函数实现
大家都知道,在asp中,我们一般都通过 Server.UrlEncode 进行url的编码,这样使得一些特殊的字符能够通过链接正常访问,但当我们把这个编码后的url字符存入数据库后,有些时候需要程序读取这个url进行处理时,就需要对其进行url解码,在php中这些功能很完善,但asp中,我们是找不到Server.UrlDecode函数的,鉴于这个问题,我们就要自己写一个解码函数了,以下是一段支持中...转载 2018-09-18 14:04:17 · 5006 阅读 · 0 评论 -
ASP VBScript 实现string.format 字符串格式化
'字符串格式化Format'str 被格式化的字符串'strArry 占位符数组,数组索引必须与占位符数字一致function FormatString(str,strArry) dim tempStr,index tempStr=str index=0 for each val in strArry dim placeholder placeholder="{"+Cstr...原创 2019-04-10 16:16:24 · 1526 阅读 · 0 评论 -
ASP VBScript 获取数组长度
由于需要在vb程序中获取数组的实际长度,在网上和w3c查了下都找不到获取数组长度的合适方法。所以自己就写了一个获取数组实际的长度的方法。实现原理很简单。就是循环判断数组的值,如果数组该项的值不为空"",那么长度就增加1。function ArrayLength(arry) dim len len=0 for each val in arry if val<>"" th...原创 2019-04-22 17:08:58 · 972 阅读 · 0 评论