<%@EnableSessionState=False%> <% Response.Expires = 0 Response.ExpiresAbsolute = Now() - 1 Response.AddHeader "pragma","no-cache" Response.AddHeader "cache-control","private" Response.CacheControl = "no-cache" Set Mail = Server.CreateObject("Persits.MailSender") Mail.Host = "Mail.Inteflux.com" Mail.Port = 25 Mail.Charset = "ISO-8859-1" Mail.ContentTransferEncoding = "quoted-printable" Mail.From = "gmonton@europebyair.com" Mail.FromName = "europebyair.com website visitor" Mail.Subject = "europebyair.com feedback (neu) " & FormatDateTime (Date, 1) & " " & FormatDateTime (Now, 3) Mail.Body = Mail.body & "First name: " & Request.Form("firstname") & chr(13) & chr(10) Mail.Body = Mail.body & "Surname: " & Request.Form("lastname") & chr(13) & chr(10) Mail.Body = Mail.body & "Email: " & Request.Form("email") & chr(13) & chr(10) & chr(13) & chr(10) Mail.Body = Mail.body & "Comments: " & chr(13) & chr(10) & Request.Form("comment") & chr(13) & chr(10) & chr(13) & chr(10) Mail.AddAddress "hello@europebyair.com" Mail.AddCC "gmonton@europebyair.com" 'Mail.AddBCC "magnus.paulin@iconmedialab.com" On Error Resume Next Mail.SendToQueue 'Mail.Send If Err <> 0 Then Response.Write "An error occurred: " & Err.Description End If %>




Contact Form

We value your feedback and comments, Thanks!