<%@language="VBScript"%> <% Response.Expires = -1 %> ; print()<% end if %>"> <% Set rs = CreateObject("ADODB.RecordSet") strSQL = "SELECT * FROM s_dodavatel WHERE id_s_dodavatel = " & request("id_dodavatel") rs.Open strSQL, conn, 1, 1 %>

Dodavatel
Jméno	<%= rs("jmeno") %>
Firma	<%= rs("firma") %>
Ulice	<%= rs("ulice") %>
Město	<%= rs("mesto") %>
Psč	<%= rs("psc") %>
E-mail	"><%= rs("email") %>
Mobil	<%= rs("mobil") %>
Telefon 1	<%= rs("tel1") %>
Telefon 2	<%= rs("tel2") %>
Fax	<%= rs("fax") %>
ICQ	<%= rs("icq") %>
Skype	<%= rs("skype") %>

<% rs.close conn.close %>