% Response.Expires=0 %>
<% RESPONSE.BUFFER=TRUE %>
Silvestri
<%
Dim sLingua
if Request.QueryString("Lingua")="1" then
sLingua=1
Session(SessionID & "Lingua")=1
elseif Request.QueryString("Lingua")="2" then
sLingua=0
Session(SessionID & "Lingua")=0
else
sLingua=Session(SessionID & "Lingua")
end if
if sLingua<>1 and sLingua<>0 then
sLingua=0
end if
%>