Sistema de Busca

[raposo 0]

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 Ianni 189]

Tenta com

 

rsQ.Execute "select TOP 3 * from NOTICIAS_SECAO order by cod_noticia DESC", conexao, 3,3

[raposo 0]

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

[Vinicius Ianni 189]

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.