jmail fejl med for mange modtagere
jeg har denne kode:if request("sendt") = "ja" then
if request.form("til") = "Medlemmer" then
set rs = conn.execute("select * from brugere")
elseif request.form("til") = "redaktion" then
set rs = conn.execute("select * from personer")
elseif request.form("til") = "Test mail" then
set rs = conn.execute("select * from testmail")
end if
sendt = 0
do until rs.eof
if rs("email") <> "" then
Set JMail = Server.CreateObject("JMail.SMTPMail")
JMail.ContentType = "text/html"
JMail.ServerAddress = "localhost"
JMail.sender = "****@*****.**"
JMail.sendername = "MusicON Magazine"
JMail.subject = request.form("emne")
JMail.AddRecipient rs("email")
'Thomas Faugsted skriver udtrækket til body delen i mailen
JMail.Body = "<html><LINK REL='StyleSheet' HREF='http://www.musicon.dk/css2.css' type='text/css'><span class='main'>"
JMail.Body = JMail.Body & request("topbesked")
JMail.Body = JMail.Body & "<b>" & request("emne") & "</b>" &"<br><br>"
JMail.Body = JMail.Body & "Hej " & rs("email") &"<br><br>"
JMail.Body = JMail.Body & request.form("tekst")
JMail.Body = JMail.Body & request.form("bundbesked")
JMail.Body = JMail.Body & "</span></html>"
'Her bliver mailen med oplysningerne i´s prioritet bestemt
' 1 - højeste (Haster / Vigtigt) (Rødt tegn )
' 3 - normal
' 5 - lavest
JMail.Priority = 3
JMail.Execute
sendt = sendt + 1
Set JMail = Nothing
end if
rs.movenext
loop
Response.write "Nyhedsbrevet er nået ud hos "& sendt &" modtagere"
end if
%>
problemet er når nyhdesbrevet bliver for stort (over 1000) fpr vi:
jmail.SMTPMail error '8000ffff'
The message was undeliverable. All servers failed to recieve the message
nogen der kan hjælpe?
