代码如下：; Z4 ^# `6 n" u, |0 j
(defun c:qsz ()" y+ j x$ x/ U |% I8 C0 y
(setq file_id (open "C:/Documents and Settings/Administrator/桌面/ss.txt" "w"))' Y+ B- |8 _: K, h
(repeat
, \, K3 `- k, a% p....中间省略取得的数值...& {! b( }) x8 C
(progn! g% `0 R6 O# i" Q* ], U8 f$ D
(setq k (+ k 1))
7 y* C. X' k) f/ { (write-line qdmj file_id)
( u3 T: ^2 G. w9 @; c )0 P" [: j, t7 J
)$ e$ [1 V5 y% X/ Y
(close file_id)
. K3 ?1 T- C& J5 i)
- R- d; c6 t0 h
}; d% S9 e( E& G9 H5 Y. tqdmj 为我取得的数值（princ 能显示出来）' R$ T4 p6 v$ @7 U( w5 X0 x: b
总是提示：错误: 参数类型错误: stringp% D7 s3 x% w$ a+ G5 r
无法将取得的数值写入到桌面的ss.text中! I/ f. {$ k8 {4 }8 t. z
另，请问下为什么我向ss.text写入数值老是会覆盖掉里面的数据，而不是在下面添加 |
发表于 2012-5-13 10:44