Primer problema:
do while not (rs.bof or rs.eof)
numeritos = numeritos & "," & rs("IDrubro")
rs.movenext
loop
Si solo te regresa un registro te traería como resultado:
101,
Pon el codigo tal cual lo usas en tu pagina asp por que por lo que he visto te lo sacas de la manga aqui.
Pon el error tal cual como te lo genera la pagina.
Saludos