Logisk forklaring på fejl (mail function)

min function

function sendmail(modtagermail, modtagernavn, emne, besked, importance)

'on error resume next

  Set jmail = Server.CreateObject("JMail.Message")
  jmail.Clear()
  jmail.AddRecipient modtagermail, modtagernavn
  jmail.From = "kontakt@mineveninder.dk"
  jmail.FromName = "MineVeninder.dk"
  '1 = High
  '3 = Normal
  '4 = Low
  jmail.priority = importance
  jmail.Subject = emne

  'Til dem der ikke har mulighed for at læse HTML mails, skriver vi lige en lille besked
  jmail.Body = "Denne mail kan kun læses hvis din mailklient understøtter HTML Mails."
  jmail.HTMLBody = besked
  jmail.Send "mail.lund.dk"
  set JMail = nothing

end function

Formentlig
Sendmail request.form("email") , request.form("navn") , "Bekræft venligst din bruger på mineveninder.dk",strbesked,3

Det er også prøvet, og giver også fejl..

Nå ja, men lav det til en sub i stedet for:

  sub sendmail(...
  ...
  end sub

Den afleverer ikke noget værdi, og skal derfor ikke være en funktion. Så skulle min konstruktion fungere.

Jamen det vil jeg da lige teste så :)

Nå, det giver samme resultat,nemlig fejl

jeg har prøvet at udskrive alle værdier i functionen for at være 100% de nu kommer med ind i functionen, og det gør de.. dvs bla modtagermail og modtagernavn er IKKE tomme..

så jeg forstår det virkelig ikke..

må jeg se hvad du gør?

Jo da, men er forklaret


strBesked = "Hej " & rs("navn") & "<br/>"
strBesked = strBesked & "Mineveninder.dk har aktiveret din bruger, og du kan nu komme i gang med at bruge din profil på www.mineveninder.dk<br/><br/>"
strBesked = strBesked & "Denne aktivering er sket manuelt af mineveninder.dk."

Sendmail rs("email"),rs("navn"),"Din brugerprofil på mineveninder.dk er aktiveret",strbesked,3


denne sender jeg igennem denne function/sub


sub sendmail(strmodtagermail,strmodtagernavn,stremne,strbesked,strimportance)

'on error resume next

  Set jmail = Server.CreateObject("JMail.Message")
  jmail.Clear()
  jmail.AddRecipient strmodtagermail, strmodtagernavn
  jmail.From = "kontakt@mineveninder.dk"
  jmail.FromName = "MineVeninder.dk"
  '1 = High
  '3 = Normal
  '4 = Low
  jmail.priority = importance
  jmail.Subject = stremne

  'Til dem der ikke har mulighed for at læse HTML mails, skriver vi lige en lille besked
  jmail.Body = "Denne mail kan kun læses hvis din mailklient understøtter HTML Mails."
  jmail.HTMLBody = strbesked
  jmail.Send "mail.lund.dk"
  set JMail = nothing

end sub




og det giver mig fejlen
mail.Message error '8000ffff'

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

jeg er klar over jeg bruger mail.lund.dk at sende igennem, på mineveninder.dk men det er OK, da den test-server jeg er på lige nu, ligger mineveninder.dk ikke, og bruger mit andet domæne's mailserver at sende igennem..


problemet er jeg får fejl når jeg skriver
Sendmail rs("email"),rs("navn"),"Din brugerprofil på mineveninder.dk er aktiveret",strbesked,3

men den sender fint hvis jeg skriver modtager mail direkte

Sendmail kevin@lund.dk,KevinLund,"Din brugerprofil på mineveninder.dk er aktiveret",strbesked,3

Mon ikke mail.lund.dk kun kan sende mails til adresser med på formen @lund.dk ?

et par dage siden, men er ved at rydde lidt op.. smit et svar for at få point for indsatsen

Ingen point til mig, tak.