% @Language = VBScript %> <% Set RSNoticia = Server.CreateObject("ADODB.Recordset") strNoticia = "SELECT TOP 6 * FROM Noticia ORDER BY idNoticia DESC" RSNoticia.Open strNoticia, DbCap %>