visualizzare dati da db

[NoMartinaNoPart]

devo mostrare a video i dati che estraggo dal db ma mi sono impantanata aiutatemi per favore

questa è la query che ho in un file di inclusione

<%
Set ConnNews = Server.CreateObject ("ADODB.Connection")
ConnNews.Open MM_ConnNews_STRING

Set RsNews = Server.CreateObject ("ADODB.Recordset")

SQL = "SELECT * FROM news WHERE DateDiff('d',news.startdate,Date())>=0 And DateDiff('d',news.enddate,Date())<=0 And news.active=True ORDER BY news.ID"

RsNews.Open SQL, ConnNews
%>

ora devo visualizzare solo le prime 2 news estratte

[optime]

fa'

SELECT TOP 2 * .... (il resto rimane uguale)

e stampa tutto

[NoMartinaNoPart]

scusa e se nel db è presente solo una news ed io per avanzare nella visualizzazione scrivo rsnews.movenext cosa accade mi da errore?

[optime]

dai, martino, se fai Do While Not rs.eof, esce da solo quando è finito

[NoMartinaNoPart]

mi spiego meglio :

per visualizzare la prima news io faccio così :

<%
if RsNews.Bof And RsNews.Eof then
News = "Nessuna News presente"
response.Write(News)
else
Response.write(RsNews("startdate"))
End if
%>

così per il title e per l'id

poi in altra posizione della pagina inserisco il comando rsnews.movenext
ma se il record non esiste mi da subito errore

come posso risolvere?

[optime]

ma l'hai letta la mia risposta di prima?

[NoMartinaNoPart]

non avevo ancora letto

ma la questione è questa
non devo elencare tipo elenco ma mostrarle in posizioni differenti della pagina (non una di seguito all'altra)

come faccio come posso usare il loop?

in principio avevo pensato ad un array ma poi ho desistito

[optime]

quante parti?

[NoMartinaNoPart]

in questa maniera mi sta funzionando ma sicuramente ci sarà un metodo migliore per ottenere lo stesso risultato .... speriamo che qualcuno me lo possa suggerire

ricordo che la visualizzazione dei dati non avviene in maniera sequenziale (tipo elenco) ma devo fare uso dei dati estratti in posizioni diverse nella pagina del sito

grazie


<% if RsNews.Bof And RsNews.Eof then
News = "Nessuna News presente"
response.Write(News)
else
Response.write(RsNews("startdate"))
End if
%>

<%
if News = "Nessuna News presente" Then
Response.Write("Nessuna News presente")
else
Response.write(RsNews("title"))
End if
%>

<%
if News = "Nessuna News presente" Then
Response.Write("Nessuna News presente")
else
Response.write(RsNews("ID"))
End if
%>

<%
if RsNews.Bof And RsNews.Eof then
News = "Nessuna News presente"
response.Write(News)
else
RsNews.Movenext
if RsNews.Bof or RsNews.Eof then
News = "Nessuna News presente"
response.Write(News)
else
Response.write(RsNews("startdate"))
End if
End If
%>

<%
if News = "Nessuna News presente" Then
Response.Write("Nessuna News presente")
else
Response.write(RsNews("title"))
End if
%>

<%if News = "Nessuna News presente" Then
Response.Write("Nessuna News presente")
else
Response.write(RsNews("ID"))
End if%>

[NoMartinaNoPart]

messaggio per optime che chiede "quante parti?"

in questo caso ne farò uso in due parti ma mi piacerebbe che fosse possibile nel caso in cui dovessi mostrare a video tre news che lo script fosse facilemente riutilizzabile

grazie 1000 per l'attenzione al mio problema