首页 相关文章 base64编码、解码函数

base64编码、解码函数

这是我看完几个base64编码、解码函数后自己改写的。
因为,在中文操作系统的VBscript中,使用的是unicode字符集,所以
很多base64编码、解码函数在理论上是正确的,但实际不能运行!

我加写了几个Unicode与Ansi编码转换的函数,现贴出来,请大家执教!


文件名称base64test.asp

<%

sBASE_64_CHARACTERS = "ABCDEFGHIJKLMNOPQRSTUVWXYZabcdefghijklmnopqrstuvwxyz0123456789+/"
sBASE_64_CHARACTERS = strUnicode2Ansi(sBASE_64_CHARACTERS)

Function strUnicodeLen(asContents)
'计算unicode字符串的Ansi编码的长度
asContents1="a"&asContents
len1=len(asContents1)
k=0
for i=1 to len1
asc1=asc(mid(asContents1,i,1))
if asc1<0 then...[ 查看全文 ]

2016-01-29 标签:

base64编码、解码函数的相关文章

手机页面
收藏网站 回到头部