Base64和图片的相互转换

import sun.misc.BASE64Decoder;
import sun.misc.BASE64Encoder;

import java.io.*;

public class ImageBase64Converter {
    /**
     * 本地文件(图片、excel等)转换成Base64字符串
     *
     * @param imgPath     
     */
    public static String convertFileToBase64(String imgPath) {
        byte[] data = null;
        // 读取图片字节数组
        try {
            InputStream in = new FileInputStream(imgPath);
            System.out.println("文件大小(字节)="+in.available());
            data = new byte[in.available()];
            in.read(data);
            in.close();
        } catch (IOException e) {
            e.printStackTrace();
        }
        // 对字节数组进行Base64编码,得到Base64编码的字符串
        BASE64Encoder encoder = new BASE64Encoder();
        String base64Str = encoder.encode(data);
        return base64Str;
    }

    /**
     * 将base64字符串,生成文件
     */
    public static File convertBase64ToFile(String fileBase64String, String filePath, String fileName) {

        BufferedOutputStream bos = null;
        FileOutputStream fos = null;
        File file = null;
        try {
            File dir = new File(filePath);
            if (!dir.exists() && dir.isDirectory()) {//判断文件目录是否存在
                dir.mkdirs();
            }

            BASE64Decoder decoder = new BASE64Decoder();
            byte[] bfile = decoder.decodeBuffer(fileBase64String);

            file = new File(filePath + File.separator + fileName);
            fos = new FileOutputStream(file);
            bos = new BufferedOutputStream(fos);
            bos.write(bfile);
            return file;
        } catch (Exception e) {
            e.printStackTrace();
            return null;
        } finally {
            if (bos != null) {
                try {
                    bos.close();
                } catch (IOException e1) {
                    e1.printStackTrace();
                }
            }
            if (fos != null) {
                try {
                    fos.close();
                } catch (IOException e1) {
                    e1.printStackTrace();
                }
            }
        }
    }

}

 

  • 0
    点赞
  • 1
    收藏
    觉得还不错? 一键收藏
  • 0
    评论
### 回答1: VB6.0中可以实现图片base64格式的相互转换。 将图片转换base64格式,可以先将图片读入到程序中,再使用Base64编码将其转换为字符串形式。具体实现如下: 1. 首先需要引用Microsoft ActiveX Data Objects库,即在工具栏菜单-项目-引用中勾选“Microsoft ActiveX Data Objects X.X Library”。 2. 读取图片到程序中,可以使用FileSystemObject对象的OpenTextFile方法实现。代码如下: Dim fs As Object Dim f As Object Dim s As String Set fs = CreateObject("Scripting.FileSystemObject") Set f = fs.OpenTextFile("C:\test.jpg", 1) '1表示只读模式 s = f.ReadAll f.Close 3. 将读取到的图片数据进行Base64编码处理,可以使用Microsoft.XMLDOM对象的transformNodeToObject方法,代码如下: Dim xmlDoc As Object Dim objNode As Object Dim outStream As Object Set xmlDoc = CreateObject("MSXML2.DOMDocument") Set objNode = xmlDoc.createElement("myNode") objNode.DataType = "bin.base64" objNode.nodeTypedValue = Stream_ImageRead("C:\test.jpg") '将读取到的图片数据传递进去 xmlDoc.appendChild objNode Set outStream = CreateObject("ADODB.Stream") outStream.Type = adTypeText outStream.Charset = "utf-8" outStream.Open xmlDoc.transformNodeToObject objNode, outStream s = outStream.ReadText outStream.Close 4. 最终得到的s就是图片base64编码字符串。 将base64格式的字符串转换图片,可以使用ADODB.Stream对象的LoadFromFile方法将base64字符串转换为二进制数据,再使用SaveToFile方法将二进制数据保存为图片文件。代码如下: Dim objStream As Object Set objStream = CreateObject("ADODB.Stream") objStream.Type = adTypeBinary objStream.Open objStream.Write Replace(s, "data:image/jpeg;base64,", "") '将base64字符串中的头部去掉 objStream.SaveToFile "C:\test.jpg", adSaveCreateOverWrite objStream.Close 以上就是VB6.0中图片base64格式的相互转换实现的方法。 ### 回答2: 在VB6.0中,需要将图片转换Base64编码格式时,可以使用以下步骤: 1. 将图片文件打开并读取到内存中,使用FilesystemObject对象来处理文件操作。 2. 使用ADODB.Stream对象将图片读取到二进制(Byte)数组中。 3. 将二进制数组转换Base64编码格式,可以使用MSXML2.DOMDocument对象来进行编码处理。 4. 将Base64编码后的字符串输出或者存储到需要的地方。 以下是一个VB6.0示例代码: ``` '打开图片文件 Dim fs As New FileSystemObject Dim fso As File Set fso = fs.GetFile("C:\test.jpg") '将图片文件读取到二进制数组中 Dim stream As New ADODB.Stream stream.Type = adTypeBinary stream.Open stream.LoadFromFile fso.Path Dim buffer() As Byte ReDim buffer(stream.Size - 1) stream.Read buffer '将二进制转换Base64编码 Dim dom As New MSXML2.DOMDocument Dim elemBin As IXMLDOMElement Dim elemText As IXMLDOMText Set elemBin = dom.createElement("bin") elemBin.DataType = "bin.base64" elemBin.nodeTypedValue = buffer Set elemText = dom.createTextNode(elemBin.Text) Dim base64Str As String base64Str = elemText.Text '输出Base64字符串 MsgBox base64Str ``` 这个过程需要注意的是:大文件不能一次全部读入内存中,需要采用流方式处理。另外,还需要注意编码格式、块处理、格式化等问题。 ### 回答3: VB6.0是一种广泛应用于Windows平台上的编程语言,它可以轻松实现图片base64相互转换Base64是一种将二进制数据编码成ASCII字符的方法,通常用于在网络中传输图片、音频等二进制数据。在VB6.0中,可以通过以下方式将图片转换base64编码: 1.将图片读取为二进制数据: Dim b() As Byte Open "C:\image.jpg" For Binary As #1 ReDim b(LOF(1) - 1) Get #1, , b Close #1 2.使用Microsoft.XMLDOM对象来生成base64编码: Dim xmlDoc As Object Set xmlDoc = CreateObject("Microsoft.XMLDOM") xmlDoc.LoadXML "<root/>" xmlDoc.DocumentElement.DataType = "bin.base64" xmlDoc.DocumentElement.NodeTypedValue = b Base64String = xmlDoc.DocumentElement.Text 如果想要将已经编码为base64的数据转换回原始图片数据,也可以通过以下方式实现: 1.将base64字符串转换为二进制数据: Dim b() As Byte b = StrConv(Base64String, vbFromUnicode) b = DecodeBase64(b) 其中,DecodeBase64是一个自定义函数,用于将base64字符串解码为二进制数据。 2.将二进制数据保存为图片文件: Open "C:\image.jpg" For Binary As #1 Put #1, , b Close #1 综上所述,通过VB6.0可以轻松地实现图片base64相互转换
评论
添加红包

请填写红包祝福语或标题

红包个数最小为10个

红包金额最低5元

当前余额3.43前往充值 >
需支付:10.00
成就一亿技术人!
领取后你会自动成为博主和红包主的粉丝 规则
hope_wisdom
发出的红包
实付
使用余额支付
点击重新获取
扫码支付
钱包余额 0

抵扣说明:

1.余额是钱包充值的虚拟货币,按照1:1的比例进行支付金额的抵扣。
2.余额无法直接购买下载,可以购买VIP、付费专栏及课程。

余额充值