如何改变输出编码

问题升级
字符串转Base64再转回字符串 ImportString[ExportString["中文zh", "Base64"], "Base64"]
Base64在处理字符串的时候使用平台的缺省编码方式
使用UTF-8或者GB2312，而这两种编码方式生成的base64编码是不同的
这样，若果A平台的编码方式是UTF-8，B平台是GB2312，那么在A上用Base64编码的的字符串在B平台上解码就是乱码
如何强制在base64的时候使用UTF-8 ?

例如图片可以转换成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"]
问题圆满解决