Hola Joakin2...
Solo tendrias que eliminar el Server.Mappath en el script, puesto que esa instruccion hace referencias a los archivo donde esta alojado el archivo que estas ejecutando.. en este caso los archivos donde esta el test.asp...
Prueba colocar asi...
<%
'***************** File
Set fso = CreateObject("Scripting.FileSystemObject")
Set folder = fso.GetFolder(("C:\Documents and Settings\Power Station\Mis documentos"))
Set files = folder.Files
For Each file in Files
Response.Write file.Name & "<BR>"
Next
Set files = folder.Files
Set file = Nothing
Set fso = Nothing
%>
O como tu quieras segun sea tu directorio......
<%
'***************** File
Set fso = CreateObject("Scripting.FileSystemObject")
Set folder = fso.GetFolder(("C:\Mis documentos"))
Set files = folder.Files
For Each file in Files
Response.Write file.Name & "<BR>"
Next
Set files = folder.Files
Set file = Nothing
Set fso = Nothing
' Resultado:
' index.html
' test.asp
%>
Espero que te sirva...
Saludos...
