以文本方式查看主题

-  Foxtable(狐表)  (http://foxtable.com/bbs/index.asp)
--  专家坐堂  (http://foxtable.com/bbs/list.asp?boardid=2)
----  请问狐表怎么将前端传过来的base64代码 来保存为图片  (http://foxtable.com/bbs/dispbbs.asp?boardid=2&id=144069)

--  作者:q1156741089
--  发布时间:2019/12/10 10:36:00
--  请问狐表怎么将前端传过来的base64代码 来保存为图片
请问狐表怎么将前端传过来的base64代码 来保存为图片
--  作者:q1156741089
--  发布时间:2019/12/10 10:38:00
--  
前端传过来的:
输出{"url1":"data:image/jpeg;base64,/9j/4AAQSkZJRgABAQAAAQABAAD/2wBDAA0JCgsKCA0LCgsODg0PEyAVExISEyccHhcgLikxMC4pLSwzOko+MzZGNywtQFdBRkxOUlNSMj5aYVpQYEpRUk//2wBDAQ4ODhMREyYVFSZPNS01T09PT09PT09PT09PT09PT09PT09PT09PT09PT09PT09PT09PT09PT09PT09PT09PT0//wAARCAFJ....

--  作者:有点蓝
--  发布时间:2019/12/10 10:46:00
--  
dim str as string = "base64字符串数据............."
Dim bs As Byte() = Convert.FromBase64String(str)
Dim stream As System.IO.Stream = New System.IO.MemoryStream(bs)
Dim bmp As System.Drawing.Bitmap = New System.Drawing.Bitmap(stream)
bmp.save("d:\\123.jpg")

--  作者:q1156741089
--  发布时间:2019/12/10 11:19:00
--  
不行呢,要报错。
图片点击可在新窗口打开查看此主题相关图片如下:捕获.jpg
图片点击可在新窗口打开查看

--  作者:q1156741089
--  发布时间:2019/12/10 11:21:00
--  
这个是前端传过来的base64
 下载信息  [文件大小:   下载次数: ]
点击浏览该文件:11.txt


--  作者:有点蓝
--  发布时间:2019/12/10 11:54:00
--  
上面文本里面有2张图片,需要逐个处理。

另外需要把"data:image/jpeg;base64,"这段标识符去掉
Dim bs As Byte() = Convert.FromBase64String(str.Replace("data:image/jpeg;base64,",""))

--  作者:q1156741089
--  发布时间:2019/12/10 14:34:00
--  
弄好了,谢谢