Agora apresento um formulário feito em ASP, também de forma bem simples e funcional!
O HTML
Sem segredos aqui, uma página simples html, com campos de nome, telefone, email, mensagem e botão enviar, todos dentro de uma tag form, que tem por action enviar_email.asp, que é o arquivo asp que editaremos a seguir.
O arquivo enviar_email.asp
Este pequeno arquivo é o que faz tudo funcionar, acompanhe o código comentado.
<%
Option Explicit
Dim var_nome, var_fone, var_mail, var_comentario, var_to, EnviarMail, MsgBody //Aqui declaramos as variáveis
//abaixo, usamos as variáveis que declaramos e fazemos um request, solicitando os dados que foram digitados no formulário em html
var_nome = Request.QueryString("txtnome")
var_fone = Request.QueryString("txtfone")
var_mail = Request.QueryString("txtemail")
var_comentario = Request.QueryString("txtcomentario")
var_to = "seuemail@seudominio.com.br" //preencha aqui com seu email
Set EnviarMail = Server.CreateObject("CDONTS.NewMail")
EnviarMail.To = var_to
EnviarMail.From = var_mail
EnviarMail.Subject = "Meu Site - Contatos" //nesta linha você define qual será o título do email recebido
//abaixo temos uma configuração html simples, de como o email chegará e será exibido para você
MsgBody = "Você recebeu uma mensagem de " & var_nome & ", email " & var_mail & ", Telefone " & var_fone & ", e fez o seguinte comentário:
" & var_comentario & "
"
EnviarMail.Body = MsgBody
EnviarMail.Importance = 1
EnviarMail.BodyFormat = 0
EnviarMail.MailFormat = 0
EnviarMail.Send
Set EnviarMail = Nothing
//quando tudo estiver terminado, o usuário será redirecionado para uma página, no caso obrigado.html, crie uma página de agradecimento com este nome, ou redirecione o usuário para outro lugar.
Response.redirect "Obrigado.html"
%>
Com isso já conseguimos fazer um formulário simples e funcional!
Quer outro exemplo? Confira neste site http://www.tele-pro.co.uk/scripts/contact_form/, aqui você tem um gerador de formulários, tanto em asp quanto em php, vale a pena conferir!






0 comentários:
Postar um comentário