HEX

File: D:/HostingSpaces/TWijnstra/wijnstra.com/frontfactory.com/oude_versie_(flashkubus)/mail.asp

<%@ Language=VBScript %>
<HTML>
<HEAD>
</HEAD>
<BODY>
<%Response.Write("Thank you for your interest.. closing window....")
'*** Load Constants
SENDTO = "tjerk.wijnstra@crexx.nl"
SUBJECT = "Form Reply-Response Example"
'*** Post values to the form
name = Request("Name")
email = Request("Address")
Message = Request("Message")


'*** Build message body

BodyString = BodyString & "Email =  " & email & VbCrLf
if not Message = "" then BodyString = BodyString & "message =  " & Message & VbCrLf end if

'***Begin Send mail to customer***
   Set myMail = Server.CreateObject("CDONTS.NewMail")         
   myMail.From = Request("Name")
   myMail.To = SENDTO
   myMail.Subject = "FRONT FACTORY AANVRAAG"
   myMail.Body = BodyString
   myMail.Send
   Set myMail = Nothing
'***End Send mail to customer***
%>
<script language="javascript"> window.history.go(-1); </script>


</BODY>
</HTML>