中国DOS联盟论坛

中国DOS联盟

-- 联合DOS 推动DOS 发展DOS --
联盟域名：www.cn-dos.net　论坛域名：www.cn-dos.net/forum
游客 | 登录 | 注册 | 会员 | 搜索 | 中国DOS联盟
中国DOS联盟论坛
现在时间是 2026-08-12 19:35 		共 47,811 主题排行 / 349,897 发帖 / 今日 0 篇 / 48,256 会员排行
DOS批处理 & 脚本技术（批处理室） » [求助]如何将txt文本文件的utf-8编码转换成unicode编码！！
可打印版本 　6,903 / 17
第1楼　moonofwell 发表于 2007-11-30 10:10
新手上路　发帖 6　积分 16
[求助]如何将txt文本文件的utf-8编码转换成unicode编码！！
如何将txt文本文件的utf-8编码转换成unicode编码！！

注：很多个文件，不能一个一个处理，得批量处理！！！
我想转换编码的目的是要用Excel直接打开txt文件，但是打开utf-8编码的文本会变成乱码，必须得转换成unicode编码的文本文件才行。可以用记事本打开文本文件，然后“另存为”时选择编码，但是文件太多，不能一个一个操作。看看哪个高手能解决这个问题！！！
第2楼　fastslz 发表于 2007-11-30 11:17
铂金会员　发帖 2,315　积分 5,493　来自 上海
第3楼　zh159 发表于 2007-11-30 11:32
金牌会员　发帖 1,467　积分 3,687
好像批处理并不能直接处理utf-8编码的文本
第4楼　moonofwell 发表于 2007-11-30 11:34
新手上路　发帖 6　积分 16
不行啊，运行之后，产生了几个.u格式的文件，用记事本打开也都是乱码，不是我想要的结果欧！！！高手再看看！！！
第5楼　fastslz 发表于 2007-11-30 11:35
铂金会员　发帖 2,315　积分 5,493　来自 上海
哦是吗我拿ANSI测试的
第6楼　moonofwell 发表于 2007-11-30 11:44
新手上路　发帖 6　积分 16
不行，编码要选择utf-8，我要转换的是utf-8到unicode。你用记事本随便写几句话，然后另存为，选择编码为：utf-f，保存
然后再运行你的程序，你看看吧。

[ Last edited by moonofwell on 2007-11-30 at 11:46 AM ]
第7楼　fastslz 发表于 2007-11-30 12:05
铂金会员　发帖 2,315　积分 5,493　来自 上海
既然zh159批处理并不能直接处理utf-8也就没办法了，借助第三方工具吧
第8楼　moonofwell 发表于 2007-11-30 12:11
新手上路　发帖 6　积分 16
第三方工具我找到了，ConvertZ ver 7.40 ，如果能用dos批处理或vbs搞定就更好了！！！（*^_^*）
第9楼　fastslz 发表于 2007-11-30 13:21
铂金会员　发帖 2,315　积分 5,493　来自 上海
UTF82Unicode.vbs
[code]
Set objArgs = WScript.Arguments
For I = 0 To objArgs.Count - 1
FileUrl = objArgs(I)
Call WriteToFile(FileUrl, ReadFile(FileUrl, "UTF-8"), "Unicode")
Next
Function ReadFile(FileUrl, CharSet)
Dim Str
Set stm = CreateObject("Adodb.Stream")
stm.Type = 2
stm.mode = 3
stm.charset = CharSet
stm.Open
stm.loadfromfile FileUrl
Str = stm.readtext
stm.Close
Set stm = Nothing
ReadFile = Str
End Function

Function WriteToFile (FileUrl, Str, CharSet)
Set stm = CreateObject("Adodb.Stream")
stm.Type = 2
stm.mode = 3
stm.charset = CharSet
stm.Open
stm.WriteText Str
stm.SaveToFile FileUrl, 2
stm.flush
第10楼　fastslz 发表于 2007-11-30 13:22
铂金会员　发帖 2,315　积分 5,493　来自 上海
UTF82Unicode.vbs


直接替换模式，请先测试后应用
第11楼　moonofwell 发表于 2007-11-30 13:30
新手上路　发帖 6　积分 16
可以了，多谢了哥们儿，真是高手阿！！！
第12楼　gameyixiu 发表于 2007-12-07 17:06
初级用户　发帖 18　积分 47
楼主是utf-8编码转换成unicode
而我的问题是：
如何将UTF-8转成ANSI
还有unicode如何转成ANSI

用批处理文件如何实现？
请高手解答
第13楼　fastslz 发表于 2007-12-07 20:54
铂金会员　发帖 2,315　积分 5,493　来自 上海
命令行GB2312,UTF-8,Unicode,BIG5...编码转换工具VBS版
http://www.cn-dos.net/forum/viewthread.php?tid=35986&fpage=1&highlight=

文本文件编码查询工具 QueryCode.vbs
http://www.cn-dos.net/forum/viewthread.php?tid=36012&fpage=1&highlight=
第14楼　gameyixiu 发表于 2007-12-10 15:43
初级用户　发帖 18　积分 47
谢谢楼上的

[ Last edited by gameyixiu on 2007-12-10 at 03:45 PM ]
第15楼　joson 发表于 2008-05-18 22:10
新手上路　发帖 1　积分 2
不错，学习中！
1 2 　下一页
[ 联系联盟系统管理团队 - 中国DOS联盟 - 标准版 ]
Sponsored by ifanr Inc | © 2001–2023