salve ragazzi, ho questo problema:
ADODB.Recordset error '800a0bcd'
Either BOF or EOF is True, or the current record has been deleted. Requested operation requires a current record.
archivio_eventi.asp, line 158
in rosso la linea 158.codice:<% i = 0 Do Until RS.EOF Do While iRecordsShown < iPageSize And Not RS.EOF if i mod 2 = 0 then 'numero di colonne if i > 0 then response.write "</tr>" end if response.write "<tr>" end if id = rs("id") immagine = rs("immagine") evento = rs ("Evento") sottotitolo = rs("sottotitolo") citta = rs("citta") luogo = rs("luogo") data = rs("data") ore = rs("ore") response.write "<td width='50%' >" if len(rs("immagine")) > 0 then response.write "<div >[img]&immagine&[/img]</div>" end if response.write " " response.write "<div class=""TitoloEventi"">"&Evento&"</div>" response.write "<div class=""titoli-1""> "&sottotitolo&" </div>" response.write "<div class=""titoli-1""> "&citta&" </div>" response.write "<div class=""titoli""> "&luogo&" </div>" response.write data response.write "" response.write ore '====================tronca il messaggio=============== lunghezzaMassima = 500 testo = rs("contenuto") if len(testo) > lunghezzaMassima then for i = lunghezzaMassima to 1 step -1 tempCarattere = mid(testo,i,1) if tempCarattere = " " then testo = left(testo,i-1) & "..." exit for end if next end if response.write testo '================fine tronca il messaggio=============== response.write " continua a leggere...»" response.write "</td>" RS.MoveNext i = i + 1 iRecordsShown = iRecordsShown + 1 Loop RS.MoveNext Loop %>
a me sembra tutto a posto voi che dite?

Rispondi quotando
