24/04/2002, 03:53
|
| | | Fecha de Ingreso: abril-2002
Mensajes: 6
Antigüedad: 23 años Puntos: 0 | |
| Re: Enlace en cada carpeta de una URL
Así lo tienes solucionado:
<%
Dim Ruta, RutaSplit, i
Ruta = "/Graficas/Back_Up/_vti_cnf"
RutaSplit = Split(Ruta, "/")
for i=1 to Ubound(RutaSplit)
sCad=""
for j=0 to i
sCad=sCad & RutaSplit(j)
next
Response.write "/" & sCad & "<br>"
next
%> |