882捕鱼微信上下分捕鱼上下分久幺尔

应用介绍

这是一个Base64编码、解码小工具（可破解迅雷下载地址）。采用本站原创的VB6下Base64编码解码算法。叮咚签到管理版2.6.9 官网最新版【移动考勤管理系统】

程序源码：

OptionExplicit
PrivateConstcstBase64="ABCDEFGHIJKLMNOPQRSTUVWXYZabcdefghijklmnopqrstuvwxyz0123456789+/"
PrivatearrBase64()AsString
"001000010010000100100001 --源码
"00001000000100100000010000100001 --Base64码

PublicFunctionBase64Encode(strSourceAsString)AsString
OnErrorResumeNext
"适用于中、英文的Base64编码/解码VB6超精简版
IfUBound(arrBase64)=-1Then
arrBase64=Split(StrConv(cstBase64,vbUnicode),vbNullChar)
EndIf
DimarrB()AsByte,bTmp(2) AsByte,bTAsByte
DimIAsLong,JAsLong
arrB=StrConv(strSource,vbFromUnicode)

J=UBound(arrB)
ForI=0ToJStep3
   ErasebTmp
   bTmp(0)=arrB(I+0)
   bTmp(1)=arrB(I+1)
   bTmp(2)=arrB(I+2)

   bT=(bTmp(0)And252)/4
   Base64Encode=Base64Encode&arrBase64(bT)

   bT=(bTmp(0)And3)*16
   bT=bT+bTmp(1)/16
   Base64Encode=Base64Encode&arrBase64(bT)

   bT=(bTmp(1)And15)*4
   bT=bT+bTmp(2)/64
   IfI+1<=JThen
       Base64Encode=Base64Encode&arrBase64(bT)
   Else
       Base64Encode=Base64Encode&"="
   EndIf

   bT=bTmp(2)And63
   IfI+2<=JThen
       Base64Encode=Base64Encode&arrBase64(bT)
   Else
       Base64Encode=Base64Encode&"="
   EndIf
Next
EndFunction

PublicFunctionBase64Decode(strEncodedAsString)AsString
"适用于中、英文的Base64编码/解码VB6超精简版
OnErrorResumeNext
DimarrB()AsByte,bTmp(3) AsByte,bTAsLong,bRet()AsByte
DimIAsLong,JAsLong
arrB=StrConv(strEncoded,vbFromUnicode)
J=InStr(strEncoded&"=","=")-2
ReDimbRet(J-J/4-1)
ForI=0ToJStep4
   ErasebTmp
   bTmp(0)=(InStr(cstBase64,Chr(arrB(I)))-1)And63
   bTmp(1)=(InStr(cstBase64,Chr(arrB(I+1)))-1)And63
   bTmp(2)=(InStr(cstBase64,Chr(arrB(I+2)))-1)And63
   bTmp(3)=(InStr(cstBase64,Chr(arrB(I+3)))-1)And63

   bT=bTmp(0)*2^18+bTmp(1)*2^12+bTmp(2)*2^6+bTmp(3)

   bRet((I/4)*3)=bT/65536
   bRet((I/4)*3+1)=(bTAnd65280)/256
   bRet((I/4)*3+2)=bTAnd255
Next
Base64Decode=StrConv(bRet,vbUnicode)
EndFunction

Base64说明

Base64是网络上最常见的用于传输8Bit字节代码的编码方式之一，可用于在HTTP环境下传递较长的标识信息。在其他应用程序中，也常常需要把二进制数据编码为适合放在URL（包括隐藏表单域）中的形式。此时，采用Base64编码不仅比较简短，同时也具有不可读性，即所编码的数据不会被人用肉眼所直接看到。

3d走势图组六火狐平台体育农博人才官网双色球开奖视屏天下彩看图码

用户评论

clockology表盘下载-Clockology1.2.5最新版

2025/12/15 02:25更新

Clockology表盘是一款搭配AppleWatch使用的手表表盘装饰软件，通过这款软件，可以连接到AppleWatch上查看相关的数据，我们还可以在这款软件...

