Mailing list asp

Hejsa

jeg har sådan et script til Jmail som jeg ønsker at bruge til et nyhedsbrev, da jeg har Cliche som udbyder har jeg ikke så mange muligheder andet end Jmail

Jeg har tidligere brugt koden til at få mails sendt til mig selv, nu vil jeg gerne have at modtageren bliver fra en tabel fra en database, lad os kalde den email, jeg ved bare ikke hvordan man sætter det sammen

Her er koden så

<%

'hvis der er sendt noget til siden med post metoden:
If Request.ServerVariables("REQUEST_METHOD") = "POST" Then

    'få fat i data fra formen:
    request.form("mail") = Replace(Request.Form("mail"),"<","&lt;")

    'skab jmail-objekt:
    Set msg = Server.CreateObject("JMail.Message")

    msg.ContentType = "text/html"
    msg.Logging = True
    msg.Silent = True

    'Fra:
    msg.From = request.form("mail")

    'angiv modtager(dig)
    msg.AddRecipient = xxx@xxx.dk (her skulle databasen hentes til!!!)

    'Subject på mailen
    msg.Subject = "nyhedsbrev"

    'indholdet:
    indhold = "Email:"&request.form("mail")
    msg.Body = indhold

    'tjek om mailen bliver sendt:
    If NOT msg.Send("mail.xxx.dk") Then
    Response.Write "Der opstod en fejl:<br />" & vbCrlf & msg.Log
    'ryd op:
    Set msg = Nothing
    Else
    'ryd op:
    Set msg = Nothing
    Response.Redirect Request.ServerVariables("HTTP_REFERER")
    End If

End If
Response.Write ("Nyhedsbrev er blevet sendt korrekt.")
%>