Formmail med Jmail...

Lav en formular, og kald felterne for Navn, Firma, Email, Besked.
Sæt Action til \"mail.asp\" og gem så dette i en fil du kalder \"mail.asp\":
---------------------------------------------------------------------------

<%

Navn = Request.Form(\"Navn\")
Firma= Request.Form(\"Firma\")
Email = Request.Form(\"Email\")
Besked = Request.Form(\"Besked\")

SenderEmail = Request.Form(\"Email\")
Recipient = Request.Form(\"recipient\")
Body = Request.Form(\"body\")


Set JMail = Server.CreateObject(\"JMail.SMTPMail\")
if Navn<>\"\" AND Firma<>\"\" AND Email<>\"\" AND Besked<>\"\" Then
    JMail.ServerAddress = \"XXXXX.XXXXXXX.XX\"
    JMail.AddRecipient \"DIN@ADRESSE.DK\"
    JMail.Sender = SenderEmail
    JMail.Subject = \"TITEL PÅ MAIL\"
   
body =
<p align=\"center\">MULIG TEKST I TOPPEN!</p>
<div align=\"center\">
  <center>
  <table border=\"1\" cellpadding=\"0\" cellspacing=\"0\" bordercolor=\"#3366FF\" bordercolordark=\"#3366FF\" bordercolorlight=\"#3333FF\">
    <tr>
      <td>Navn</td>
      <td>(\"Navn\")</td>
    </tr>
    <tr>
      <td>Firma: </td>
      <td>(\"Firma\")</td>
    </tr>
    <tr>
      <td>Email:</td>
      <td>(\"email\")</td>
    </tr>
    <tr>
      <td>Besked:</td>
      <td>(\"Besked\")</td>
    </tr>
  </table>
  </center>
</div>

    JMail.Body = Body
    JMail.Priority = 3
    JMail.AddHeader \"Originating-IP\", Request.ServerVariables(\"REMOTE_ADDR\")
    JMail.Execute


    response.write \"Din mail er nu afsendt.<br> Tryk på Backspace for at komme tilbage.\"
else
    response.write \"En eller flere af oplysningerne blev ikke indtastet, gå venligst tilbage og indtast alle oplysninger.\"
end if
%>

Hm...eller:

<%

Navn = Request.Form(\"Navn\")
Firma= Request.Form(\"Firma\")
Email = Request.Form(\"Email\")
Besked = Request.Form(\"Besked\")

SenderEmail = Request.Form(\"Email\")
Recipient = Request.Form(\"recipient\")
Body = Request.Form(\"body\")


Set JMail = Server.CreateObject(\"JMail.SMTPMail\")
if Navn<>\"\" AND Firma<>\"\" AND Email<>\"\" AND Besked<>\"\" Then
    JMail.ServerAddress = \"XXXXX.XXXXXXX.XX\"
    JMail.AddRecipient \"DIN@ADRESSE.DK\"
    JMail.Sender = SenderEmail
    JMail.Subject = \"TITEL PÅ MAIL\"
   
    body = \"Navn: \" & vbcrlf & navn & vbcrlf & vbcrlf & \"Firma: \" & vbcrlf & Firma & vbcrlf & vbcrlf & \"Email: \" & vbcrlf & email & vbcrlf & vbcrlf & \"Besked: \" & besked

    JMail.Body = Body
    JMail.Priority = 3
    JMail.AddHeader \"Originating-IP\", Request.ServerVariables(\"REMOTE_ADDR\")
    JMail.Execute


    response.write \"Din mail er nu afsendt.<br> Tryk på Backspace for at komme tilbage.\"
else
    response.write \"En eller flere af oplysningerne blev ikke indtastet, gå venligst tilbage og indtast alle oplysninger.\"
end if
%>

netsrac<--> Kan du SÅ lade være med at optimere min kode ;o)

tommyf >> Sorry.. :-)

Grrrrrrr