Usamos cookies para medir audiência e melhorar sua experiência. Você pode aceitar ou recusar a qualquer momento. Veja sobre o iMasters.
Prezados (as)
Possuo um sistema de notícias em meu site e gostaria que as 3 primeiras notícias fossem chamadas com link na minha
homepage.
A página onde possuo as notícias chama (m5.asp?cod_pagina=1776) e minha home chama (default2.asp)
Implementei o código abaixo, porém o mesmo não esta funcionando:
>
<% IF request("cod_noticia")<>"" then 'Exibir a noticia %> <div id="divnoticia"> <!--#include file="noticias_secao_det.asp"--> </div>
<% End If %>
<%
Set rsQ = server.createobject("ADODB.Recordset")
rsQ.open "select TOP 3 * from NOTICIAS_SECAO order by cod_noticia DESC", conexao, 3,3
while not rsQ.eof
Response.write "<a href=m5.asp?cod_noticia?id="&rs("divnoticia")&">"&rs("titulo")&"</a><br>"
rsQ.movenext
WEND
rsQ.Close
Set rsQ=nothing
%>
Como eu posso realizar a elaboração do código.
Desde já agradeço
Raposo
Abs
Vinicius, obrigado pela resposta. Não rolou, deu o seguinte erro:
Tipo de erro:
Erro de tempo de execução do Microsoft VBScript (0x800A01B6)
O objeto não dá suporte para a propriedade ou método: 'rsQ.execute'
/wwwroot/default2.asp, line 319
Obrigado
Bom, vamos fazer assim:
Set rsQ = server.createobject("ADODB.Recordset")
sql "select TOP 3 * from NOTICIAS_SECAO order by cod_noticia DESC"
set rsQ= conexao.execute(sql)
Acho que assim deve funcionar.
Tenta com
rsQ.Execute "select TOP 3 * from NOTICIAS_SECAO order by cod_noticia DESC", conexao, 3,3