<%@language="VBScript"%> <% Response.buffer = false %> <% Response.Expires = 0 %> <% Set rs2 = CreateObject("ADODB.RecordSet") strSQL = "SELECT id_s_zbozi FROM zbozi WHERE skupina in (2309,4047,70027097,9705,10138,10271,10284,10314,10514,10574,10630,10933,11144,11186,11605,11767,11791,11793,11842,11893,11899,11909,12037,12067,12067)" rs2.Open strSQL, conn, 1, 1 do while not rs2.eof 'úprava počtu blokovaného zboží skladem a stav dostupnosti id_s_zbozi = rs2("id_s_zbozi") %> <% rs2.movenext loop rs2.close conn.close %>