디렉토리 목록 출력 fs.GetFolder
<%
Set fs = Server.CreateObject("Scripting.FileSystemObject")
Set folderObj = fs.GetFolder(Server.MapPath("."))
Set files = folderObj.Files
%>
<html>
<head>
<title> 파일 리스트 </title>
</head>
<body>
<h2><%'=Server.MapPath(".")%>디렉토리 목록</h2>
<table border="1" width="900" style="font-size:9pt;" cellpadding="2">
<tr>
<th>이름</th>
<th>크기</th>
<th>형식</th>
<th>생성 시각</th>
<th>마지막 엑세스 시간</th>
<th>마지막 수정 시간</th>
</tr>
<%
For Each file in files
%>
<tr>
<td><a href="<%=file.name%>"><%=file.name%></a></td>
<td><%=file.size%> byte</td>
<td><%=file.type%></td>
<td><%=file.DateCreated%></td>
<td><%=file.DateLastAccessed%></td>
<td><%=file.DateLastModified%></td>
</tr>
<%
Next
%>
</table>
</body>
</html>