Vídeos <% sqlq = "select * from videos order by id DESC" set video= confest.execute(sqlq) response.cookies("videos") = video("id") %> Outros Vídeos <% sqlplantao = "select * from videos where id < " & request.cookies("videos") & " order by id DESC" set videos = server.createobject("ADODB.Recordset") videos.MaxRecords = 10 videos.Open sqlplantao, confest %> <% contar = 0 do while not videos.EOF %> <% contar = contar + 1 if contar = 1 then response.Write("") contar = 0 end if response.cookies("videos") = videos("id") videos.movenext loop %> /default.jpg" width="120" /> " > <% =videos("nome") %> <% =video("data") %> <% =video("nome") %> <% =video("sobre") %>