<% set sida = objConn.Execute("SELECT * FROM sidor where ID=4") do until sida.EOF Response.Write sida("sida") sida.movenext loop sida.close set sida = nothing %>