<% 'získání id_zboží a údajů z db seznam = split(session("kosik"),";") zbozi_stare = seznam(request("zbozi_poradi")) seznam2 = split(zbozi_stare,"_") id_zbozi = seznam2(1) ks = seznam2(0) Set rs = CreateObject("ADODB.RecordSet") strSQL = "SELECT zbozi.odkaz, nazev_zbozi2, skupina FROM zbozi, s_zbozi, zbozi_kat WHERE zbozi.id_s_zbozi = s_zbozi.id_s_zbozi AND zbozi.id_zbozi_kat = zbozi_kat.id_zbozi_kat AND zbozi.id_zbozi = " & id_zbozi rs.Open strSQL, conn, 1, 1 odkaz_zbozi = rs(0) nazev_zbozi = rs(1) skupina = rs(2) rs.close %>

Nákupní košík

<% if not request("chyba") = "" then %> <% end if %>

kosik-varianty2.asp" NAME="form_kosik_pridani" ONSUBMIT="return kontrola_var()"> <% if request("zmena_varianty") = "0" or request("zbozi") <> "" then %> <% else %> <% end if %> <% 'varianty zboží %> Vyberte variantu ke zboží - <%= nazev_zbozi %> <% start = 0 Set rs = CreateObject("ADODB.RecordSet") strSQL = "SELECT zbozi.odkaz AS odkaz_zbozi, var_nazev, sleva, cena, cena_puvodni, cena_karty1, cena_karty2, cena_karty3, id_zbozi_dostupnost, darek, darek_typ, id_zbozi FROM zbozi, s_zbozi WHERE skupina > 0 AND skupina = " & skupina & " AND zbozi.id_s_zbozi = s_zbozi.id_s_zbozi AND zbozi.smazano = 0 AND skupina_zobrazit = 1 ORDER BY var_nazev" rs.Open strSQL, conn, 1, 1 do while not rs.eof %> <% 'úprava cen pro příhlášené zákazníky sleva2 = rs("sleva") cena2 = rs("cena") cena_puvodni2 = rs("cena_puvodni") cena_karty1 = rs("cena_karty1") cena_karty2 = rs("cena_karty2") cena_karty3 = rs("cena_karty3") id_zbozi_dostupnost = rs("id_zbozi_dostupnost") %> "<% if cstr(rs("id_zbozi")) = id_zbozi then %> CHECKED<% elseif request("varianta") = cstr(rs("odkaz_zbozi")) then %> CHECKED<% end if %>><% if rs("var_nazev") <> "" then %><%= rs("var_nazev") %> - <% end if %><%= cena %> Kč<% if rs("id_zbozi_dostupnost") = 1 then %>   skladem<% end if %> <% javascript1 = javascript1 & " && document.form_kosik_pridani.zbozi[" & start & "].checked == false" start = start + 1 rs.movenext loop javascript1 = right(javascript1, len(javascript1) - 4) %>

<% rs.close conn.close %>