[求助]想求助一个插入功能，能否实现

camwin

cad文件中有一列单行文字，windows文件夹下有文件名与这些文字一一对应的文件。

想框选这些文字后插入这个windows文件夹下的文件

不知道这个功能能否实现

请达人帮忙 谢谢

Gu_xl

3. ;;windows文件应在系统搜索目录下
4. (defun c:tt()
5. (setq ss (ssget '((0 . "text"))))
6. (if ss
7. (progn
8. (setq n 0)
9. (repeat (sslength ss)
10. (setq txt (cdr (assoc 1 (entget (ssname ss n)))))
11. (setq n (1+ n))
12. (command "i" txt '(0 0 0) 1 1 0)
13. )
14. )
15. )
16. )

;;windows文件应在系统搜索目录下 (defun c:tt() (setq ss (ssget '((0 . "text")))) (if ss (progn (setq n 0) (repeat (sslength ss) (setq txt (cdr (assoc 1 (entget (ssname ss n))))) (setq n (1+ n)) (command "i" txt '(0 0 0) 1 1 0) ) ) ) )

ZZXXQQ

command中的CAD命令不认缩写，要打全名。