<%@language="VBScript"%> <% Response.Expires = -1 %> <% Set rs = CreateObject("ADODB.RecordSet") strSQL = "SELECT " & request("referer") & " FROM obj WHERE id_obj = " & request("id_obj") rs.Open strSQL, conn, 2, 3 rs(0) = request("poznamka") rs.update rs.close conn.close %>