|
|
| 首页 | 技术文章 | 软件下载 | 博客 | 论坛 | 精品教程 | 黑客动画 | 视频资源 | 在线服务 | 黑客游戏 | | ||||
|
|
||||||||
|
||||||||
|
|||||
| ASP编写的加密和解密类 | |||||
作者:佚名 文章来源:网络 点击数: 更新时间:2007-7-3 ![]() |
|||||
|
rem Const dim sBASE_64_CHARACTERS'转化码 dim lenString '计算字符串的长度 dim iCount '计数器 dim returnValue '返回值 dim tempChar'缓存字符 dim tempString'缓存字符串 dim paramString '参数字符串 dim temHex'缓存缓存十六进制 dim tempLow'缓存低位 dim tempHigh'缓存高位 dim mod3String' dim mod4String' dim tempBinary' dim tempByteOne' dim tempByteTwo' dim tempByteThree' dim tempByteFour' dim tempSaveBitsOne' dim tempSaveBitsTwo' '******************************************** 'begin初始化类 '******************************************** private sub Class_Initialize() sBASE_64_CHARACTERS = "ABCDEFGHIJKLMNOPQRSTUVWXYZabcdefghijklmnopqrstuvwxyz0123456789+/" end sub '******************************************** 'end初始化类 ' ******************************************** '******************************************** 'begin销毁类 '******************************************** Private Sub Class_Terminate() sBASE_64_CHARACTERS="" end sub '******************************************** 'end销毁类 '******************************************** '******************************************** 'begin将Ansi编码的字符串进行Base64编码 '******************************************** public function Encode(paramString) tempString="" returnValue="" lenString=len(paramString) if lenString<1 then Encode=returnValue else mod3String=lenString mod 3 '补足位数是为了便于计算 if mod3String>0 then lenString=lenString+3-mod3String lenString=lenString-3 end if |
|||||
| 文章录入:IceRiver 责任编辑:IceRiver | |||||
| 【发表评论】【加入收藏】【告诉好友】【打印此文】【关闭窗口】 | |||||
| 最新热点 | 最新推荐 | 相关文章 | ||
| 微软终于让步 Vista SP1支持 MSN Space大赛官方网站入侵经 非主流入侵之会话劫持winnt/ 美耗资500万欲打造间谍版Mys Thomson SpeedTouch 2030 SI Asterisk 畸形 MIME 数据时有 插入ASP代码让网站数据库成木 微软补丁连发 XP SP3将于明年 Kaspersky Anti-Spam存在不安 MySpace存0day |
网友评论:(只显示最新5条。评论内容只代表网友观点,与本站立场无关!) |
| 关于我们 - 版权声明 - 帮助(?) - 广告服务 - 联系我们 - 友情链接 - 用户注册 - | Powered by ICE RIVER - STUDIO |
| » CnXHacker.CoM | © CopyRight 2002-2006, CnXHacker.CoM™, Inc. All Rights Reserved. |