用法
评论
建议
取 消
确 定
(defun vectra:directory-make (folder / folders cur) (setq folder (vl-string-trim "\\/" folder) folders (vectra:string-tokenize folder "\\/") cur (car folders) folders (cdr folders)) (foreach e folders (setq cur (strcat cur "\\" E)) (IF (NULL (VL-FILE-DIRECTORY-P CUR)) (VL-MKDIR CUR))))
函数库使用说明
应用包
技术支持
统计信息
函数库规模: 747 个
函数库类别: 52 种
上传记录
刷新