<% Session.CodePage = 65001 ' Change this to your own SMTP server strHost = "" if Request("submit") <> "" Then Set Mailer = Server.CreateObject("SMTPsvg.Mailer") Mailer.FromName = "gwbrasil.com.br" Mailer.FromAddress= "wanderley@gwbrasil.com.br" Mailer.RemoteHost = "localhost" Mailer.AddRecipient "Recipient Email address", "wanderley@gwbrasil.com.br" Mailer.Subject = "Contato do Site" ' Enable Unicode ' Message body Mailer.BodyText = "Nome: " & Request.form("nome") & chr(13) & chr(13) & vbcrlf & "E-mail: " & Request.form("email") & chr(13) & chr(13) & vbcrlf & "Telefone: (" & Request.form("ddd1") & ")" & Request.form("telefone1") & chr(13) & chr(13) & vbcrlf & "Telefone: (" & Request.form("ddd2") & ")" & Request.form("telefone2") & chr(13) & chr(13) & vbcrlf & "Como Chegou no site: " & Request.form("comochegou") & chr(13) & chr(13) & vbcrlf & "Mensagem: " & chr(13) & Request.form("mensagem") & vbcrlf On Error Resume Next Mailer.SendMail ' Send message If Err = 0 then txtMsg = "" Else txtMsg = "" End If End If %> GW Brasil - Fabricante Especializado em Abraçadeiras
   
 

 

Certificado ISO 9002

 

Clique para ampliar

 

<% = txtMsg %>
 
 
 

Nome:

"/>

E-mail:

" />

Telefone1:

" />

 

 

Telefone2:

" />

Como chegou ao nosso site?

" />

Mensagem:

 


MAPA DE LOCALIZAÇÃO

 


Exibir mapa ampliado