jmail - indsætter for meget tekst

Jeg har lavet et nyhedsbrev og det virker fint nok.

Problemet er, at hvir der f.eks er 6 personer der skal have nyhedsbrevet, så bliver indholdet 1 gang til 1. modtager, 2 gange til 2. modtager osv.

Indholdet skal jo kun stå en gang i hver mail.

Hvad gør jeg galt.

Her er min kode

<% if Request.ServerVariables("REQUEST_METHOD") = "POST" then


Set Conn = Server.CreateObject("ADODB.Connection")

    DSN = "DRIVER={Microsoft Access Driver (*.mdb)}; DBQ=" & Server.MapPath ("/xxxxxx.mdb")
    Conn.Open DSN


  Set rs = Server.CreateObject("ADODB.RecordSet")
  email = replace(Request.Form("email"),"'","''")
  strSQL= "SELECT * FROM test where .....;"
  Set rs = Conn.Execute (strSQL)
  Do while not rs.EOF

    Set JMail= Server.CreateObject("JMail.SMTPMail")
    JMail.ServerAddress = "XXXXX"
    JMail.Sender        = "XXXXXX"
    JMail.SenderName    = "XXXXXX"
    JMail.Subject      = "Nyhedsbrev"
    JMail.AddRecipient  rs("email")
    Jmail.Priority = 1
    'JMail.AddHeader    "Originating-IP", Request.ServerVariables("REMOTE_ADDR")
    BodyText = BodyText & request.form("overskrift") & vbCrLf & vbCrLf
    BodyText = BodyText & request.form("indhold") & vbCrLf
    BodyText = BodyText & request.form("link") & vbCrLf
    BodyText = BodyText & request.form("fil") & vbCrLf
    BodyText = BodyText & vbCrLf & "Venlig hilsen" & vbCrLf & vbCrLf
    JMail.Body = BodyText
    JMail.Silent = true
    JMail.Execute

    rs.movenext
    Loop


    Set JMail = Nothing 

  Conn.Close

end if
%>