Listar ficheros de un directorio desde OTRO directorio

[jercer]

set xxx = Server.CreateObject("Scripting.FileSystemObject")
set carpeta = xxx.GetFolder(Server.MapPath("dirección_de_carpeta "))
set archivos = carpeta.files

for each archivo in archivos
Response.write archivo.name & "<br>"
next

Debes cambiar direccion_de_carpeta por la carpeta la dirección de la carpeta que quieres que presente los archivos, por ejemplo:

/home/imagenes/