%
act=request.form("act")
if act="" then
%>
<%
else
tnome = limpatxt(request.form("nome"))
temail = limpatxt(request.form("email"))
tpessoa = limpatxt(request.form("pessoa"))
ttel = limpatxt(request.form("telefone"))
tassunto = limpatxt(request.form("assunto"))
tmensagem = limpatxt(request.form("mensagem"))
tbody=""&now&"
"&_
"Nome: "&tnome&"
"&_
"eMail: "&temail&"
"&_
"Telefone: "&ttel&"
"&_
"Assunto: "&tassunto&"
"&_
"Mensagem: "&tmensagem&""
Set Mail = Server.CreateObject("Persits.MailSender")
Mail.Host = "localhost"
Mail.IsHTML = True
Mail.From = temail
Mail.MailFrom = temail
Mail.FromName = tnome&" [CONTATO JUNDIAÍ VENDAS]"
Mail.AddAddress "jundiaivendas@jundiaivendas.com.br", "Jundiaí Vendas"
Mail.Subject = tassunto
Mail.Body = tbody
On Error Resume Next
Mail.Send
Set Mail = Nothing
%>
<%
end if
%>