以文本方式查看主题 - Foxtable(狐表) (http://foxtable.com/bbs/index.asp) -- 专家坐堂 (http://foxtable.com/bbs/list.asp?boardid=2) ---- 有没有办法实现base64编码在显示之前 进行判断呢 如果是图片类型就显示在图片控件里 如果是文件就显示在web浏览控件里 反之是压缩文件就直接打开 (http://foxtable.com/bbs/dispbbs.asp?boardid=2&id=175468) |
-- 作者:cnsjroom -- 发布时间:2022/3/5 23:03:00 -- 有没有办法实现base64编码在显示之前 进行判断呢 如果是图片类型就显示在图片控件里 如果是文件就显示在web浏览控件里 反之是压缩文件就直接打开 用代码把文件转换为base64 Dim data() As Byte = System.IO.File.ReadAllBytes("d:\\79.txt") \'把文件字节流加载进来,
下面的代码可以实现图片base64编码转图片并显示 有没有办法实现base64编码在显示之前 进行判断呢 如果是图片类型就显示在图片控件里 如果是文件就显示在web浏览控件里 反之是压缩文件就直接打开 Dim bs As Byte() = Convert.FromBase64String(s)
Dim stream As System.IO.Stream = New System.IO.MemoryStream(bs)
Dim bmp As System.Drawing.Bitmap = New System.Drawing.Bitmap(stream)
Dim pbx As WinForm.PictureBox = Forms("窗口1").Controls("PictureBox1
pbx.Image = bmp
Dim wj As ……
Dim wb As WinForm.WebBrowser = Forms("窗口1").Controls("WebBrowser1") wb.Address = wj |
-- 作者:爱好所有 -- 发布时间:2022/3/6 16:24:00 -- 你可以在文件转换时加个先加个文件类型列呀 |
-- 作者:有点蓝 -- 发布时间:2022/3/6 20:57:00 -- 判断文件扩展名,.txt就是文本,.jpg之类的就是图片,......... |
-- 作者:cnsjroom -- 发布时间:2022/3/6 22:02:00 -- 回复:(有点蓝)判断文件扩展名,.txt就是文本,.jpg... 怎么判断呢?是在加密之前就定义文件属性?还是直接解密base64代码之后判断呢? 老师可否举个例子呢 谢谢! |
-- 作者:有点蓝 -- 发布时间:2022/3/6 22:31:00 -- 既然数据是存储在记事本里的,可以在里存储任何自己需要的东西把,比如文件类型,文件名称,扩展名................ |
-- 作者:cnsjroom -- 发布时间:2022/3/7 9:48:00 -- 回复:(有点蓝)判断文件扩展名,.txt就是文本,.jpg... 请教一下老师 是在进行base64加密之前就判断么?还是在加密的同时就写入文件类型,然后解密后先去判断文件类型 在选择打开方式呢? |
-- 作者:有点蓝 -- 发布时间:2022/3/7 9:58:00 -- 还是在加密的同时就写入文件类型 |