<%
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>
'asp' 카테고리의 다른 글
ASP SQL Injection 방어 함수 (0) | 2021.05.16 |
---|---|
캐릭터셋이 달라 한글 깨질대 multipart/form-data (0) | 2015.03.05 |
VB EncodeDecode (0) | 2014.07.25 |
접속자 UA 값 처리 (0) | 2014.01.23 |
64비트 윈도우서버 DLL 컴포넌트 오류 (0) | 2013.11.07 |