如何改变输出编码

例如图片可以转换成Base64编码
ExportString[
ExportString[
Image[{{{0, 0.6, 0}, {0.4, 0.1, 0.8}, {0.7, 0.9, 0.7}}, {{1, 0,
0.9}, {0.6, 0.6, 1}, {1, 0.8, 0.3}}}, ColorSpace -> "RGB"],
"PNG"], "Base64"]
ImportString[%, "Base64"]
那么一个UTF8的文本文件如何转换成Base64编码

终于不太完美的解决了
((WriteString[#, "中文zh"]; Close@#) &@
OpenWrite[#, CharacterEncoding -> "UTF8"];
ExportString[ReadString@#, "Base64"]) &@"E:/test.txt"
主要用ReadString把文件转为字符串
如果再把Base64解码回来mma会出问题
可以去一些解码网站解码,例如: http://base64.xpcha.com/

这样也可以强制用CP936编码方式生成base64编码
ExportString["中文zh", {"Base64", "Text"}, CharacterEncoding -> "CP936"]
问题圆满解决