Udskiftning af tekst i mailscript
jeg har en nyhedsbrev generator hvor jeg skriver 'Kære X'. når brevet er færdigt ligges det i en database hvorfra jeg så via et script sender det til modtagerne af nyhedsbrevet.kan jeg via scriptet indsætte navnet på modtageren af mailen og hvordan ?
kode:
<%
css = "<head><link rel='StyleSheet' href='http://www.border-wines.dk/include/stylesheet.css' type='text/css'></head>"
Til = rsEmails("Navn")
Overskrift = (rsNyhedsbrev.Fields.Item("Overskrift").Value)
Tekst = css & rsNyhedsbrev("Tekst")
Dato = (rsNyhedsbrev.Fields.Item("Dato").Value)
Set JMail = Server.CreateObject("JMail.SMTPMail")
JMail.ContentType = "text/html"
JMail.ServerAddress = "websmtp.border-wines.dk"
JMail.Sender = "StarClub"
JMail.Subject = Overskrift
JMail.Priority = 3
JMail.AddHeader "Originating-IP", Request.ServerVariables("REMOTE_ADDR")
do while not rsEmails.EOF or rsEmails.BOF
JMail.AddRecipientBcc rsEmails.Fields.Item("Email").Value
Jmail.Body = replace(Tekst, "ModtagerensNavn", Til)
JMail.Execute
JMail.ClearRecipients
rsEmails.movenext
loop
Response.Redirect "oversigt_nyhedsbrev.asp"
%>
