查看单个帖子
旧 2009-04-26, 05:21 PM   #1
yang686526
高级会员
 
注册日期: 06-11
帖子: 14579
精华: 1
现金: 224494 标准币
资产: 234494 标准币
yang686526 向着好的方向发展
默认 关于数据写入问题的求助

关于数据写入问题的求助
www.dimcax.com
关于数据写入问题的求助
我有一个autolisp程序,要做多次循环计算,我想将每次计算的结果都逐行的写入一个文件中,但我现在用write-line写入的只是最后一次计算的一个数据,同样的问题,如何把所有的行都读出。请问该如何写语句实现?

写入已经解决了,但把数据全部读出来还没有解决。

(setq fp (open "yourfile" "r"))
(while (setq str (read-line fp))
(terpri) (princ str)
)

去下载个vb手册,系统自带也可以查查,vbe里就有

不好意思 看错了 你用的是lisp

谢谢andyes的语句,不过我想一次全部导出,因为我还要使用这些数据。但还是再次谢谢你!

(setq fp (open "yourfile" "a"))
可以添加原文件的末尾
progress every day!!!
yang686526离线中   回复时引用此帖
GDT自动化论坛(仅游客可见)