2007-04-23

关于bin.base64和bin.hex和urlencode的编码比较及ASP解码

来源: sipo 作者:sipo 评论 0 条
  源文件是UTF8编码,长度44907
经过bin2hex编码得到长度90882
经过base64_encode编码得到长度60588
经过urlencode编码得到长度76909

以上可以看出,base64编码相对于其他编码来说都小,官方说,这种编码数据量大33%,有爱好的可以算算是不是。
因此base64在网络传输编码中应用的最广泛。

谈谈解码。
按照普通的思路做ASP解码很复杂的(其他语言就一个函数,这就是我们为什么要放弃asP的原因)
想想有没有什么变通的方法?
用XMLDOM!

Dim objXmlFile,objXmle
Set objXmlFile = Server.CreateObject("Microsoft.XMLDOM")
objXmlFile.loadXML("<r xmlns:dt=""urn:schemas-microsoft-com:datatypes""><e dt:dt=""bin.hex"">"&STR&"</e></r>")
'http://www.dc9.cn 'sipo 2007-4-11制作
Set objXmle=objXmlFile.documentElement.selectSingleNode("e")
Call SaveToFileBin(BlogPath & newEspamFile ,objXmle.nodeTypedvalue)

Function SaveToFileBin(p,c)
Dim objStream
Set objStream = CreateObject("ADODB.Stream")
With objStream
.Type = 1
.Mode = 3
.Open
.Write c
.SaveToFile p,2
.Close
End With
Set objStream = Nothing
SaveToFileBin=True
End Function



上面的bin.hex换成bin.base64就可以解base64的了
这比写一大堆云山雾罩的函数简单多了吧?


(本文仅表明作者个人观点,不代表本站及其管理员立场.) 推荐 收藏 投稿 打印 返回 关闭
上一篇:asp简单的ajax留言板(采用三层模式)  
下一篇:旧技新学:十天学会ASP之第一天
    评论加载中…
 推荐文章
     

网站首页  -  网站地图 -   站长论坛  -  网站投稿  -    -  网站管理
Copyright © 2008 芜湖站长站 All Rights Reserved 皖ICP备07500611号