VBS 는 현재 디 렉 터 리 에 있 는 모든 폴 더 이름 의 코드 를 가 져 옵 니 다.

VBS 는 하위 폴 더 를 포함 하지 않 고 현재 디 렉 터 리 의 모든 폴 더 이름 을 가 져 옵 니 다.나 는 모든 폴 더 를 조작 하려 고 하기 때문에 순환 으로 출력 하 는 것 이 가장 좋다.테스트 할 때 현재 디 렉 터 리 에 폴 더 가 있어 야 합 니 다.그렇지 않 으 면 출력 이 비어 있 습 니 다.

Set ws=WScript.CreateObject("wscript.shell")
w=ws.CurrentDirectory
Set fso=WScript.CreateObject("scripting.filesystemobject")
Set fs=fso.GetFolder(w)
Set f=fs.SubFolders
For Each uu In f
t=t & uu.Path & vbcrlf
Next
MsgBox t

효과 그림: