The following didn't work. Why?? 
strSQL = "SELECT tblNewsRating.News_ID, Avg(tblNewsRating.Rating) AS MediadiRating "
strSQL = strSQL & "FROM tblNewsRating "
strSQL = strSQL & "GROUP BY tblNewsRating.News_ID "
strSQL = strSQL & "WHERE tblNewsRating.News_ID = " & rsnews("News_ID") &";"
That's the error message:
Tipo di errore:
Microsoft JET Database Engine (0x80040E14)
Errore di sintassi (operatore mancante) nell'espressione della query 'tblNewsRating.News_ID WHERE tblNewsRating.News_ID = 117'.
/Ticinorally/testing2.asp, line 52
thanks to all for the help 
Edited by Pegaso