<% origem = request.QueryString("o") visita = request.QueryString("v") if len(origem) = 0 then if request.Cookies("SIOD_origem") = "" or session("SIOD_ORIGEM") = "" then origem = "Acesso Direto" visita = "" response.Cookies("SIOD_origem") = origem response.Cookies("SIOD_visita") = visita session("SIOD_visita") = visita session("SIOD_ORIGEM") = ORIGEM end if else response.Cookies("SIOD_origem") = origem response.Cookies("SIOD_visita") = visita session("SIOD_visita") = visita session("SIOD_ORIGEM") = ORIGEM end if %>