Para saber os Preços dos nossos PRODUTOS no Atacado e Varejo, envie uma mensagem ou entre em contato pelo FONE (19) 3831 4710
<% if(request("Send")="Enviar") then Dim Mail Set Mail = Server.CreateObject("Persits.MailSender") Mail.IsHTML = False ' dados para autenticacao no servidor SMTP Mail.Host = "localhost" Mail.Username = "mbianchi@mbianchi.com.br" Mail.Password = "manlio2008" ' email de origem Mail.From = Request.Form("fromemail") Mail.FromName = Request.Form("FromName") Mail.AddAddress "mbianchi@mbianchi.com.br" Mail.Subject = Request.Form("Subject") Mail.Body = Request.Form("Body") On Error Resume Next ' enviar email Mail.Send ' codigo opcional para exibir mensagem de sucesso ou nao ao enviar o email If Err <> 0 Then Response.Write "

Ocorreu um erro: " & Err.Description & "

" End If If Err = 0 Then 'Response.Write("

Obrigado, seu e-mail foi enviado com sucesso!

") Response.Redirect "confirmacao.asp" End If Set Mail = Nothing end if %>

Faltou alguma informação? Sua opinião é muito importante... Fale Conosco!!!


Nome:
Email:
Assunto:
Mensagem:
  
Qualquer informação que desejar, enviaremos ou entraremos em contato para lhe informar. Para melhor atende-lo, deixe seu telefone de contato