allora ho fatto un response.write(ListaID) e mi restituisce tutti gli id presenti nel form, ma quando faccio il controllo

If len(ListaID(i)) = 0 then
Response.Write("Nessuna News é stata selezionata per la pubblicazione")
Response.Write("</br>Torna indietro e seleziona almeno una News.")
Response.End
End if

mi da errore

Microsoft VBScript runtime error '800a000d'

Type mismatch: 'ID'