<%act=request.form("act")
if act="upd" then
recipient=request.form("recipient")
tekst=request.form("tekst")
sToEmail="anna@sietzema.com"
sSubject="Website bericht"
sMessage=tekst
sfromemail="webserver@gillis.nl"
set objMail = Server.CreateObject("JMail.SMTPMail")
objMail.Charset = "UTF-8"
objMail.Sender = sFromEmail
objMail.AddRecipient sToEmail
objMail.Subject = sSubject
objMail.lazysend = True
objMail.serveraddress = "127.0.0.1"
objMail.body = sMessage
objMail.Execute
set objMail = nothing
response.redirect "index.htm"
else%>
www.sietzema.com
<%end if%>