怎样将引号(")用write-line写入文件?

真龙天子 · 发表于 2018-8-4 13:10:06

马上注册，结交更多好友，享用更多功能，让你轻松玩转社区。

您需要登录才可以下载或查看，没有账号？立即注册

×

本帖最后由真龙天子于 2018-8-4 13:11 编辑

怎样将下行括号中的内容用write-line写入文件中的同一行?
(abcd"efg"hijk;)
我用 (write-line "abcd"efg"hijk;" fp)
运行时提示错误:参数太多.原因就是字符串里有"号,请问可通过何种方法解决?

Lisphk · 发表于 2018-8-4 13:49:59

本帖最后由 Lisphk 于 2018-8-4 13:51 编辑

" " 之间的是字符串

你这个 "abcd"efg"hijk;" 算什么呢？
把里面的"用 \" 或者 ' 替换下看看

真龙天子 · 发表于 2018-8-4 14:41:16

本帖最后由真龙天子于 2018-8-4 14:42 编辑

不能替换,只能用"号把efg与前后字符隔开,就是说怎么把"写入的问题.

Lisphk · 发表于 2018-8-4 14:52:45

真龙天子发表于 2018-8-4 14:41
不能替换,只能用"号把efg与前后字符隔开,就是说怎么把"写入的问题.

试过了吗？你就说不行

(defun c:tt ()
(setq a "afaf\"33\"faf")
(if (progn (setq fn (open "d:\\234.txt" "w"))
(write-a fn a)
(close fn)
)
)
(princ)
)

真龙天子 · 发表于 2018-8-4 21:31:27

谢谢Lisphk！刚才不理解，明天试试，有结果再向你汇报。

kqqt6236 · 发表于 2018-8-5 00:03:23

这样也可以。

真龙天子 · 发表于 2018-8-5 20:38:07

向Lisphk老师汇报，今天按老师的方法测试了，已成功。知道了用\说明紧跟其后的"为特殊字符，写进文件时就不会出错了，另外，不知何因，(write-a fn a)出错，要(write-line a fn)才行。

账号		自动登录	找回密码
密码			立即注册

[求助] 怎样将引号(")用write-line写入文件?

马上注册，结交更多好友，享用更多功能，让你轻松玩转社区。