Script de Newsletter

Eu gostaria de saber oque esta errado no meu codigo de news letter .. para enviar o e-mail para todos do meu banco de dados..

<%dsn="DBQ=d:\www\meusite\db\bd.mdb;Driver={Microsoft Access Driver (.mdb)};"set conn=server.createobject("adodb.connection")x = 0sql="select from news"set rs = conn.execute sql,conndo while not rs.eofset mail = server.createobject("Persits.MailSender")with mailmail.Host = "mail-nt.braslink.net" mail.to = rs("email")mail.from = "Crazybaby"mail.subject = "Newsletter"mail.body = "oi"mail.mailformat = 0mail.bodyformat = 0mail.SendEnd withx = x+1rs.movenextloopset mail = nothing%>

Obrigado