<%
sLang=Session("LANG1")
if sLang="" then
sLang="HUN"
end if
'sLangCikk=Session("LANG_CIKK")
'if sLangCikk="" then
' sLangCikk="HUN"
'end if
'sLangDB=Session("LANG_DB")
'if sLangDB="" then
' sLangDB="HUN"
'end if
select case sLang
case "HUN" %><%
case "ENG" %><%
case "DEU" %><%
case "SLK" %><%
end select
sMegr = CStr(Request.QueryString("megr"))
%>
/<%=easy5css%>" type="TEXT/CSS" rel="STYLESHEET">
Present Perfect
<%
' Főmenü, Termékek, Kosár menü kiírása
Dim menu_top_act
menu_top_act="K"
%>