Session("BrowserName") = Request.ServerVariables("HTTP_USER_AGENT")
	Session("BrowserLang") = Request.ServerVariables("HTTP_ACCEPT_LANGUAGE")
	languages = Split(Session("BrowserLang"), ",")
	Session("BrowserLang") = ""
	DecodificaLingua(languages)
	Session("BrowserLang") = ""
	For Each language in languages
	  If InStr(language, "it") <> 0 Then          
		Session("BrowserLang") = "it"              
	  ElseIf InStr(language, "it-") <> 0 Then          
		Session("BrowserLang") = "it"              
	  ElseIf InStr(language, "ar") <> 0 Then          
		Session("BrowserLang") = "ar"              
	  ElseIf InStr(language, "ar-") <> 0 Then          
		Session("BrowserLang") = "ar"              
	  ElseIf InStr(language, "de") <> 0 Then          
		Session("BrowserLang") = "de"              
	  ElseIf InStr(language, "de-") <> 0 Then          
		Session("BrowserLang") = "de"              
	  ElseIf InStr(language, "fr") <> 0 Then      
		Session("BrowserLang") = "fr"              
	  ElseIf InStr(language, "fr-") <> 0 Then      
		Session("BrowserLang") = "fr"              
	  ElseIf InStr(language, "es") <> 0 Then      
		Session("BrowserLang") = "es"              
	  ElseIf InStr(language, "es-") <> 0 Then      
		Session("BrowserLang") = "es"              
	  ElseIf InStr(language, "en") <> 0 Then      
		Session("BrowserLang") = "en"              
	  ElseIf InStr(language, "en-") <> 0 Then      
		Session("BrowserLang") = "en"              
	  ElseIf InStr(language, "zh") <> 0 Then      
		Session("BrowserLang") = "zh"              
	  ElseIf InStr(language, "zh-") <> 0 Then      
		Session("BrowserLang") = "zh"              
	  ElseIf InStr(language, "ru") <> 0 Then      
		Session("BrowserLang") = "ru"              
	  ElseIf InStr(language, "ru-") <> 0 Then      
		Session("BrowserLang") = "ru"              
	  End If
	  if trim(Session("BrowserLang")) <> "" then
	  	exit for
	  end if
	Next
	if trim(Session("BrowserLang")) = "" then
		Session("BrowserLang") = "en"              
		Session("BrowserLangDesc") = "English"
	End if