如何解决base64 字符串到 XML 的性能问题
我正在使用下面的 VBA 代码将 base64 解码为 XML。它有效,但仅适用于小尺寸的 base64 字符串。对于长字符串,我该如何改进它?
Function f_textBase64Decode(strBase64)
Dim b
With CreateObject("Microsoft.XMLDOM").createElement("b64")
.DataType = "bin.base64": .Text = strBase64
b = .nodeTypedValue
With CreateObject("ADODB.Stream")
.Open: .Type = 1: .Write b: .Position = 0: .Type = 2: .Charset = "utf-8"
f_textBase64Decode = .ReadText
.Close
End With
End With
End Function
版权声明:本文内容由互联网用户自发贡献,该文观点与技术仅代表作者本人。本站仅提供信息存储空间服务,不拥有所有权,不承担相关法律责任。如发现本站有涉嫌侵权/违法违规的内容, 请发送邮件至 dio@foxmail.com 举报,一经查实,本站将立刻删除。