(vl-file-copy)如何使用“通配符”

aicr317 · 发表于 2009-10-30 09:12:00

假定
(setq bb "d:\\") D盘下有4个txt文件，分别为1.TXT 2.TXT 3.TXT 4.TXT

如何用(vl-file-copy)将4个文件复制到其他路径

(VL-FILE-COPY (STRCAT BB "*.txt") "d:\\CAD二次开发\\*.TXT")

aicr317 · 发表于 2009-10-30 10:57:00

研究了一下还是有收获的

(SETQ LIST (VL-DIRECTORY-FILES BB "*.txt"))

(foreach n list (VL-FILE-COPY (STRCAT BB n) (STRCAT "D:\\CAD二次开发\\" n)))

我爱lisp · 发表于 2014-4-18 08:17:18

foreach 也算是lisp精髓函数之一了，可是还没有敢用过

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

[基础] (vl-file-copy)如何使用“通配符”