% txtSQL="SELECT TOP 5 id,titolo,tipoprodotto" txtSQL=txtSQL&" FROM notizie" txtSQL=txtSQL&" WHERE tipo='notizia'" txtSQL=txtSQL&" AND tipoprodotto='"&TMPTipo&"'" txtSQL=txtSQL&" ORDER BY data desc" set RS=EstraggoRIGA(txtSQL) if NOT(RS.EOF) THEN while NOT(RS.EOF) %>