asp中如何将 base64编码的数据解码为二进制数据

cniteeq 2009-08-17 10:04:39
asp中如何将 base64编码的图片解码为二进制数据,然后将这个图片显示在页面上
...全文
196 4 打赏 收藏 转发到动态 举报
AI 作业
写回复
用AI写文章
4 条回复
切换为时间正序
请发表友善的回复…
发表回复
wcwtitxu 2009-10-22
  • 打赏
  • 举报
回复
Function DecodeBase64(str)
With CreateObject("Microsoft.XMLDOM").createElement("TXT")
.dataType = "bin.base64"
.text = str
DecodeBase64 = .nodeTypedValue
End With
End Function

Function EncodeBase64(dt)
With CreateObject("Microsoft.XMLDOM").createElement("TXT")
.dataType = "bin.base64"
.nodeTypedValue = dt
EncodeBase64 = .text
End With
End Function
lzp4881 2009-10-19
  • 打赏
  • 举报
回复
自 由 颂

林昭


生命似嘉树,爱情若丽花;
自由昭临处,欣欣迎日华。
生命巍然在,爱情永无休;
愿殉自由死,终不甘为囚。
mahui19780126 2009-08-18
  • 打赏
  • 举报
回复
写程序改要下载控件。用photoshop改好,再传上去。
hookee 2009-08-17
  • 打赏
  • 举报
回复
组件下载: http://www.chakucun.com/Base64Lib.zip

<img src="test.asp">
test.asp

<%
s = "R0lGODlhCgAKAIAAAEqxNQAAACH5BAAAAAAALAAAAAAKAAoAAAIIhI+py+0PYysAOw=="
Set obj = CreateObject("Base64Lib.Base64Codec")
Response.BinaryWrite obj.Decode(s,0)
Set obj = Nothing
%>

28,409

社区成员

发帖
与我相关
我的任务
社区描述
ASP即Active Server Pages,是Microsoft公司开发的服务器端脚本环境。
社区管理员
  • ASP
  • 无·法
加入社区
  • 近7日
  • 近30日
  • 至今
社区公告
暂无公告

试试用AI创作助手写篇文章吧