SHARE
TWEET

Untitled

a guest Feb 27th, 2012 13 Never
  1. <%
  2.         Dim DefaultUrl, dominio cookieDomain, url, rawUrl
  3.         DefaultUrl = "http://zzzzzzyyyyyxxxxxx.dk/"
  4.         dominio = "zzzzzzyyyyyxxxxxx.dk"
  5.         Si Request.QueryString ("tduid") <> "" Entonces
  6.             cookieDomain = "." y de dominio
  7.             Response.Cookies ("AffiliateProvider") = Request.QueryString ("tduid")
  8.             Response.Cookies ("AffiliateProvider"). Expira = DateAdd ("d", 365, Fecha)
  9.             Response.Cookies ("AffiliateProvider"). Dominio = cookieDomain
  10.             Response.Cookies ("AffiliateProvider"). Ruta = "/"
  11.         "Si usted no usa la funcionalidad integrada de sesión en ASP, modifique la siguiente expresión para trabajar con sus rutinas de manejo de sesión.
  12.             Período de sesiones ("AffiliateProvider") = Request.QueryString ("tduid")
  13.         Fin Si
  14.         Si Request.QueryString ("url") <> "" Entonces
  15.             rawUrl = Mid (Request.QueryString, _
  16.             InStr (1, Request.QueryString, "URL") + 4)
  17.             Si la izquierda (rawUrl, 13) = "http% 3A% 2F% 2F" _
  18.         O a la izquierda (rawUrl, 14) = "https% 3A% 2F% 2F" Entonces
  19.         url = Request.QueryString ("url")
  20.         Más
  21.             url = rawUrl
  22.         Fin Si
  23.         Más
  24.             url = DefaultUrl
  25.         Fin Si
  26.         Response.Redirect (url)
  27.         >%
RAW Paste Data
Top