prueba este código
<%
Set MyDirectory=Server.CreateObject("Scripting.Fi leSystemObject")
Set MyFiles=MyDirectory.GetFolder(Server.MapPath(" ;/
tu_directorio "))
For each filefound in MyFiles.files
%>
<a href="<%=filefound.Name%>">< %=filefound.Name%></a><br>
<%
Next
%>
espero funcione
<center>
<table width="100%">
<tr>
<td bgcolor="black"><p align="center"><font face="arial" Size="2" color="#FFFFFF">
Siempre Listo Para Servir<br> Aguascalientes, México[/CODE]
</td>
</tr>
</table>