MenuUser

<%

Dir = Request.ServerVariables("Path_Info")
dirArr = Split(Dir, "/")

Response.write "Sei in: "
Response.write "<a href=/">Home</a>"

For i = 1 To UBound(dirArr)

Response.write " > "
path = path & dirArr (i)
Response.Write "<a href=" & path & ">" & Replace (dirArr (i), "_", " ")

Next

%> E' utile notare che perche` funzioni in maniera perfetta,
bisogna dare un nome descrittivo alle proprie directory/files.
Ed usare l'underscore (_) per inserire gli spazi poi nella
descrizione