Flere mails med forskellige navne
HejJeg stiller lige et spm mere :-)
Jeg vil gerne sende maile til alle fra en liste jeg har i en DB. Det ville være enormt rart om jeg kunne få modtagerens navn til at stå øverst i mailen - jeg kan bare ikke lige helt finde den nødvendige struktur. Min kode er her:
Set Mailer = Server.CreateObject("SMTPsvg.Mailer")
Mailer.FromName="MATA-Odds-Mailer"
Mailer.FromAddress="mataodds@jt-tips.dk"
Mailer.RemoteHost="mail.jt-tips.dk"
strSQL = "SELECT navn, mail FROM spillere"
set rs = conn.execute(strSQL)
While not rs.EOF
if rs("navn") <> "Fælleskonto" then
Mailer.AddRecipient rs("navn"), rs("mail")
besked = "TEST"
Mailer.Subject="Der er kommet nyt indlæg på MATA-Odds"
Mailer.BodyText=besked
Mailer.ContentType="text/html"
rs.MoveNext
else
rs.MoveNext
end if
Wend
if Mailer.SendMail then
response.write "Mailen er afsendt"
else
Response.Write "Der skete en fejl"
end if
Set Mailer = Nothing
