[dunken]

Hej

Jag har lite problem med att skicka med jmail från den server som jag har nu.

Denna koden under fungerar kanon.

<%
SET objJmail = Server.CreateOBject("JMail.Message")

objJmail.From = Request.Form("email")
objJmail.FromName = Request.Form("Namn")
objJmail.AddRecipient "[email protected]"
objJmail.Subject = Request.Form("subject")
objJmail.Body = Request.Form("message")

objJmail.ContentType = "text/plain"
objJmail.Send("mail.dunken.se")
Set objJmail = nothing

Response.Redirect("tack.asp")
%>



Medans denna får felsvar som ni ser underkoden.

If Request.QueryString("action") = "skicka" Then

strRubrik = dbSafe(Request.Form("Rubrik"))
strNyhetsbrevet = dbSafe(Request.Form("Nyhetsbrevet"))

Set objMess = Server.CreateOBject("JMail.Message")

objMess.From = "[email protected]"
objMess.FromName = "Dunken.se"

' Loopa igenom alla som skall ha detta nyhetsbrev!
Set objCon = openCon()
Set objRs = objCon.Execute("SELECT Distinct(Epost) FROM Kunder WHERE Nyhetsbrev = 'T'")
Do Until objRs.Eof
objMess.AddRecipientBCC objRs("Epost")
objRs.MoveNext
Loop
Set objRs = Nothing
closeCon(objCon)

objMess.Subject = strRubrik
objMess.HtmlBody = strNyhetsbrevet

objMess.Send("mail.dunken.se")
' detta är linje 37!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!! !!!!!!!!!!!!!!
Set objMess = nothing

Session("strMess") = "Nyhetsbrevet är nu skickat!"
Response.Redirect("SkickaNyhetsbrev.asp")


End If



Felet som kommer upp på bägge sidorna är detta.

jmail.Message error '8000ffff'

The message was undeliverable. All servers failed to receive the message

/admin/SkickaNyhetsbrev.asp, line 37


Någon som kan hjälpa ?