社区 › AutoLISP/Visual LISP 编程技术 › 询问读取文本文件内容的方法（lisp编程）

toply13 发表于 2008-4-20 17:21:00

询问读取文本文件内容的方法（lisp编程）

<p>有一个文本文件内容如下</p><p>1，2133，4645</p><p>2，123123，4564</p><p>。。。。。</p><p>请问如何将文件最后一行的某个数字赋值给变量？ 例如 a＝2&nbsp;&nbsp;&nbsp; b＝4564</p><p>请各位高手指教，谢谢。</p>

addp124 发表于 2023-3-5 11:08:13

学习下，用得上上功能

xujie1234 发表于 2022-8-6 11:31:09

学习下，用得上上功能

喝汤小王子 发表于 2020-11-17 14:04:33

看不到，回复一下

ZZXXQQ 发表于 2008-4-20 18:57:00

(defun c:tt ()
(setq nm (if nm nm ""))
(if (setq nm (getfiled "选择文件" nm "*" 2)) (progn
(setq fp (open nm "r"))
(while (setq s1 (read-line fp)) (setq s2 s1))
(setq s2 (substr s2 4) tmp "" i 1)
(while (/= (setq s (substr i 2)) "，")
   (setq tmp (strcat tmp (substr s 1 1)) i (1+ i))
)
(setq a (read tmp)
      b (read (substr s2 (+ i 2))))
))
(princ)
)

toply13 发表于 2008-4-21 18:54:00

<p>谢谢版主～～～～～～呵呵&nbsp;&nbsp; 我马上去试试！</p>

willimit 发表于 2008-5-17 21:19:00

<p>不知道版主写了些什么,支持下</p>

yitian519 发表于 2008-11-25 23:47:00

<p>急用，谢谢了。。。。</p>

yitian519 发表于 2008-11-25 23:57:00

<p>好好研究中</p>

yitian519 发表于 2008-11-25 23:58:00

还差最后一贴。。

wuxuloveguo 发表于 2008-11-26 08:46:00

这样也能灌水!晕!这样的好象斑竹发过以前!

amen1981628 发表于 2008-11-27 20:57:00

呵呵想看看

lhqls 发表于 2009-6-7 17:04:00

shui灌水啊 啊啊啊啊啊啊啊啊啊啊啊

查看完整版本: 询问读取文本文件内容的方法（lisp编程）