如何用Lisp在程序中创建文件夹？

zpsheng

如何用Lisp在程序中创建文件夹？

bud

(vl-load-com)
(setq FSO (vlax-create-object "Scripting.FileSystemObject"))
(vlax-invoke FSO "CreateFolder" 文件夹名)

无痕

vl-mkdir Function

Creates a directory

(vl-mkdir directoryname)

Arguments

directoryname

The name of the directory you want to create.

Return Values

T if successful, nil if the directory exists or if unsuccessful.

Examples

Create a directory named mydirectory:

_$ (vl-mkdir "c:\\mydirectory")

T

HuaiYu

请问 无痕 兄，我怎么没有找到这个函数呢??

我想知道你是怎么 find this function ??

授人以鱼，不如授人以渔 嘛。

BDYCAD

先在前面來一句

(vl-load-com) 就有了

无痕

HuaiYu发表于2005-11-8 21:34:00 请问 无痕 兄，我怎么没有找到这个函数呢?? 我想知道你是怎么 find this functi...

cad帮助里面都有

找vlisp参考

773786668

顶一下，马克

zml84

逐级  vl-mkdir ，即可