Hola Buen Dia:
Ya he encontrado un poco mas de informacion de como hacerlo Muchas Gracias pór su ayuda tengo el sig. codigo:
<%
'Creamos el objeto FSO
Set ObjetoFSO = Server.CreateObject("Scripting.FileSystemObject")
Set ObjetoCarpeta = ObjetoFSO.GetFolder(Server.MapPath("\pages"))
Response.Write "<FONT FACE= Verdana SIZE=2>"
Response.Write "<B>"& ObjetoCarpeta.Name &"</b>:<BR>"
For Each Fichero in ObjetoCarpeta.Files
Response.Write Fichero.Name &"<BR>"
Next
Response.Write "</font>"
Set Fichero= Nothing
Set ObejtoCarpeta= Nothing
Set ObjetoFSO= Nothing
%>
con las lineas anteriores obtengo el nombre de los archivos que estan dentro de la direccion que yo pongo en la sig. linea:
Set ObjetoCarpeta = ObjetoFSO.GetFolder(Server.MapPath("\pages"))
Nose sime pudieran orientar, ya que yo por medio de unformulario obtengo la ruta de un archivo y esa ruta pasarla a Server.MapPath("\pages")
en verda Muchas Gracias!!!!