<%@language="VBScript"%> <% Response.Expires = -1 %> "> "> <% if request("reload") = "1" then %> <% end if %> <% Set rs = CreateObject("ADODB.RecordSet") strSQL = "SELECT * FROM s_sklad" rs.Open strSQL, conn, 1, 1 %> <% if not request("chyba") = "" then %> <% end if %> Ostatní sklady

<% do while not rs.eof %> "><%= rs("nazev") %> <% rs.movenext loop %>


        

<% rs.close conn.close %>