请问如何读入UTF-8编码文本文件中的汉字。

olenewman

以前都是ANSI编码，现在文本编码UTF-8编码，读入汉字就乱码。请问如何正确读入UTF-8编码文本文件中的汉字。

小菜

提供一个函数，应该差不多能满足

2. (defun read_txt_file_as_encoding (FileName encoding / bstr stream byxiaocai)
   
3.     ;;by 小菜 测试 (read_txt_file_as_encoding "f:\\test.txt" "utf-8")
   
4.     (setq stream (vlax-create-object "ADODB.Stream"))
   
5.     (vlax-put-Property stream 'type 2)
   
6.     (Vlax-Put-Property stream 'Charset encoding)
   
7.     (Vlax-Invoke stream 'open)
   
8.     (vlax-invoke-method stream 'LoadFromFile FileName)
   
9.     (setq bstr (Vlax-Invoke-Method stream 'readtext -1))
   
10.     (Vlax-Invoke-Method stream 'close)
    
11.     (vlax-release-object stream)
    
12.     bstr
    
13. )

(defun read_txt_file_as_encoding (FileName encoding / bstr stream byxiaocai)<br />     ;;by 小菜 测试 (read_txt_file_as_encoding "f:\\test.txt" "utf-8")<br />     (setq stream (vlax-create-object "ADODB.Stream"))<br />     (vlax-put-Property stream 'type 2)<br />     (Vlax-Put-Property stream 'Charset encoding)<br />     (Vlax-Invoke stream 'open)<br />     (vlax-invoke-method stream 'LoadFromFile FileName)<br />     (setq bstr (Vlax-Invoke-Method stream 'readtext -1)) <br />     (Vlax-Invoke-Method stream 'close)<br />     (vlax-release-object stream)<br />     bstr<br /> )

hh_lj007

顶一下，有什么解决办法吗

/db_自贡黄明儒_

听说记事本另存为。。下面 有一个选项，选择保存格式。

qqqincccken

有什么解决办法吗

hh_lj007

记事本另存是可行的，能否根据编码直接读取呢

mikewolf2k

hh_lj007 发表于 2022-5-12 09:10
记事本另存是可行的，能否根据编码直接读取呢

读取二进制，根据规则解析出字符。

hh_lj007

mikewolf2k 发表于 2022-5-17 09:56
读取二进制，根据规则解析出字符。

应该是可以的，就是懒得动

olenewman

谢谢楼上，我明天到单位看看。平板看不全。