%@LANGUAGE="VBSCRIPT" CODEPAGE="1252"%>
<%
'Pega os valores do formulario
var_nome = Request("nome")
var_email = Request("email")
var_telefone = Request("telefone")
var_assunto = Request("assunto")
var_mensagem = Replace(Request("mensagem"),vbcrlf,"
")
'Se os campos tiverem algum conteudo, escreve o email
if var_nome <> "" then
email_contato = ""
email_contato = email_contato & "
|
|
|||||||
|
|||||||