Hej igen!
Nån som kan se om det är nått fel på denna loppen? för det råkade vara så att en av prenumeranterna fick 300 mail
Ditt nyhetsbrev har skickats iväg utan problem!!!
<br><br>
<%
Session.LCID = 1053
Set Conn = Server.CreateObject("ADODB.Connection")
Conn.Open("DRIVER={Microsoft Access Driver (*.mdb)}; DBQ=" & Server.MapPath("..\login4.mdb"))
sql="SELECT * FROM login "
set rs=conn.execute(sql)
body = request.form("text")
subject = "Nyhetsbrev från UMR "&date()&""
Set JMail = Server.CreateObject("JMail.SMTPMail")
JMail.ServerAddress = "mail.webtomten.com"
JMail.Sender = "info@umr.st"
JMail.Subject = subject
Do Until rs.EOF
JMail.addrecipientbcc rs("epost")
rs.MoveNext
Loop
' But as not all mailreaders are capable of showing HTML emails
' we will also add a standard text body
jmail.Body = Body
JMail.Priority = 1
JMail.AddHeader "Originating-IP", Request.ServerVariables("REMOTE_ADDR")
JMail.Execute
%>
Ditt nyhetsbrev har skickats iväg utan problem!!!
<br><br>
<%
Session.LCID = 1053
Set Conn = Server.CreateObject("ADODB.Connection")
Conn.Open("DRIVER={Microsoft Access Driver (*.mdb)}; DBQ=" & Server.MapPath("..\login4.mdb"))
sql="SELECT * FROM login "
set rs=conn.execute(sql)
body = request.form("text")
subject = "Nyhetsbrev från UMR "&date()&""
Set JMail = Server.CreateObject("JMail.SMTPMail")
JMail.ServerAddress = "mail.webtomten.com"
JMail.Sender = "info@umr.st"
JMail.Subject = subject
JMail.AddRecipient "info@umr.st"
Do Until rs.EOF
JMail.addrecipientbcc rs("epost")
rs.MoveNext
Loop
' But as not all mailreaders are capable of showing HTML emails
' we will also add a standard text body
jmail.Body = Body
JMail.Priority = 1
JMail.AddHeader "Originating-IP", Request.ServerVariables("REMOTE_ADDR")
JMail.Execute
%>
med den skillnaden som du kanske såg, har en addrecipient, dvs, jag skickar en till mig själv och resten som BCC ...
Funkar hur bra som helst, ca 850 adresser i db, utan att ngn får dubletter
ofta e det så att man ställer servern att ej att Relay emailadresser utanför domänen, allt för att spammare ej ska kunna använda sig av servern utifrån.