Avatar billede elkrog Nybegynder
31. oktober 2001 - 11:49 Der er 6 kommentarer og
1 løsning

JMail sender ikke, hvorfor?

Hej Eksperter

Jeg har lavet en form som sender via JMail.
Det virker fint når jeg sender fra asp-dokumentet.
Men hvis jeg includer det i noget andet, så bliver mailen ikke sendt.

Er der nogen der ved hvorfor?
Avatar billede keysersoze Ekspert
31. oktober 2001 - 11:50 #1
hvad mener du med \"includer i noget andet\"?
Avatar billede webbe Nybegynder
31. oktober 2001 - 11:51 #2
Lad os se noget kode!
Avatar billede elkrog Nybegynder
31. oktober 2001 - 11:52 #3
eks.
Hvis jeg vil include jmail.asp i min default.asp
Avatar billede keysersoze Ekspert
31. oktober 2001 - 11:57 #4
hvad sker der så af fejl?
Avatar billede elkrog Nybegynder
31. oktober 2001 - 12:00 #5
Jeg får ingen fejlmeddelser, jeg modtager bare ingen mail.

Her er en stump (forenklet) kode:

<form method=\"post\" action=\"<%=Request.Servervariables(\"SCRIPT_NAME\")%>\">

    <table width=\"350\" border=\"0\" cellspacing=\"0\" cellpadding=\"4\">
        <tr>
        <td width=\"120\">Dit navn:</td>
        <td><input type=\"text\" name=\"txName\"></td>
        </tr>
        <tr>
        <td width=\"120\">Send til:</td>
        <td><input type=\"text\" name=\"txMail\"></td>
        </tr>
        <tr>
        <td width=\"120\">&nbsp;</td>
        <td><input type=\"submit\" name=\"Submit\" value=\" Send \"></td>
        </tr>
        <tr>
        <td colspan=\"2\" height=\"25\">

<%


    If trim(Request.Form(\"txName\")) <> \"\" AND trim(Request.Form(\"txMail\")) <> \"\" Then
   
        Set msg = Server.CreateObject(\"JMail.Message\")
        msg.Logging = True
        msg.From = trim(Request.Form(\"txMail\"))
        msg.Fromname = trim(Request.Form(\"txName\"))
        msg.AddRecipient \"\"& trim(Request.Form(\"txMail\")) &\"\"
        msg.Subject = \"Hejsa\"
        msg.Body = trim(Request.Form(\"txName\")) &\" har anbefalet dig denne side:\"& vbcrlf
        msg.appendText \"» www.min-side.dk\"

        msg.Send (\"mail.min-side.dk\")
   
    End If

%>
       
        </td>
        </tr>
        </table>

</form>
Avatar billede eagleeye Praktikant
31. oktober 2001 - 23:29 #6

msg.ServerAddress = \"mail.min-side.dk\"
msg.Logging = True
msg.From = trim(Request.Form(\"txMail\"))
msg.Fromname = trim(Request.Form(\"txName\"))
msg.AddRecipient \"\"& trim(Request.Form(\"txMail\")) &\"\"
msg.Subject = \"Hejsa\"
msg.Body = trim(Request.Form(\"txName\")) &\" har anbefalet dig denne side:\"& vbcrlf
msg.appendText \"» www.min-side.dk\"

msg.Execute
set msg=nothing
Avatar billede elkrog Nybegynder
01. november 2001 - 10:15 #7
Desværre ikke.
Avatar billede Ny bruger Nybegynder

Din løsning...

Tilladte BB-code-tags: [b]fed[/b] [i]kursiv[/i] [u]understreget[/u] Web- og emailadresser omdannes automatisk til links. Der sættes "nofollow" på alle links.

Loading billede Opret Preview
Kategori
Kurser inden for grundlæggende programmering

Log ind eller opret profil

Hov!

For at kunne deltage på Computerworld Eksperten skal du være logget ind.

Det er heldigvis nemt at oprette en bruger: Det tager to minutter og du kan vælge at bruge enten e-mail, Facebook eller Google som login.

Du kan også logge ind via nedenstående tjenester