VL-directory-files (디렉토리내에 모든 파일을 리스트화)

Auto CAD/lisp|2019. 4. 4. 12:32

(vl-directory-files [directory pattern directories])

해당 디렉토리내에 모든 파일을 리스트화 해줍니다.^^

오잉 함수명빼고 전부 생략이 가능하네여

 

 

directory : 디렉토리 이름입니다. 즉.. "E:/도움말" 이런형식 (생략되면 현제도면의 디렉토리)

pattern : 폴더 검색할때 를 생각하시면됩니다. "*" 모든파일 "*.dwg" dwg 파일만 찾아서...

             생략되면 "*" 모든 파일입니다.

directories : 해당 리스트화를 할때 아래의 사항을 참고합니다.

 

                  - 1 디렉토리 리스트만 

                    0 파일 및 디렉토리 리스트(기본값) 

 

                    1 파일 리스트만

 

Example

 

_$ (vl-directory-files)

("." ".." "Common" "CPDefault17.dwt" "DynBlock" "Image" "Info" "mbs.db" "패치")

;; 활성화면 도면의 폴더내에서 가져옵니다. 확장자가 없는건 폴더겠져.^^

 

_$ (vl-directory-files "E:/도움말")

("." ".." "2010-acadauto(vba).chm" "2010-acad_alr(AutoLISP).chm" "acadauto(vba-한글).chm" "acad_dxf.chm" "acad_vlr.chm")

;;  주소를 넣으면 해당 주소안에있는 파일 이름을 가져옵니다.

 

_$ (vl-directory-files "E:/도움말" "acad*.*")

("acadauto(vba-한글).chm" "acad_dxf.chm" "acad_vlr.chm")

;; 해당 디렉토리안에서 검색을 해서 가져오게 됩니다.

 

_$ (vl-directory-files "E:/도움말" "*")

("." ".." "2010-acadauto(vba).chm" "2010-acad_alr(AutoLISP).chm" "acadauto(vba-한글).chm" "acad_dxf.chm" "acad_vlr.chm")

;;  뒤에 숫자가 없다면 생략이니 기본값은 0 입니다. 0일때는 디렉토리 및 파일을 다 가져오네여.

 

_$ (vl-directory-files "E:/도움말" "*" -1)

("." "..")

;; -1 이니 파일을 다 버리고 디렉토리만 가져오네여.^^

 

_$ (vl-directory-files "E:/도움말" "*" 1)

("2010-acadauto(vba).chm" "2010-acad_alr(AutoLISP).chm" "acadauto(vba-한글).chm" "acad_dxf.chm" "acad_vlr.chm")

;; 1 이니 파일리스트만 가져옵니다.^^

 

출처 : 아키모아  행복한 하루  http://cafe.daum.net/archimore/IP9e/26

 

 

 

댓글()