我读取的文本文件的汉字全都成乱码了，请大家指点！

walong

我读取的文本文件的汉字全都成乱码了，请大家指点！

art.txt的文件
-------------------------------------------------------------------------------------
其余应符合 GB/T17587.3-1998 P5 级精度的要求。
滚珠丝杆部分 G58。
XXX处标记厂标 -1# 。
滚珠丝杆节圆尺寸变动量允差 0.011mm 。
禁用砂纸抛光零件表面化。
--------------------------------------------------------------------------------------
通过如下读取：
  (setq art_file "C:\\Program Files\\AutoCAD 2002\\lsptools\\gongyi\\art\\art.txt")
  (setq ff (open art_file "r"))
  (setq data(read-line ff))
  (while data
    (setq data_list (cons data data_list))
    (setq data(read-line ff))
  )
  (setq data_list (reverse data_list))
  (close ff)

结果查到的 !data_list 成了

("绂佺敤鐮傜焊鎶涘厜闆朵欢琛ㄩ潰鍖栥

前生

删除了.

spring

;;;試試看這個
(defun c:QQ ()
  (setq fi "C:\\Program Files\\AutoCAD 2002\\lsptools\\gongyi\\art\\art.txt")
      (setq fel (list))
      (setq pe (open fi "r"))
      (setq en T)
      (while (/= en nil)
        (progn (setq en (READ-LINE pe))
               (setq fel (cons en fel))
        )
      )
      (close pe)
      (setq kic (reverse (cdr fel)))
)

walong

前生发表于2003-7-21 18:22:00删除了.

那不就什么都没有了吗？
晕倒！

spring

前生发表于2003-7-21 18:22:00删除了.

為甚麼要刪除????

walong

spring谢谢你的解答，不过还是不行，你的代码和我的有什么区别吗，原理是差不多的。

walong

也讲不清是为什么，我重建了个TXT文件，就不乱码了。

前生

spring发表于2003-7-21 22:53:00以下是引用前生在2003-7-21 18:22:06的发言：
删除了.

為甚麼要刪除????
[/quote]