asp伪继承初探_实例代码
其中使用到一个分页类CPaging 复制代码 代码如下: Class CPaging Public RS ' RecordSet对象 Public Mark ' 指针标签 Private sSize ' 每页显示数 Private sTotal ' 总记录数 Private sPage ' 当前页码 Private sCount '...
使用FSO修改文件夹的名称实现文件转移防盗链
那天突然的一个灵感，是针对防盗链的 正常上传的文件，若被人盗链则增加了自己服务器的负担，上次164.cc就因此被挂 然后想想对策，目前各类防盗链程序也不少，不过使用也并不简单...
asp实现取得数组中的最大值的代码
% '****************************** '函数：GetMax(str) '参数：str，待处理的数字数组，以,分隔多了数字 '作者：阿里西西 '日期：2007/7/12 '描述：取得数组中的最大值 '示例：%=GetMax("360,120,5,600,32")...
asp事物功能简单小应用
conn.begintrans'开启事物功能 ...中间是一些添加修改删除操作 如果出现错误就取消 conn.rollbacktrans'取消事物更改并结束事物 如果没问题，就保存 conn.CommitTrans'保存事物并结束事物 复制代码...
不错的主要用于加密的vbs(asp)位移运算类
scriptlanguage="vbscript" 'Aother:奔腾的心 'QQ:7180001 'Date:2008-01-17 ClassmShift Privatem_lPower2(31) PublicFunctionRShift(ByVallThis,ByVallBits) OnErrorResumeNext Init If(lBits=0)Then RShift=lThis ElseIf(lBits63)Then '..error... Else...
asp base64加解密函数代码
复制代码 代码如下: % sBASE_64_CHARACTERS = "ABCDEFGHIJKLMNOPQRSTUVWXYZabcdefghijklmnopqrstuvwxyz0123456789+/" sBASE_64_CHARACTERS = strUnicode2Ansi(sBASE_64_CHARACTERS) Function strUnicodeLen(asContents) '计算unicode字符串的An...
ASP 精华源码收集（五年总结）第1/20页
% '#######以下是一个类文件，下面的注解是调用类的方法################################################ '# 注意：如果系统不支持建立Scripting.FileSystemObject对象，那么数据库压缩功能将无法使用 '...
asp UTF-8 乱码问题的解决方法小结
这个是网页编码的问题。中文一般采用的是gb2312这样的话显示中文基本上不会出现乱码。但是有时候我们用的是一种国际上通用的utf-8格式。如果utf-8格式人不是很了解的话是容易出现乱...