jMail sender med dublikeret indhold

Jeg har lavet en del sendefunktioner med held. Men nu kan jeg ikke forstå hvorfor der kommer flere gange indhold i mailene, der modtages.
Jeg har lavet en test hvor jeg sender til tre medlemmer, som jeg selv modtager post for. Jeg modtager tre mails OK. Men kun den første mail er OK. Den næste har indhold for to medlemmer og den sidste for tre. Dvs. den sidste mail ser sådan ud:


------------------------------------------

Subject: Nyt emne er oprettet: 0test

Her er info@staldnoni.dk medlemmet.

Her er gurlik@staldnoni.dk medlemmet.

Her er knudc@staldnoni.dk medlemmet.

-----------------------------------------------

Nogen der har nogle kloge ord?


if Kodeord = True and request.form("Overskrift") <> "" then
'Så skal der sendes en notits til alle medlememer:
    Set conn = Server.CreateObject("ADODB.Connection")
    conn.Open "Driver={SQL Server}; Server=xxx.xxx.xxx.x; Database=xxx; uid=xxx; pwd=xxxxxx;"
    Set rs = Server.createobject("ADODB.Recordset")    'Recordset oprettes
    strSQL = "SELECT * FROM Community_Users WHERE User_AIM LIKE '%Medlem%' "
    rs.open strSQL, conn
        do until rs.EOF
        If instr(rs("User_Email"),"staldnoni.dk") Then
            Server.ScriptTimeout = 6000
            Set JMail = Server.CreateObject("JMail.SMTPMail")
            JMail.Silent = true
            JMail.Logging = true
            jMail.sendername = SideTitel
            JMail.ServerAddress = "209.132.213.21" 
            JMail.Sender = HomeEmail 
            overskriftTekst = "Nyt emne er oprettet: " & request.form("Overskrift")
            JMail.Subject = overskriftTekst
            JMail.AddRecipient rs("User_Email") 
            body = body & "Her er " & rs("User_Email") & " medlemmet.<br><br>"
            jMail.ContentType  = "text/html"
            JMail.Priority = 3
            JMail.Body = body
            JMail.Execute
            Set JMail = Nothing
        End If
        rs.movenext
        loop
    rs.Close
end if