Emailscript kan man hoppe ugyldige emails over
jeg har et emailscript som melder fejl når det når til en email der ikke fungerer:jmail.SMTPMail error '8000ffff'
Error: 554 The following recipients could not be sent to: emilius.dk@ jubiimail.dk; 501 5.5.4 Invalid Address
/admin/nyhedsbrev/script_nyhedsbrev.asp, line 43
er der nogen måde hvorpå man kan ændre scriptet så det bare hopper den mail over ?
hele scriptet:
<%@LANGUAGE="VBSCRIPT"%>
<!--#include file="../../Connections/database.asp" -->
<%
Dim rsNyhedsbrev
Dim rsNyhedsbrev_numRows
Set rsNyhedsbrev = Server.CreateObject("ADODB.Recordset")
rsNyhedsbrev.ActiveConnection = MM_database_STRING
rsNyhedsbrev.Source = "SELECT * FROM nyhedsbrev ORDER BY IDnyhedsbrev DESC"
rsNyhedsbrev.CursorType = 0
rsNyhedsbrev.CursorLocation = 2
rsNyhedsbrev.LockType = 1
rsNyhedsbrev.Open()
rsNyhedsbrev_numRows = 0
Overskrift = (rsNyhedsbrev.Fields.Item("Overskrift").Value)
Tekst = rsNyhedsbrev("Tekst")
Dim rsEmails
Dim rsEmails_numRows
Set rsEmails = Server.CreateObject("ADODB.Recordset")
rsEmails.ActiveConnection = MM_database_STRING
rsEmails.Source = "SELECT * FROM nyhedsbrev_modtagere ORDER BY Email ASC"
rsEmails.CursorType = 0
rsEmails.CursorLocation = 2
rsEmails.LockType = 1
rsEmails.Open()
rsEmails_numRows = 0
do while not rsEmails.EOF or rsEmails.BOF
strEmail = (rsEmails.Fields.Item("Email").Value)
Set JMail = Server.CreateObject("JMail.SMTPMail")
JMail.ServerAddress = "websmtp.perchs.dk;websmtp.perchs.dk;mailrelay.andersenit.dk"
JMail.Sender = "admin@perchs.dk"
JMail.SenderName = "A. C. Perchs Thehandel"
JMail.ContentType = "text/html"
JMail.Subject = Overskrift
JMail.AddRecipient strEmail
JMail.Priority = 3
JMail.AddHeader "Originating-IP", Request.ServerVariables("REMOTE_ADDR")
Jmail.Body = Tekst
JMail.Execute
Set JMail = Nothing
rsEmails.MoveNext
Response.Write (strEmail) & "</p>"
Loop
rsNyhedsbrev.Close()
Set rsNyhedsbrev = Nothing
rsEmails.Close()
Set rsEmails = Nothing
' Response.Redirect "oversigt_nyhedsbrev.asp"
%>
