Thank you for contacting Bahia Marina
We will get back to you as soon as possible
.
Avenida Contorno, Nº1010 – Comércio
Salvador – Bahia – Brazil
ZIP Code – 40.015 – 230
Our phone number is: 55-71-322-7244
<%
snome = Request.Form("nome")
stel = Request.Form("telefone")
semail = Request.Form("email")
sass = Request.Form("assunto")
smsg = Request.Form("mensagem")
sToEmail = "atendimento@bahiamarina.com.br"
'sToEmail = "sergio@exahost.com.br"
Set Mail = Server.CreateObject("Persits.MailSender")
Mail.Host = "sharedrelay.dominal.com"' Specify a valid SMTP server
Mail.From = semail' Specify sender's address
Mail.FromName = snome' Specify sender's name
Mail.AddAddress sToEmail
Mail.Subject = "Fale Conosco - Bahia Marina"
strBody = ""
strBody = strBody & " "
strBody = strBody & " | "
strBody = strBody & " | "
strBody = strBody & " | "
strBody = strBody & "Nome: " & snome & " | "
strBody = strBody & "Telefone: " & stel & " | "
strBody = strBody & "E-mail: " & semail & " | "
strBody = strBody & " Assunto: " & sass & " | "
strBody = strBody & "Mensagem: " & smsg & " | "
strBody = strBody & "
"
Mail.Body = strBody
Mail.IsHTML = TRUE
'On Error Resume Next
Mail.Send
Set Mail = Nothing
%>
|