Yanılmıyorsam burada where id="&ID&"" yazılmış burada biri id biri ID olursa hata veriyordu bende.db de ne yazıyosa onu kullan!
ID = Request.QueryString("ID") queryden ID olarak aldığı için problem yaşamaz id=ID konusunda 
ID = Request.QueryString("ID")
Set rsSil = Server.CreateObject("ADODB.RecordSet")
strSQL = "Delete * From news Where id = "& ID &""
rsSil.open strSQL,CONN,1,3
olarak silebilirsin
kolay gelsin..