Alguien sabria decirme que pasa......

[Myakire]

Modifica este código:

Código:

<form action=FSO.asp method=post>
<%
set FSO = server.createObject("Scripting.FileSystemObject")

dim carpeta

if (request.form="") then
    set discoC = FSO.GetDrive("c")
    set carpeta = discoC.rootFolder
    response.write "Accediendo a la Raiz<p>"
else
    strCarpeta = request.form("carpeta")
    set carpeta = FSO.getFolder(strCarpeta)
    response.write "Accediendo a la carpeta: " & strCarpeta & "<p>"

    if (not carpeta.isRootFolder) then
       carpeta_padre = carpeta.parentFolder.path
       response.write "Volver a: <input type=submit name=carpeta value='" & carpeta_padre & "'><p>"
    end if
end if

set coleccionCarpetas = carpeta.subFolders

for each carpeta in coleccionCarpetas
    response.write "<input type=submit name=carpeta value='" & carpeta.path & "'><br>"
		for each archivo in carpeta.Files
    		response.write "&nbsp;&nbsp;&nbsp;"& archivo.name & "<br>"
		next
next

%>
</form>

Saludos