<% sidenavn = "navnet på asp siden.asp" modtagermail = "mail@dine mail adresse .dk" If Request("Send") <> "" Then Set Mail = Server.CreateObject("Persits.MailSender") Mail.Host = "localhost" Mail.From = Request("From") ' From address Mail.FromName = Request("FromName") ' optional Mail.AddAddress modtagermail ' message subject Mail.Subject = Request("Subject") ' message body Mail.Body = Request("Body") strErr = "" bSuccess = False On Error Resume Next ' catch errors Mail.Send ' send message If Err <> 0 Then ' error occurred strErr = Err.Description else bSuccess = True End If End If %> AspEmail

AspEmail

<% If strErr <> "" Then %>

Error occurred: <% = strErr %>

<% End If %> <% If bSuccess Then %>

Success! Message sent to <% = Request("To") %>.

<% End If %>
Host (change as necessary in script): <% = strHost %>
From (enter sender's address):
FromName (optional, enter sender's name):
Subject:
Body: