【下载文档:  asp三层架构_Convert类实现代码.txt 】

---

ASP 三层架构 Convert类实现代码
这个类主要解决在类型转换时,如果直接使用类型转换函数,会因为变量为空或者格式不对而导致程序报错,而这种报错在大多数情况下是允许的.例如要转换一个字符串变量为数字,如果变量为空,则一般需要自动返回0. 另外一个重要功能就是封装变量格式化操作,可以保持整个网站的输出格式统一,例如时间格式,货币格式等等. 日期和货币格式化的时候,极易遇到因空值报错的情况,一般都不得不写个预判断空值的逻辑,再格式化变量. 使用这个类负责类型转换和格式化输出后,就不用操心这些琐碎的细节了,可以让编程的心情得到大大改善啊. 还有些其他格式化功能,也加了进去,例如Convert.ToPer()是用来转换数字成百分数,Convert.FirstUppercase()用来做首字母大写...... 你可以根据自己的需要,随时扩展这个类,不要忘记了和大家分享哦. 有些基本的函数,如果随便写一写,基本可以凑合着用,但是遇到特殊情况,就要重新改写.比如我写的Convert.ToInt()方法,将变量转换为Integer. 最基本的操作,是判断一下是否为空,不为空就直接用Cint()就可以了. 但是遇到变量超出了范围,又得判断是否在Integer范围内,所以又写了一个私有方法IsOverflowInteger(),用于判断变量值是否为某一个范围内的数字.经过这样的处理,相信基本可以处理所有的情况了. 所以我想,Convert类中的已有方法还是会有不少需要改善的,大家如果有更好更完善的函数请发上来分享,让它形成ASP中最标准的变量处理的类,再不用依赖ASP中那些有限的功能了. 如下列举一些比较主要的方法,具体细节请看代码. 类型判断: Convert.IsInteger(ByVal Value) 判断是否整数,只允许0~9和-号 Convert.IsInt(ByVal Value) 判断是否int型,其下类似,不用解释了. Convert.IsLng(ByVal Value) Convert.IsDecimal(ByVal Value) Convert.IsSng(ByVal Value) Convert.IsDbl(ByVal Value) Convert.IsCur(ByVal Value) Convert.IsBln(ByVal Value) Convert.IsDat(ByVal Value) Convert.IsArr(ByVal Value) 类型转换: Convert.ToStr(ByVal Value) Convert.ToInt(ByVal Value) Convert.ToLng(ByVal Value) Convert.ToSng(ByVal Value) Convert.ToDbl(ByVal Value) Convert.ToBln(ByVal Value) Convert.ToCur(ByVal Value) Convert.ToDat(ByVal Value) 格式化: Convert.FormatDat(ByVal Value, ByVal vStyle) 日期格式化 Convert.FormatCur(ByVal Value,ByVal vDecimal) 货币格式化 Convert.FormatNum(ByVal Value,ByVal vDecimal) 数字格式化 其他格式化: Convert.ToPer(Byval value,Byval value0) 百分数,带% Convert.FirstUppercase(ByVal value) 首字母大写 Convert.SafeSql(ByVal value) 替换sql中的'为'' 代码如下: (我不会插入代码,不知道CSDN是怎么操作的,点插入代码就是一个,而不是可以折叠代码的风格,向了解的朋友请教.) 复制代码 代码如下: Class Con_Convert ' ******global message private i,j,value0,value1,value2 Private Sub Class_Initialize End Sub Private Sub Class_Terminate End Sub ' ============================================================================== ' Check Type, Return ture/false ' ============================================================================== Public Function IsStr(ByVal Value) IsStr=true End Function ' ****** check string if is Integer Public Function IsInteger(ByVal Value) if Trim(Value)="" or IsNull(Value) or IsEmpty(Value) then IsInteger=false else IsInteger = True value0=Trim(Value) For i = 1 To len(value0) If Asc(Mid(value0, i, 1))>= Asc("0") and Asc(Mid(value0, i, 1)) <= Asc("9") Then Else if Asc(Mid(value0, i, 1))= Asc("-") and i=1 then else IsInteger = false Exit For end if End If Next end if End Function ' ****** check if Value is in range of integer ' Only use in this class ' Value : ' vBound : max Private Function IsOverflowInteger(ByVal Value,ByVal vBound) if IsInteger(Value) and IsInteger(vBound) then IsOverflowInteger=false value0=trim(value) value1=trim(vBound) if IsOverflowInteger=false then 'delete 0 from left do while ( left(value0,1)="0" or left(value0,1)="-" ) value0=right(value0,len(value0)-1) loop do while ( left(value1,1)="0" or left(value1,1)="-" ) value1=right(value1,len(value1)-1) loop if len(value0)=len(value1) then for i=1 to len(value0) if Asc(mid(value0,i,1)) > Asc(mid(value1,i,1)) or Asc(mid(value0,i,1)) > Asc("9") or Asc(mid(value0,i,1)) < Asc("0") then IsOverflowInteger=true exit for end if next else if len(value0)>len(value1) then IsOverflowInteger=true end if end if end if else IsOverflowInteger=true end if End Function Public Function IsInt(ByVal Value) IsInt=true if left(trim(value),1)="-" then if IsOverflowInteger(trim(value),"-32768") then IsInt=false end if else if IsOverflowInteger(trim(value),"32767") then IsInt=false end if end if end function Public Function IsLng(ByVal Value) IsLng=true if left(trim(value),1)="-" then if IsOverflowInteger(trim(value),"-2147483648") then IsLng=false end if else if IsOverflowInteger(trim(value),"2147483647") then IsLng=false end if end if End Function ' ************************************** ' Decimal ' ************************************** ' ****** check string if is Decimal Private Function IsDecimal(ByVal Value) dim intDecimalCount intDecimalCount=0 if Trim(Value)="" or IsNull(Value) or IsEmpty(Value) then IsDecimal=false else IsDecimal = True value0=Trim(Value) For i = 1 To len(value0) If Asc(Mid(value0, i, 1))>= Asc("0") and Asc(Mid(value0, i, 1)) <= Asc("9") Then Else select case Asc(Mid(value0, i, 1)) case Asc("-") if i=1 then else IsDecimal = false Exit For end if case Asc(".") if intDecimalCount<2 then intDecimalCount=intDecimalCount + 1 else IsDecimal = false Exit For end if case else IsDecimal = false Exit For end select End If Next end if End Function ' ****** check if Value is in range of Decimal ' Only use in this class ' Value : ' vBound : Private Function IsOverflowDecimal(ByVal Value,ByVal vBound) if Trim(Value)="" or IsNull(Value) or IsEmpty(Value) or Trim(vBound)="" or IsNull(vBound) or IsEmpty(vBound) then IsOverflowDecimal=true else end if End Function Public Function IsSng(ByVal Value) IsSng=IsDecimal(value) ' -340282300000000000000000000000000000000 ~ -0.000000000000000000000000000000000000000000001401298 ' 0.000000000000000000000000000000000000000000001401298 ~ 340282300000000000000000000000000000000 ' -3.402823 E38 ~ -1.401298 E-45 ' 1.401298 E-45 ~ 3.402823 E38 End Function Public Function IsDbl(ByVal Value) IsDbl=IsDecimal(value) ' -1.79769313486232 E308 ~ -4.94065645841247 E-324 ' 4.94065645841247 E-324 ~ 1.7976931348623 E308 End Function Public Function IsCur(ByVal Value) IsCur=IsDecimal(value) '-922337203685477.5808 ~ 922337203685477.5807 End Function Public Function IsBln(ByVal Value) if Value=true or Value=false or trim(Value)="1" or trim(Value)="0" then IsBln=true else IsBln=false end if End Function Public Function IsDat(ByVal Value) if Trim(Value)="" or IsNull(Value) or IsEmpty(Value) then IsDat=false else IsDat=IsDate(Value) end if End Function Public Function IsArr(ByVal Value) if Trim(Value)="" or IsNull(Value) or IsEmpty(Value) then IsArr=false else IsArr=IsArray(Value) end if End Function ' ============================================================================== ' Convert Type, Return value/initial value ' ============================================================================== Public Function ToStr(ByVal Value) ToStr=trim(Value) End Function Public Function ToInt(ByVal Value) if IsInt(Value) then ToInt=Cint(Value) else ToInt=0 end if End Function Public Function ToLng(ByVal Value) if IsLng(Value) then ToLng=clng(Value) else ToLng=0 end if End Function Public Function ToSng(ByVal Value) if IsSng(Value) then ToSng=cSng(Value) else ToSng=0 end if End Function Public Function ToDbl(ByVal Value) if IsDbl(Value) then ToDbl=cDbl(Value) else ToDbl=0 end if End Function Public Function ToBln(ByVal Value) if IsBln(Value) then ToBln=cbool(Value) else ToBln=false end if End Function ' ****** vDecimal : number of decimal places Public Function ToCur(ByVal Value) if IsCur(Value) then ToCur=ccur(Value) else ToCur=0 end if End Function ' ****** vType : format of date Public Function ToDat(ByVal Value) if IsDat(Value) then ToDat=cdate(value) else ToDat="" end if End Function ' ============================================================================== ' Format ' ============================================================================== ' ******************************************************* 'FormatDat 'vdate 'vStyle 0:2008-1-30 1:2008/1/30 2:1/30/2008 3:30/1/2008 4:30-JAN-2008 ' 10:2008-1 11:2008/1 12:1/2008 ' 22:JAN-2008 ' 30:2008-1-30 11:20:20 ' 40:2008-01-09 Public Function FormatDat(ByVal Value, ByVal vStyle) dim dateThis,intStyle dateThis=ToDat(Value) intStyle=ToInt(vStyle) if dateThis="" or isnull(dateThis) then FormatDat = "" else Dim arrMonthArray(12) arrMonthArray(1)="JAN" arrMonthArray(2)="FEB" arrMonthArray(3)="MAR" arrMonthArray(4)="APR" arrMonthArray(5)="MAY" arrMonthArray(6)="JUN" arrMonthArray(7)="JUL" arrMonthArray(8)="AUG" arrMonthArray(9)="SEP" arrMonthArray(10)="OCT" arrMonthArray(11)="NOV" arrMonthArray(12)="DEC" select case intStyle case 1 FormatDat=cstr(year(dateThis)) &"/"& cstr(month(dateThis)) &"/"& cstr(day(dateThis)) case 2 FormatDat= cstr(month(dateThis)) &"/"& cstr(day(dateThis)) &"/"& cstr(year(dateThis)) case 3 FormatDat= cstr(day(dateThis)) &"/"& cstr(month(dateThis)) &"/"& cstr(year(dateThis)) case 4 FormatDat= cstr(day(dateThis)) &"-"& arrMonthArray(month(dateThis)) &"-"& cstr(year(dateThis)) case 10 FormatDat=cstr(year(dateThis)) &"-"& cstr(month(dateThis)) case 11 FormatDat=cstr(year(dateThis)) &"/"& cstr(month(dateThis)) case 12 FormatDat= cstr(month(dateThis)) &"/"& cstr(year(dateThis)) case 22 FormatDat= arrMonthArray(month(dateThis)) &"-"& cstr(year(dateThis)) case 30 FormatDat= cstr(year(dateThis)) &"-"& cstr(month(dateThis)) &"-"& cstr(day(dateThis)) &" "& hour(dateThis) &":"& minute(dateThis) &":"& second(dateThis) case 40 FormatDat=cstr(year(dateThis)) &"-"& ZeroPad(cstr(month(dateThis)),2) &"-"& ZeroPad(cstr(day(dateThis)),2) case else FormatDat=cstr(year(dateThis)) &"-"& cstr(month(dateThis)) &"-"& cstr(day(dateThis)) end select end if End Function ' ************** 'FormatCur ' ************** Public Function FormatCur(ByVal Value,ByVal vDecimal) FormatCur=Formatcurrency(ToCur(Value),ToInt(vDecimal)) End Function Public Function FormatNum(ByVal Value,ByVal vDecimal) FormatNum=FormatNumber(ToDbl(Value),ToInt(vDecimal)) End Function ' ============================================================================== ' other format ' ============================================================================== Public Function ToPer(Byval value,Byval value0) if Convert.ToDbl(value0)<>0 then ToPer = me.FormatNum( Convert.ToDbl(value) / Convert.ToDbl(value0) * 100,2 ) & "% " else ToPer = "0.00%" end if End Function ' ****** value -> Value first code change to uppercase Public Function FirstUppercase(ByVal value) value0 = trim(value) if len(value0)=0 then FirstUppercase = "" else FirstUppercase = UCase(left(value0,1)) & right(value0,len(value0)-1) end if End Function Public Function SafeSql(ByVal value) SafeSql = replace(value,"'","''") End Function End Class <!--#include file="web/createerweima.jishuwendang.asp"--> </div> <div class=powered> <dt class="title-link"> <p><b>上一篇：</b><a href='/jishuwendang/class36/2446.html'>asp身份证验证代码函数</a></p> <p><b>下一篇：</b><a href='/jishuwendang/class36/2444.html'>asp三层架构__Error处理类</a></p> </dt><div class="share"><div class="bdsharebuttonbox"><a href="#" class="bds_more" data-cmd="more"></a><a href="#" class="bds_weixin" data-cmd="weixin" title="分享到微信"></a><a href="#" class="bds_sqq" data-cmd="sqq" title="分享到QQ好友"></a><a href="#" class="bds_qzone" data-cmd="qzone" title="分享到QQ空间"></a><a href="#" class="bds_tsina" data-cmd="tsina" title="分享到新浪微博"></a></div> <script>window._bd_share_config={"common":{"bdSnsKey":{},"bdText":"","bdMini":"2","bdMiniList":false,"bdPic":"","bdStyle":"0","bdSize":"32"},"share":{},"selectShare":{"bdContainerClass":null,"bdSelectMiniList":["weixin","sqq","qzone","tsina"]}};with(document)0[(getElementsByTagName('head')[0]||body).appendChild(createElement('script')).src='http://bdimg.share.baidu.com/static/api/js/share.js?v=89860593.js?cdnversion='+~(-new Date()/36e5)];</script></div></div> </div> <!-- <div class="rinfo"> <div class="box-header"><h4 style="float:left;width:200px">精彩推荐</h4></div> <div style="float:left;margin:10px;padding:10px 0px;"> <script src="/file/js/jishuwendangdetails.right.tuijian.js"></script> </div> </div> --> <div class="rinfo"> <div class="box-header"><h4 style="float:left;width:200px">相关内容</h4></div> <div class="news_link" style="height:1500px"> <ul> <li>• <a href="/jishuwendang/class36/2637.html" title="asp：debug类调试程序" target="_blank">asp：debug类调试程序</a></li> <li>• <a href="/jishuwendang/class36/2636.html" title="asp.net常用函数收藏第1_2页" target="_blank">asp.net常用函数收藏第1_2页</a></li> <li>• <a href="/jishuwendang/class36/2635.html" title="Access_2000_数据库_80_万记录通用快速分页类" target="_blank">Access_2000_数据库_80_万记录通用快速分页类</a></li> <li>• <a href="/jishuwendang/class36/2634.html" title="【先锋海盗类】Ver2005__最终版" target="_blank">【先锋海盗类】Ver2005__最终版</a></li> <li>• <a href="/jishuwendang/class36/2633.html" title="[整理版]asp常用内置函数" target="_blank">[整理版]asp常用内置函数</a></li> <li>• <a href="/jishuwendang/class36/2632.html" title="[推荐]asp编程通用函数收藏大全第1_2页" target="_blank">[推荐]asp编程通用函数收藏大全第1_2页</a></li> <li>• <a href="/jishuwendang/class36/2631.html" title="直接保存URL图像或网页到服务器本地的类" target="_blank">直接保存URL图像或网页到服务器本地的类</a></li> <li>• <a href="/jishuwendang/class36/2630.html" title="遭遇asp类的事件设计" target="_blank">遭遇asp类的事件设计</a></li> <li>• <a href="/jishuwendang/class36/2629.html" title="在VBScript中使用类" target="_blank">在VBScript中使用类</a></li> <li>• <a href="/jishuwendang/class36/2628.html" title="在VBScript中实现-函数_方法名作为参数传入另一个函数" target="_blank">在VBScript中实现-函数_方法名作为参数传入另一个函数</a></li> <li>• <a href="/jishuwendang/class36/2627.html" title="再发几个asp不错的函数" target="_blank">再发几个asp不错的函数</a></li> <li>• <a href="/jishuwendang/class36/2626.html" title="用正则表达式写的HTML分离函数" target="_blank">用正则表达式写的HTML分离函数</a></li> <li>• <a href="/jishuwendang/class36/2625.html" title="用asp实现网址和邮件地址的转换函数" target="_blank">用asp实现网址和邮件地址的转换函数</a></li> <li>• <a href="/jishuwendang/class36/2624.html" title="用asp编写的加密和解密类" target="_blank">用asp编写的加密和解密类</a></li> <li>• <a href="/jishuwendang/class36/2623.html" title="硬盘文件搜索代码（asp类）" target="_blank">硬盘文件搜索代码（asp类）</a></li> <li>• <a href="/jishuwendang/class36/2622.html" title="易心asp分页类_v1.0" target="_blank">易心asp分页类_v1.0</a></li> <li>• <a href="/jishuwendang/class36/2621.html" title="一小偷类!!有兴趣的可以看看" target="_blank">一小偷类!!有兴趣的可以看看</a></li> <li>• <a href="/jishuwendang/class36/2620.html" title="一个简单的asp数据库操作类" target="_blank">一个简单的asp数据库操作类</a></li> <li>• <a href="/jishuwendang/class36/2619.html" title="一个改进的asp生成SQL命令字符串类的代码[已测]" target="_blank">一个改进的asp生成SQL命令字符串类的代码[已测]</a></li> <li>• <a href="/jishuwendang/class36/2618.html" title="一个非常简单的将半角转换为中文的函数" target="_blank">一个非常简单的将半角转换为中文的函数</a></li> <li>• <a href="/jishuwendang/class36/2617.html" title="一个asp替换函数img里面多余的代码" target="_blank">一个asp替换函数img里面多余的代码</a></li> <li>• <a href="/jishuwendang/class36/2616.html" title="一个asp快速字符串连接类" target="_blank">一个asp快速字符串连接类</a></li> <li>• <a href="/jishuwendang/class36/2615.html" title="一个asp创建动态对象的工厂类（类似PHP的stdClass）" target="_blank">一个asp创建动态对象的工厂类（类似PHP的stdClass）</a></li> <li>• <a href="/jishuwendang/class36/2614.html" title="一个asp版XMLDOM操作类" target="_blank">一个asp版XMLDOM操作类</a></li> <li>• <a href="/jishuwendang/class36/2613.html" title="一段在asp中加密与解密对应的函数" target="_blank">一段在asp中加密与解密对应的函数</a></li> <li>• <a href="/jishuwendang/class36/2612.html" title="叶子asp分页类" target="_blank">叶子asp分页类</a></li> <li>• <a href="/jishuwendang/class36/2611.html" title="写入文本文件的过程函数(asp)" target="_blank">写入文本文件的过程函数(asp)</a></li> <li>• <a href="/jishuwendang/class36/2610.html" title="小偷，采集程序常用函数" target="_blank">小偷，采集程序常用函数</a></li> <li>• <a href="/jishuwendang/class36/2609.html" title="先锋海盗类" target="_blank">先锋海盗类</a></li> <li>• <a href="/jishuwendang/class36/2608.html" title="文章内页类" target="_blank">文章内页类</a></li> <li>• <a href="/jishuwendang/class36/2607.html" title="文章列表类别" target="_blank">文章列表类别</a></li> <li>• <a href="/jishuwendang/class36/2606.html" title="文件遍历排序函数" target="_blank">文件遍历排序函数</a></li> <li>• <a href="/jishuwendang/class36/2605.html" title="文件、目录，文本文件等多种操作类" target="_blank">文件、目录，文本文件等多种操作类</a></li> <li>• <a href="/jishuwendang/class36/2604.html" title="推荐下天枫常用asp函数封装，推荐大家使用" target="_blank">推荐下天枫常用asp函数封装，推荐大家使用</a></li> <li>• <a href="/jishuwendang/class36/2603.html" title="推荐asp中VBScript常用函数" target="_blank">推荐asp中VBScript常用函数</a></li> <li>• <a href="/jishuwendang/class36/2602.html" title="天枫常用的asp函数封装如下" target="_blank">天枫常用的asp函数封装如下</a></li> <li>• <a href="/jishuwendang/class36/2601.html" title="提供几个关于采集的函数(asp)" target="_blank">提供几个关于采集的函数(asp)</a></li> <li>• <a href="/jishuwendang/class36/2600.html" title="收集整理的asp的常用内置函数" target="_blank">收集整理的asp的常用内置函数</a></li> <li>• <a href="/jishuwendang/class36/2599.html" title="收藏的asp常用的函数集" target="_blank">收藏的asp常用的函数集</a></li> <li>• <a href="/jishuwendang/class36/2598.html" title="使用类，实现模块化" target="_blank">使用类，实现模块化</a></li> <li>• <a href="/jishuwendang/class36/2597.html" title="使用函数自动生成n层目录" target="_blank">使用函数自动生成n层目录</a></li> <li>• <a href="/jishuwendang/class36/2596.html" title="使用asp在IIS创建WEB站点的函数" target="_blank">使用asp在IIS创建WEB站点的函数</a></li> <li>• <a href="/jishuwendang/class36/2595.html" title="使用asp控制指定站点解析脚本语言函数" target="_blank">使用asp控制指定站点解析脚本语言函数</a></li> <li>• <a href="/jishuwendang/class36/2594.html" title="实现asp程序执行时间统计类的代码" target="_blank">实现asp程序执行时间统计类的代码</a></li> <li>• <a href="/jishuwendang/class36/2593.html" title="如何查询日期类型的数据？" target="_blank">如何查询日期类型的数据？</a></li> <li>• <a href="/jishuwendang/class36/2592.html" title="日期函数扩展类Ver0.1.1" target="_blank">日期函数扩展类Ver0.1.1</a></li> <li>• <a href="/jishuwendang/class36/2591.html" title="浅谈asp中的类" target="_blank">浅谈asp中的类</a></li> <li>• <a href="/jishuwendang/class36/2590.html" title="判断dll文件是否已经注册的asp函数代码" target="_blank">判断dll文件是否已经注册的asp函数代码</a></li> <li>• <a href="/jishuwendang/class36/2589.html" title="两个小函数让你的asp程序对SQL注入免疫！" target="_blank">两个小函数让你的asp程序对SQL注入免疫！</a></li> <li>• <a href="/jishuwendang/class36/2588.html" title="类似于iis浏览的功能" target="_blank">类似于iis浏览的功能</a></li> <li>• <a href="/jishuwendang/class36/2586.html" title="可以获得文件的文件名的asp函数" target="_blank">可以获得文件的文件名的asp函数</a></li> <li>• <a href="/jishuwendang/class36/2585.html" title="解决_JScript_中使用日期类型数据时出现类型错误的问题" target="_blank">解决_JScript_中使用日期类型数据时出现类型错误的问题</a></li> <li>• <a href="/jishuwendang/class36/2584.html" title="简单分页函数一_常用" target="_blank">简单分页函数一_常用</a></li> <li>• <a href="/jishuwendang/class36/2582.html" title="计算两个时间之差的函数" target="_blank">计算两个时间之差的函数</a></li> <li>• <a href="/jishuwendang/class36/2581.html" title="获取一个数字的个位、十位、百位的函数代码" target="_blank">获取一个数字的个位、十位、百位的函数代码</a></li> <li>• <a href="/jishuwendang/class36/2580.html" title="获取图片宽度和高度的类，支持JPG，GIF，PNG，BMP" target="_blank">获取图片宽度和高度的类，支持JPG，GIF，PNG，BMP</a></li> <li>• <a href="/jishuwendang/class36/2579.html" title="函数名称_函数功能" target="_blank">函数名称_函数功能</a></li> <li>• <a href="/jishuwendang/class36/2578.html" title="功能不错的asp模板类代码附下载第1_4页" target="_blank">功能不错的asp模板类代码附下载第1_4页</a></li> <li>• <a href="/jishuwendang/class36/2577.html" title="根据日期得到生肖的asp函数" target="_blank">根据日期得到生肖的asp函数</a></li> <li>• <a href="/jishuwendang/class36/2576.html" title="高手推荐的比较有用的asp函数集合" target="_blank">高手推荐的比较有用的asp函数集合</a></li> <li>• <a href="/jishuwendang/class36/2575.html" title="防盗链接asp函数" target="_blank">防盗链接asp函数</a></li> <li>• <a href="/jishuwendang/class36/2574.html" title="发一个采集(小偷)用的类，asp+缓存实现" target="_blank">发一个采集(小偷)用的类，asp+缓存实现</a></li> <li>• <a href="/jishuwendang/class36/2573.html" title="发一个asp的ADODB类代码" target="_blank">发一个asp的ADODB类代码</a></li> <li>• <a href="/jishuwendang/class36/2572.html" title="错误类型：Provider_(0x80004005)未指定的错误_的一个处理方法" target="_blank">错误类型：Provider_(0x80004005)未指定的错误_的一个处理方法</a></li> <li>• <a href="/jishuwendang/class36/2571.html" title="创力采集程序用到的函数_推荐第1_3页" target="_blank">创力采集程序用到的函数_推荐第1_3页</a></li> <li>• <a href="/jishuwendang/class36/2570.html" title="超级asp大分页_我的类容我做主" target="_blank">超级asp大分页_我的类容我做主</a></li> <li>• <a href="/jishuwendang/class36/2569.html" title="常用asp函数集【经验才是最重要的】" target="_blank">常用asp函数集【经验才是最重要的】</a></li> <li>• <a href="/jishuwendang/class36/2568.html" title="不错的主要用于加密的vbs(asp)位移运算类" target="_blank">不错的主要用于加密的vbs(asp)位移运算类</a></li> <li>• <a href="/jishuwendang/class36/2567.html" title="捕捉并保存asp运行错误的函数代码" target="_blank">捕捉并保存asp运行错误的函数代码</a></li> <li>• <a href="/jishuwendang/class36/2566.html" title="遍历目录以及目录下文件的函数" target="_blank">遍历目录以及目录下文件的函数</a></li> <li>• <a href="/jishuwendang/class36/2565.html" title="XDOWNPAGE___asp版本_分页类" target="_blank">XDOWNPAGE___asp版本_分页类</a></li> <li>• <a href="/jishuwendang/class36/2564.html" title="VBScript_asp_CDbl()_函数转换为双精度类型" target="_blank">VBScript_asp_CDbl()_函数转换为双精度类型</a></li> <li>• <a href="/jishuwendang/class36/2563.html" title="ubbcode函数" target="_blank">ubbcode函数</a></li> <li>• <a href="/jishuwendang/class36/2562.html" title="SmartHTTP_简易HttpRequest类(asp)" target="_blank">SmartHTTP_简易HttpRequest类(asp)</a></li> <li>• <a href="/jishuwendang/class36/2561.html" title="ScriptHtml_函数之过滤html标记的asp代码" target="_blank">ScriptHtml_函数之过滤html标记的asp代码</a></li> <li>• <a href="/jishuwendang/class36/2560.html" title="SaveRemoteFile函数之asp实现保存远程的文件到本地的代码" target="_blank">SaveRemoteFile函数之asp实现保存远程的文件到本地的代码</a></li> <li>• <a href="/jishuwendang/class36/2559.html" title="ReSaveRemoteFile函数之asp实现查找文件保存替换的代码" target="_blank">ReSaveRemoteFile函数之asp实现查找文件保存替换的代码</a></li> <li>• <a href="/jishuwendang/class36/2558.html" title="ReplaceTrim_函数之asp实现过滤掉字符中所有的tab和回车和换行的代码" target="_blank">ReplaceTrim_函数之asp实现过滤掉字符中所有的tab和回车和换行的代码</a></li> <li>• <a href="/jishuwendang/class36/2557.html" title="pjblog实现类似CMS的首页调用" target="_blank">pjblog实现类似CMS的首页调用</a></li> <li>• <a href="/jishuwendang/class36/2556.html" title="Object对象的一些的隐藏函数介绍" target="_blank">Object对象的一些的隐藏函数介绍</a></li> <li>• <a href="/jishuwendang/class36/2555.html" title="newasp中下载类" target="_blank">newasp中下载类</a></li> <li>• <a href="/jishuwendang/class36/2554.html" title="newasp中main类" target="_blank">newasp中main类</a></li> <li>• <a href="/jishuwendang/class36/2553.html" title="MusicGet_类" target="_blank">MusicGet_类</a></li> <li>• <a href="/jishuwendang/class36/2552.html" title="js_table排序类代码" target="_blank">js_table排序类代码</a></li> <li>• <a href="/jishuwendang/class36/2551.html" title="Jmail组件发送邮件之绝对能用的函数" target="_blank">Jmail组件发送邮件之绝对能用的函数</a></li> <li>• <a href="/jishuwendang/class36/2550.html" title="jb51内容分页函数__font_color=red_原创__font_" target="_blank">jb51内容分页函数__font_color=red_原创__font_</a></li> <li>• <a href="/jishuwendang/class36/2549.html" title="isnumeric检测是否为数字类型的asp代码" target="_blank">isnumeric检测是否为数字类型的asp代码</a></li> <li>• <a href="/jishuwendang/class36/2548.html" title="HTML标签及asp函数速查表" target="_blank">HTML标签及asp函数速查表</a></li> <li>• <a href="/jishuwendang/class36/2547.html" title="GetPaing_函数之asp采集函数中用到的获取分页的代码" target="_blank">GetPaing_函数之asp采集函数中用到的获取分页的代码</a></li> <li>• <a href="/jishuwendang/class36/2546.html" title="FSO文件对象介绍及常用函数" target="_blank">FSO文件对象介绍及常用函数</a></li> <li>• <a href="/jishuwendang/class36/2545.html" title="FpHtmlEnCode_函数之标题过滤特殊符号的代码" target="_blank">FpHtmlEnCode_函数之标题过滤特殊符号的代码</a></li> <li>• <a href="/jishuwendang/class36/2544.html" title="FormatRemoteUrl函数之asp实现格式化成当前网站完整的URL-将相对地址转换为绝对地址的代码" target="_blank">FormatRemoteUrl函数之asp实现格式化成当前网站完整的URL-将相对地址转换为绝对地址的代码</a></li> <li>• <a href="/jishuwendang/class36/2543.html" title="FileSystem对象常用的文件操作函数有哪些？" target="_blank">FileSystem对象常用的文件操作函数有哪些？</a></li> <li>• <a href="/jishuwendang/class36/2542.html" title="Easyasp_v1.5发布(包含数据库操作类，原clsDbCtrl.asp)第1_2页" target="_blank">Easyasp_v1.5发布(包含数据库操作类，原clsDbCtrl.asp)第1_2页</a></li> <li>• <a href="/jishuwendang/class36/2540.html" title="CheckFile函数之asp实现检查某一文件是否存在的代码" target="_blank">CheckFile函数之asp实现检查某一文件是否存在的代码</a></li> <li>• <a href="/jishuwendang/class36/2539.html" title="asp最常用的分页函数" target="_blank">asp最常用的分页函数</a></li> <li>• <a href="/jishuwendang/class36/2538.html" title="asp字符串加密解密函数" target="_blank">asp字符串加密解密函数</a></li> <li>• <a href="/jishuwendang/class36/2537.html" title="asp自定义分段函数_求第N名成绩" target="_blank">asp自定义分段函数_求第N名成绩</a></li> <li>• <a href="/jishuwendang/class36/2536.html" title="asp转换格林威治时间函数DateDiff()应用" target="_blank">asp转换格林威治时间函数DateDiff()应用</a></li> <li>• <a href="/jishuwendang/class36/2535.html" title="asp中一个字符串处理类" target="_blank">asp中一个字符串处理类</a></li> <li>• <a href="/jishuwendang/class36/2534.html" title="asp中一个用VBScript写的随机数类" target="_blank">asp中一个用VBScript写的随机数类</a></li> <li>• <a href="/jishuwendang/class36/2533.html" title="asp中向文本框输出数据原样式的函数" target="_blank">asp中向文本框输出数据原样式的函数</a></li> <li>• <a href="/jishuwendang/class36/2532.html" title="asp中文件与文件夹常用处理函数(文件后缀、创建文件等)" target="_blank">asp中文件与文件夹常用处理函数(文件后缀、创建文件等)</a></li> <li>• <a href="/jishuwendang/class36/2531.html" title="asp中实现限制IP的函数详解" target="_blank">asp中实现限制IP的函数详解</a></li> <li>• <a href="/jishuwendang/class36/2530.html" title="asp中实现清除html的函数" target="_blank">asp中实现清除html的函数</a></li> <li>• <a href="/jishuwendang/class36/2529.html" title="asp中实现的URLEncode、URLDecode自定义函数" target="_blank">asp中实现的URLEncode、URLDecode自定义函数</a></li> <li>• <a href="/jishuwendang/class36/2528.html" title="asp中日期时间函数介绍" target="_blank">asp中日期时间函数介绍</a></li> <li>• <a href="/jishuwendang/class36/2527.html" title="asp中去除内容HTML标签的三个function函数" target="_blank">asp中去除内容HTML标签的三个function函数</a></li> <li>• <a href="/jishuwendang/class36/2526.html" title="asp中取得图片宽度和高度的类（无组件）" target="_blank">asp中取得图片宽度和高度的类（无组件）</a></li> <li>• <a href="/jishuwendang/class36/2525.html" title="asp中巧用Split()函数生成SQL查询语句的实例" target="_blank">asp中巧用Split()函数生成SQL查询语句的实例</a></li> <li>• <a href="/jishuwendang/class36/2524.html" title="asp中判断服务器是否安装了某种组件的函数" target="_blank">asp中判断服务器是否安装了某种组件的函数</a></li> <li>• <a href="/jishuwendang/class36/2523.html" title="asp中类Class相关内容的整理资料" target="_blank">asp中类Class相关内容的整理资料</a></li> <li>• <a href="/jishuwendang/class36/2522.html" title="asp中将相对路径转换为绝对路径的函数代码" target="_blank">asp中将相对路径转换为绝对路径的函数代码</a></li> <li>• <a href="/jishuwendang/class36/2521.html" title="asp中获取当前页面的地址与参数的函数代码" target="_blank">asp中获取当前页面的地址与参数的函数代码</a></li> <li>• <a href="/jishuwendang/class36/2520.html" title="asp中格式化HTML函数代码_SDCMS加强版" target="_blank">asp中格式化HTML函数代码_SDCMS加强版</a></li> <li>• <a href="/jishuwendang/class36/2519.html" title="asp中的时间函数大全_时间操作函数第1_2页" target="_blank">asp中的时间函数大全_时间操作函数第1_2页</a></li> <li>• <a href="/jishuwendang/class36/2518.html" title="asp中的面向对象类" target="_blank">asp中的面向对象类</a></li> <li>• <a href="/jishuwendang/class36/2517.html" title="asp中的Rnd_函数" target="_blank">asp中的Rnd_函数</a></li> <li>• <a href="/jishuwendang/class36/2516.html" title="asp中常用的字符串安全处理函数集合(过滤特殊字符等)" target="_blank">asp中常用的字符串安全处理函数集合(过滤特殊字符等)</a></li> <li>• <a href="/jishuwendang/class36/2515.html" title="asp中常用的文件处理函数" target="_blank">asp中常用的文件处理函数</a></li> </ul> </div> </div> </div> <div id="footer"> <div class="footer_con"><div class="footer_txt"> Copyright © 2024 <a href="http://www.zwyuanma.com/">中文源码网</a> All Rights Reserved  备案号:<a href="http://www.beian.miit.gov.cn/" target="_blank">[苏ICP备15047094号-4]</a> <a href="/sitemap.xml">[站点地图]</a><br/> <a href="/home/help/{$.id}.html" target="_blank">联系我们</a> |  <a href="/home/help/{$.id}.html" target="_blank">常见问题</a> |  <a href="/home/help/{$.id}.html" target="_blank">网站介绍</a> |  客服QQ:<a href="http://wpa.qq.com/msgrd?v=3&uin=282898506&site=qq&menu=yes" target="_blank">282898506</a> | 邮箱：282898506#qq.com(#改@)  <br> <a href="/home/help/{$.id}.html" target="_blank">如何发布官方评测?</a> |  <a href="/home/help/{$.id}.html" target="_blank">如何发布建站方案?</a> |  <a href="/home/help/{$.id}.html" target="_blank">如何发布技术供求?</a> |  <a href="/home/help/{$.id}.html" target="_blank">广告位申请</a> |  <a href="/home/help/{$.id}.html" target="_blank">如何管理展厅?</a> |  <a href="/home/help/{$.id}.html" target="_blank">如何开通展厅?</a> |  <a href="/home/help/{$.id}.html" target="_blank">如何发布模版?</a> |  <a href="/home/help/{$.id}.html" target="_blank">如何发布源码?</a> |  <br/> <div style="display:none;"><script charset='UTF-8' id='LA_COLLECT' src='//sdk.51.la/js-sdk-pro.min.js'></script><script>LA.init({id: 'Jhcp3j9uNE3jSacI',ck: 'Jhcp3j9uNE3jSacI'})</script> <a href="sitemap.xml">sitemap.xml</a></div> </div></div> </div> </div> <!--右侧导航--> <ul class="r_serve"> <a title="qq咨询" onclick="window.open('http://wpa.qq.com/msgrd?v=3&uin=282898506&site=qq&menu=yes', '_blank', 'height=544, width=644,toolbar=no,scrollbars=no,menubar=no,status=no');return false;" target="_blank"><li><p><img src="/public/yuanma/web/style/images/qq.png" /></p><p>QQ客服</p></li></a> <li><p><img src="/public/yuanma/web/style/images/wx.png"/></p><p>公众号</p><img class="maImg" id="wxImg" src="/public/yuanma/web/style/images/wxImg.png"/></li> <li><a title="中文源码网手机版" target="_blank" href="http://m.zwyuanma.com/"><p><img src="/public/yuanma/web/style/images/ma.png"/></p><p>手机版</p></a><img class="maImg" id="maImg" src="/public/yuanma/web/style/images/maimg.png"/></li> <a title="" target="_blank" href="/help/2.html"><li><p><img src="/public/yuanma/web/style/images/help.png"/></p><p>帮助中心</p></li></a> <li><p><img src="/public/yuanma/web/style/images/back_top.png"/></p></li> </ul> <script language="javascript"> $(".r_serve li:nth-child(2)").hover(function() {$("#wxImg").show();$("#maImg").hide();},function(){$("#wxImg").hide();}) $(".r_serve li:nth-child(3)").hover(function() {$("#maImg").show();$(".r_gfq").hide();$("#wxImg").hide();},function(){$("#maImg").hide();}) $(".r_serve li:nth-child(5)").click(function() {$("html, body").animate({ scrollTop: 0 }, 120);}) </script> </body> </html>