<%@language="VBScript"%> <% Response.Expires = -1 %> <% if request("id_s_zbozi") <> "" then session("zbozi_vyber") = request("id_s_zbozi") & "," end if %>
Přidání nové příjemky
">

Datum vystavení
Datum splatnosti
 

Zboží <% if session("zbozi_vyber") = "" then %> zboží můžete pridat později <% else %> <% seznam = split(session("zbozi_vyber"),",") for start = 0 to ubound(seznam) - 1 id_zbozi = seznam(start) Set rs = CreateObject("ADODB.RecordSet") strSQL = "SELECT nazev_zbozi, id_s_zbozi, ks_sklad, cena FROM s_zbozi WHERE id_s_zbozi = " & id_zbozi rs.Open strSQL, conn, 1, 1 ks = rs("ks_sklad") %> " value="<%= ks %>"> <% rs.close next %>
ks sklad zboží
" SIZE="3" VALUE="1"> <%= ks %> &strana=prijemky-k-prijemce'}"> <%= rs("nazev_zbozi") %>
 
<% end if %>
 

Dodavatel <% Set rs = CreateObject("ADODB.RecordSet") strSQL = "SELECT * FROM s_dodavatel ORDER BY firma" rs.Open strSQL, conn, 1, 1 pocet = rs.recordcount %> DISABLED<% else %> CHECKED<% end if %> TYPE="radio" NAME="dodavatel_novy" VALUE="0" ONCLICK="if(dodavatel2.style.display == 'block'){css_rozbal('dodavatel2')}"> DISABLED<% end if %> NAME="dodavatel"> <% do while not rs.eof %> <% rs.movenext loop %> editovat
CHECKED<% end if %> TYPE="radio" NAME="dodavatel_novy" VALUE="1" ONCLICK="if(dodavatel2.style.display == 'none'){css_rozbal('dodavatel2')}"> nový dodavatel
Jméno
Firma
Ulice
Město
Psč
E-mail
Mobil
Telefon 1
Telefon 2
Fax
ICQ
Skype


Kód
Poštovné s DPH
Balné s DPH
Poznámka



<% rs.close conn.close %>