[提问] 图片转B64的办法,求教 [复制链接]

紫猫插件里面有现成的 山海插件也有 直接搜索base64 应该就可以找到

用插件的时候可能会有些小问题 比如 + 和 *号的问题 自己注意 需要替换的时候替换下就可以使用了 现在你可能不明白我说的 等你遇到这个问题的时候 你就明白了

,

电脑版有吗?

紫猫插件要比山海插件的转换速度快

,

Function ImageToBase64(图片路径)
Const adTypeBinary = 1
Dim stream, xmlDoc, node
Set stream = CreateObject("ADODB.Stream")
stream.Type = adTypeBinary
stream.Open
stream.LoadFromFile 图片路径
binaryData = stream.Read
Set xmlDoc = CreateObject("MSXML2.DOMDocument")
Set node = xmlDoc.createElement("b64")
node.DataType = "bin.base64"
node.nodeTypedValue = binaryData
ImageToBase64 = node.Text
stream.Close
End Function 有问题可以直接私信我，这是别人的帖子 我基本是看不到的，这就是电脑按键可以用的一个图片转B64的功能，直接调用就可以 传参是图片的路径