autolisp读取文本文档后再写到另一个文档会出现乱码，求助解决办法
(defunC:fff();(setvar"cmdecho"0);(setvar"blipmode"0)(setqf1(open"11.daT""r"));;打开并读取文...
(defun C:fff ()
;(setvar "cmdecho" 0)
;(setvar "blipmode" 0)
(setq f1 (open "11.daT" "r")) ;;打开并读取文件
(setq data (read-line f1))
(setq f2 (open "22.dat" "w")) ;;打开并读取文件
(PRINC DATA f2);这一行可以正常显示
(setq aa (ascii (substr data 1 1)))
(princ aa f2) ;这一个就是显示乱码
(close f2)
(close f1)
) 展开
;(setvar "cmdecho" 0)
;(setvar "blipmode" 0)
(setq f1 (open "11.daT" "r")) ;;打开并读取文件
(setq data (read-line f1))
(setq f2 (open "22.dat" "w")) ;;打开并读取文件
(PRINC DATA f2);这一行可以正常显示
(setq aa (ascii (substr data 1 1)))
(princ aa f2) ;这一个就是显示乱码
(close f2)
(close f1)
) 展开
1个回答
展开全部
不要同时打开两个文档，先读取，关闭了，然后再打开另一个文档写入。
已赞过
已踩过<
评论
收起
你对这个回答的评价是？
推荐律师服务：
若未解决您的问题，请您详细描述您的问题，通过百度律临进行免费专业咨询
