Enviar formulário por e-mail

  • ViNaWeb

19 de fev, 2009

Postei anteriormente sobre o Gerador de formulário,  mas o resultado é somente o formulário. Para completar é necessário ter um script de envio.

Lembro que este post é o básico do básico, deve ser encrementado para checagem de erros, etc. O objetivo é mostrar o funcionamento.

1 – Formulário

O formulário é aonde o usuário vai inserir as informações, neste caso nosso formulário tem somente um campo.  Para testar código que está dentro da caixa abaixo e crie um arquivo com nome formulario.html.

formulario.html

<form action=”envia.asp” method=”post”>
<input name=”campo” type=”text”><br/>
<input type=”submit”>
</form>


2 -Script de envio em ASP

Neste script você recebe os campos que foram enviados, trabalha os campos se for necessário, etc. Neste caso utilizei um componente de envio chamado CDONT’S, bem antiguinho, porém simples. Para ter uma melhor performance recomendo usar o CDOsys.

envia.asp

<%

‘configura
rementente        = “[email protected]
destinatario       = “[email protected]
assunto                = “Envio de formulário usando ASP”

‘corpo da mensagem
mensagem = mensagem & “Usando ASP<br>”
mensagem = mensagem & “Mensagem: ” & request(“campo”)
‘o request(“”) recebe o campo, ex: request(“campo1”), request(“campo2”)…

‘componente de envio

Set Envia = Server.Createobject(“CDONTS.Newmail”)
Envia.To = rementente
Envia.From = var_email
Envia.Subject = assunto
Envia.BodyFormat = 1
Envia.MailFormat = 1
Envia.Body = mensagem
Envia.Send
Set Envia = Nothing ‘confirmação do envio
response.write “Mensagem enviada com sucesso usando ASP!”

%>


3 -Referências