Postagens
Não informado
<%
if request.QueryString("StartPath")<> "" then
pasta_anterior = split(request.QueryString("StartPath"),"\")
For x = Lbound(pasta_anterior) To UBound(pasta_anterior)-1
pasta_velha = pasta_velha&pasta_anterior(x)&"\"
Next
pasta_velha = left(pasta_velha,len(pasta_velha)-1)
%>
<option value="<%=pasta_velha%>">[..]</option>
<%
end if%>
