<%
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>