Hvordan er det nu lige?

Du skal havde mulighed for at bruge en mail kompuenent enten JMail/ASPmail/ASPEmail eller en helt anden.. Eks med Jmail.


<%
if Request.ServerVariables("REQUEST_METHOD") = "POST" then

  Set JMail          = Server.CreateObject("JMail.SMTPMail")
  JMail.ServerAddress = "mail.XXXXX.dk"
  JMail.Sender        = "hjemmeside@XXXXXXX.dk"
  JMail.SenderName    = "Ris/Ros Sidenr"
  JMail.Subject      = "Du modtager nu ris eller ros"
  JMail.AddRecipient  "dinmail@XXX.dk"
 
  JMail.Body = "Hej " & vbCrLf & vbCrLf
  JMail.Body = JMail.Body & "Denne person:" & vbCrLf
  JMail.Body = JMail.Body & "Navn : " & Request.Form("navn") & vbCrLf
  JMail.Body = JMail.Body & "Email : " & Request.Form("eamil") & vbCrLf

  JMail.Body = JMail.Body & "Har givet denne kommentar: " & Request.Form("risros") & vbCrLf
  JMail.Body = JMail.Body & vbCrLf
  JMail.Body = JMail.Body & "Hilsen din hjemmeside"
 
  JMail.Execute
 
  Set JMail = Nothing
%>
<center>Tak for din kommentar.</center>

<% else %>

<form method="POST" action="">
<table align="center">
<tr><td>Navn</td><td><input type="text" name="navn"></td></tr>
<tr><td>Email</td><td><input type="text" name="Email"></td></tr>
<tr><td>besked</td><td><input type="text" name="risros"></td></tr>
<tr><td colspan="2"><input type="submit" value="Send" name="Send"></td></tr>
</table>
</form>

<% end if %>
</body>
</html>