电信ADSL 网友 qwe123 三国志战略版魅族版下载-三国志战略版魅族客户端2071.1572手机礼包版: 三国志战略版魅族版下载-三国志战略版魅族客户端2071.1572手机礼包版
支持 ( 19 ) 盖楼(回复)
电信ADSL 网友 qwe123 TimedShutdown(电脑定时关机软件)1.0 绿色免费版: TimedShutdown(电脑定时关机软件)1.0 绿色免费版
支持 ( 39 ) 盖楼(回复)
电信ADSL 网友 qwe123 智学集app下载-智学集app1.0 安卓版: 智学集app下载-智学集app1.0 安卓版
支持 ( 89 ) 盖楼(回复)
电信ADSL 网友 qwe123 火柴人计划重生新版下载-火柴人计划重生2.4 最新版: 火柴人计划重生新版下载-火柴人计划重生2.4 最新版
支持 ( 55 ) 盖楼(回复)
电信ADSL 网友 qwe123 一路乐旅游安卓版下载-一路乐旅游4.4.8安卓版【旅行导游】: 一路乐旅游安卓版下载-一路乐旅游4.4.8安卓版【旅行导游】
支持 ( 85 ) 盖楼(回复)
电信ADSL 网友 qwe123 刷题大师app下载-刷题大师app1.0 官方安卓版: 刷题大师app下载-刷题大师app1.0 官方安卓版
支持 ( 123 ) 盖楼(回复)
电信ADSL 网友 qwe123 聚友QQ空间刷日志访问量工具7.0 绿色免费版: 聚友QQ空间刷日志访问量工具7.0 绿色免费版
支持 ( 72 ) 盖楼(回复)
电信ADSL 网友 qwe123 bt版王者天下ol游戏下载-王者天下ol变态版1.0 福利版: bt版王者天下ol游戏下载-王者天下ol变态版1.0 福利版
支持 ( 56 ) 盖楼(回复)
电信ADSL 网友 qwe123 可爱卡通插画风格小清新工作汇报总结ppt模板免费版: 可爱卡通插画风格小清新工作汇报总结ppt模板免费版
支持 ( 107 ) 盖楼(回复)
电信ADSL 网友 qwe123 慧达全峰快递单号生成器10.0 绿色免费版: 慧达全峰快递单号生成器10.0 绿色免费版
支持 ( 63 ) 盖楼(回复)
电信ADSL 网友 qwe123 太美太湖app下载-太美太湖1.0.2 安卓版: 太美太湖app下载-太美太湖1.0.2 安卓版
支持 ( 43 ) 盖楼(回复)
电信ADSL 网友 qwe123 手机电影转换器下载-电狐手机电影转换器1.9.11.1125 免费绿色版: 手机电影转换器下载-电狐手机电影转换器1.9.11.1125 免费绿色版
支持 ( 6 ) 盖楼(回复)
电信ADSL 网友 qwe123 Exploration Pro(探索游戏(Exploration the Game))3.9安卓版: Exploration Pro(探索游戏(Exploration the Game))3.9安卓版
支持 ( 46 ) 盖楼(回复)
电信ADSL 网友 qwe123 车速拍app下载-车速拍二手车官网4.7.2.0 安卓版: 车速拍app下载-车速拍二手车官网4.7.2.0 安卓版
支持 ( 125 ) 盖楼(回复)
电信ADSL 网友 qwe123 公益人社安卓版3.2 最新版: 公益人社安卓版3.2 最新版
支持 ( 39 ) 盖楼(回复)
电信ADSL 网友 qwe123 元气骑士先行服下载最新版-元气骑士先行服体验服【枪斗三国】5.4.10 最新版: 元气骑士先行服下载最新版-元气骑士先行服体验服【枪斗三国】5.4.10 最新版
支持 ( 46 ) 盖楼(回复)
电信ADSL 网友 qwe123 车有为app下载-车有为app1.1.1 安卓版: 车有为app下载-车有为app1.1.1 安卓版
支持 ( 156 ) 盖楼(回复)
电信ADSL 网友 qwe123 移动扫描仪（口袋移动扫描仪）3.1.2 完美版: 移动扫描仪（口袋移动扫描仪）3.1.2 完美版
支持 ( 103 ) 盖楼(回复)
电信ADSL 网友 qwe123 贝壳网app下载-贝壳网手机版下载5.6.6.1 最新版: 贝壳网app下载-贝壳网手机版下载5.6.6.1 最新版
支持 ( 110 ) 盖楼(回复)
电信ADSL 网友 qwe123 百岛外卖商户端下载-百岛外卖app3.1.20180102 安卓版: 百岛外卖商户端下载-百岛外卖app3.1.20180102 安卓版
支持 ( 55 ) 盖楼(回复)

查看更多评论

Base64编码解码小工具1.0 绿色免费版

程序源码：

Base64说明