<% op = request("op") if op = "enviar" then nome = request("nome") email = request("email") telefone = request("telefone") mensagem = request("mensagem") msg = "Formulário enviado através do site - Programa Playground

Nome: "&nome&"
Email: "&email&"
Telefone: "&telefone&"

Mensagem: "&mensagem&"
" SET Mailer = Server.CreateObject("CDONTS.NewMail") Mailer.From = ""&nome&" <"&email&">" 'Mailer.TO = "Programa Playground " Mailer.TO = "Programa Playground " Mailer.Subject = "Formulário enviado através do site - Programa Playground" Mailer.MailFormat = 0 'MIME Mailer.BodyFormat = 0 '0 HTML / 1 Text Mailer.Body = msg Mailer.Send erro = "alert('Mensagem enviada com sucesso, obrigado.')" end if %> Programa PLayground



Fale com o Play:
Nome:
E-mail:
Telefone:
Mensagem:
 


   
   

Confira aqui nossa próxima oficina




                                                                    Patrocinador                                Apoiadores
        |                     

© 2007 mbetti - Todos os direitos reservados • Programa Playground •  Desenvolvido por mbetti