Dim Fs, bSkinURL, SkinFolder, FolderCollection Set Fs = Server.CreateObject("Scripting.FileSystemObject") bSkinURL = Server.MapPath("..") & "/Skin" Set SkinFolder = Fs.GetFolder(bSkinURL) Set FoderCollection = SkinFolder.SubFolders For EACH Folder IN FoderCollection%> ">
'폴더' 태그의 글 목록