% Dim NextLanguage, HTMLJS HTMLJS = "" if Language = "Fr" then NextLanguage = "En" else NextLanguage = "Fr" end if if cBool(getParam("UpdateLanguage")) = true then Session("Language") = getParam("Language") Response.Cookies("DagenaisLegal")("Langue") = Session("Language") Response.Cookies("DagenaisLegal").Expires = Now () + 365 Language = getParam("Language") HTMLJS = vbCrLf & vbCrLf & "" & vbCrLf end if %>