<% URL = request.ServerVariables("SERVER_NAME") & request.ServerVariables("PATH_INFO") pedazos = split(URL, "/") for pedazo=0 to ubound(pedazos)-1 total= total & pedazos(pedazo) & "/" next URLpromocion = "http://" & total & "recomienda.asp" total = "http://" & total & "index.html" 'response.write total %>

Your data

Your name

Your friend´s data

Name

email