Send nyhedsbrev til alle i DB?

Hej

Vil du udbygge dette script, så det går ned i min database og tager det første element (en e-mail adresse) op, hvorefter SendNyhedsbrevTil() køres, og der forsættes med det næste element (igen e-mail adresse), som der også sendes en e-mail til osv.

[Jeg har forsøgt at skrive så meget af koden, som jeg kunne - du har helt frie hænder til at ændre i den]

<%
for not rs.EOF
    Set Conn = Server.CreateObject("ADODB.Connection")
    Conn.Open "DRIVER={Microsoft Access Driver (*.mdb)}; DBQ=" & Server.MapPath ("../databaser/nyhedsbreve.mdb")
    strSQL = "select * from ABONNENT [?????] "
    set rs = Conn.execute(strSQL)
    SendNyhedsbrevTil([den fundne e-mail adresse])
    [DatabasePointer = DatabasePointer + 1]
next
%>