浏览模式: 普通 | 列表
9月, 2015 | 1

获取到base64数据,然后转换成图片

[ 2015-09-04 15:31:30 | 作者: admin ]
获取到base64数据,转换成图片
<%
Subfolder=year(now)&month(now)&day(now)&hour(now)&minute(now)&second(now()) ''生成当天的子文件夹的名称
picture=Trim(request.Form("urls"))
picture=replace(picture,"data:image/png;base64,","")
path=Subfolder&".jpg"
xmlstr="<data>"&picture&"</data>"
Dim xml : Set xml=Server.CreateObject("MSXML2.DOMDocument")
Dim stm : Set stm=Server.CreateObject("ADODB.Stream")
xml.resolveExternals=False
...

阅读全文…
1