<% 'kontrola přihlášení if session("zakaznik_id") = "" then response.clear response.redirect "zakaznik-prihlaseni.asp" end if %>

Zákaznické centrum

<% Set rs = CreateObject("ADODB.RecordSet") strSQL = "SELECT COUNT(*) FROM obj WHERE id_zakaznik = " & clng(session("zakaznik_id")) & " AND stav = 1" rs.Open strSQL, conn, 1, 1 if not rs.eof then obj_pocet_nevyr = rs(0) else obj_pocet_nevyr = 0 end if rs.close Set rs = CreateObject("ADODB.RecordSet") strSQL = "SELECT COUNT(*) FROM obj WHERE id_zakaznik = " & clng(session("zakaznik_id")) & " AND (stav = 2 OR stav = 4)" rs.Open strSQL, conn, 1, 1 if not rs.eof then obj_pocet_vyr = rs(0) else obj_pocet_vyr = 0 end if rs.close Set rs = CreateObject("ADODB.RecordSet") strSQL = "SELECT *, zakaznik.jmeno AS jmeno2 FROM zakaznik, zakaznik_adr, zakaznik_sleva WHERE zakaznik.id_sleva_karty = zakaznik_sleva.id_zakaznik_sleva AND zakaznik.id_zakaznik = " & clng(session("zakaznik_id")) & " AND zakaznik.id_zakaznik = zakaznik_adr.id_zakaznik AND fakturacni = 0" rs.Open strSQL, conn, 1, 1 %>

• <% if rs("id_sleva_karty") = 0 then %> Nenakupujete za ceny dle zákaznické karty <% else %> Nakupujete za své ceny dle zákaznické karty <%= rs("sleva_nazev") %> gfx/<%= session("server") %>/ik/slevova_karta<%= rs("id_sleva_karty") %>.png" ALT="Zákaznická karta <%= rs("sleva_nazev") %>" WIDTH="32" HEIGHT="20" BORDER="0"> <% end if %> | karty">Více informací o zákaznických kartách
• Uvidíte zakaznik-objednavky.asp">historii svých nákupů
• Můžete zakaznik-osobni.asp">spravovat svůj profil

<% rs.close conn.close %>