文章中心 - ASP相关

由本站酷站领地提供的过程代码  <% '============================== '创建多级目录，可以创建不存在的根目录 '参数：要创建的目录名称，可以是多级 '创建目录的根目录从当前目录开始 '支持相对路径和绝对路径 '

需求场景 有时候我们不希望源代码中出现原字符，如某些地方门户供求信息网站需要显示电话号码，我们就需要对电话号码在源码里以类似加密形式显示，但又不影响前端UI页面上的显示，那么就需要将字符串转换为Ascii编码形式。 方法一：将中文汉字、英文字母和数字转换 <% Function AsciiToUnico

<%  imgpath="1.jpg" set pp=new imgInfo  w = pp.imgW(server.mappath(imgpath))  h = pp.imgH(server.mappath(imgpath))  se

传统的翻页方法在数量达到10万记录集的时候，基本上就会遇到翻页瓶颈，即便使用select top方法也不能满足，如： PageSize=20   ’--每页现实记录数 pn=request("pn")  ’--获取第多少页 TitleSearchWord=request(

’取得图片 function GetImgs(str) dim objRegExp1,mm,Match1,imgsrc,i     Set objRegExp1 = New Regexp      objRegExp1.IgnoreCase = True