<%
	Dim DefaultUrl, dominio cookieDomain, url, rawUrl
	DefaultUrl = "http://zzzzzzyyyyyxxxxxx.dk/"
	dominio = "zzzzzzyyyyyxxxxxx.dk"
	Si Request.QueryString ("tduid") <> "" Entonces
	    cookieDomain = "." y de dominio
	    Response.Cookies ("AffiliateProvider") = Request.QueryString ("tduid")
	    Response.Cookies ("AffiliateProvider"). Expira = DateAdd ("d", 365, Fecha)
	    Response.Cookies ("AffiliateProvider"). Dominio = cookieDomain
	    Response.Cookies ("AffiliateProvider"). Ruta = "/"
	"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.
	    Período de sesiones ("AffiliateProvider") = Request.QueryString ("tduid")
	Fin Si
	Si Request.QueryString ("url") <> "" Entonces
	    rawUrl = Mid (Request.QueryString, _
	    InStr (1, Request.QueryString, "URL") + 4)
	    Si la izquierda (rawUrl, 13) = "http% 3A% 2F% 2F" _
	O a la izquierda (rawUrl, 14) = "https% 3A% 2F% 2F" Entonces
	url = Request.QueryString ("url")
	Más
	    url = rawUrl
	Fin Si
	Más
	    url = DefaultUrl
	Fin Si
	Response.Redirect (url)
	>%