Infatti andrà in errore la query.
codice:
if len(idNews) = 0 or (not isNumeric(idNews)) then

sql="select top 1 * from news order by data desc"

else

sql="select * from news where id=" & dNews

end if