<% Dim color_active Dim color_inactive Dim color_f Dim color_t Dim color_k color_active = "#FFCC33" color_inactive = "#55AACC" color_f = color_inactive color_t = color_inactive color_k = color_inactive select case menu_top_act case "F" color_f= color_active case "T" color_t= color_active case "K" color_k= color_active end select ' table style="position: absolute; left: 0px; top: 50px" if menu_top_act<>"T" then if Session("KATALOGUS") then ' főmenü szélességek %-ban menu_width_fooldal=15 '23 menu_width_termekek=85 '54 menu_width_kosar=0 '23 else menu_width_fooldal=0 '23 menu_width_termekek=85 '54 menu_width_kosar=15 '23 end if end if szuro_katalogus="" select case szuro_kinalat case "LM" szuro_katalogus="Last Minute" case "PT" szuro_katalogus="PresenTex" case "PR" szuro_katalogus="Promotion" case "GC" szuro_katalogus="Gift Cocktail" case "HE" szuro_katalogus="High End" end select %> <% if Session("KATALOGUS") then %> <% end if if menu_top_act="T" then %> <% s=Szuro_Keszlet if Szuro_KeszletTipus="R" then s=s+" ("+Szuro_KeszletHet+het+")" end if if Szuro_Minta="1" then if len(s)>0 then s=s+"," end if s=s+minta end if %> <% s="" if (Szuro_ArMin="") and (Szuro_ArMax="") then s=" " else s=Szuro_ArMin & "-" & Szuro_ArMax & " " & DevJel end if %> <% if Session("ARSZURO")="1" then %> <% end if %> <% else 'nem termékek %> <% end if if Session("KATALOGUS") then k1= " " k1_onclick="" else k1=Kosar if Session("KOSAR_MAX2")>"0" then k1=k1+" ("+ Session("KOSAR_MAX2")+ ")" end if k1_onclick= " onclick=""navigate_kosar();"" " end if if not Session("KATALOGUS") then if menu_top_act="T" then 'ilyenkor edit mezőbe megy, hogy a kosárban levő darabszám módosítható legyen %> <% else %> <% end if else ' katalógus %> <% end if %>

<%=Szin%>

<%=cikkszam_nev%>

<%=Keszlet%>

<%=ar%>

<%=Egyeb%>
<% if Session("ARSZURO")<>"1" then %> <% end if %>

<%=termekek%>

> <%=k1%>

<%=k1%>