<% sqlfile = "select id, nomefotosm, nomefotobg, categoria from tab_foto_mimmo where categoria = 1" Set rsfile = Server.CreateObject("ADODB.Recordset") Set rsfile = Conn.Execute(sqlfile) %>