Mailform
Jeg har denne fra Surftown:<% @ LANGUAGE = VBSCRIPT %>
<html>
<body>
<%
set msg = Server.CreateOBject("JMail.Message")
' Angiv din afsender-adresse
' - den skal være oprettet på webhotellet
msg.From = Request.Form("Mailadresse")
msg.FromName = Request.Form("Navn")
' Tilføj e-mail-adresse og navn på modtageren
msg.AddRecipient "mail@domain.com", "Navn på modtager"
' Angiv et emne for e-mailen
msg.Subject = "Titel"
' Selve teksten (body)
msg.Body = Request.Form("Body")
' Send mailen - ved at angive navnet på mail-serveren
if (not msg.Send("mailoutb1.surf-town.net")) then
Response.write "<p>" & msg.log & "</p>"
else
Response.write "The form has been sent!"
end if
%>
</body>
</html>
