<%@ Language=VBScript %>
<% Option explicit
dim comment, univers, phase, flux
	'récupération des données
	comment = request.querystring("c")

	univers = request.querystring("u")
	if (univers = "") then
		univers = 0
	end if

	phase = request.querystring("p")
	if (phase = "") then 
		phase = 0
	end if

	flux = request.querystring("f")
	if (flux = "") then 
		flux = 0
	end if

	'suivi par Tfluxstat2
	Flux_visite univers,phase,flux,comment

	Response.Redirect "/img/structure/pixel.gif"
%>
<!-- #include virtual = "/services/Commun/DA_SL_TFLUXSTAT2.asp" -->