如何通过lsp创建一个文件夹?如何在lsp中遍历所有文件?

ljcgq · 发表于 2004-2-2 23:29:00

我希望通过lsp能实现在硬盘上创建一个文件夹,有可实现的函数么?
怎么遍历文件夹里的所有文件?

zshqd · 发表于 2004-2-3 11:48:00

最简单的 vl-mkdir

BDYCAD · 发表于 2004-2-3 12:02:00

樓主的 "怎么遍历文件夹里的所有文件?" 指的是如何得到指定文件夾里的文件列表嗎? 如果是用 (VL-Directory-Files) 涵數可以取得.
例如:
(SetQ FINDC (Cdr (Cdr (VL-Directory-Files "C:")))) ;列出C盤所有文件列表

ljcgq · 发表于 2004-2-3 18:32:00

谢谢你们的帮助，我希望能顺次遍历文件夹里的每一个文件名，