Help
Quero fazer um formulário de envio de e-mail no meu site em flash. Mas a hospedagem disse que tenho que usar o ASPMail.
Até andei estudando um exemplo, mas ele usava um tal de CDonts.
Alguem tem como me ajudar com isso me mandando um tutorial com o tal ASPMail ou algum .FLA.
Valeu !
Publicidade
|
|
Page 1 of 1
Problemas com Flash + ASPMail
#2
jivandf 
- Group: Membros
- Posts: 4
- Joined: 08-December 05
Posted 02 January 2006 - 10:26 AM
cria a página asp que recupera os dados e envia o email.
CODE
<%
Dim var_nome, var_data, var_mail, var_telefone, var_cidade, var_mensagem, myMail
var_nome = request.form("Nome")
var_data = request.form("Data")
var_mail = request.form("Email")
var_telefone = request.form("Telefone")
var_cidade = request.form("Cidade")
var_mensagem = request.form("Mensagem")
Set myMail = CreateObject("CDONTS.NewMail")
HTML = "<!DOCTYPE HTML PUBLIC ""-//IETF//DTD HTML//EN"">" & NL
HTML = HTML & "<html>"
HTML = HTML & "<head>"
HTML = HTML & "<meta http-equiv=""Content-Type"""
HTML = HTML & "content=""text/html; charset=iso-8859-1"">"
HTML = HTML & "<title>Exemplo de envio de email HTML com Anexo</title>"
HTML = HTML & "</head>"
HTML = HTML & "<body bgcolor=""#FFFFFF"">"
HTML = HTML & "<p><font size=""2"" face=""Verdana"">"& var_nome &" enviou-lhe um contato via seu site dia "& var_data &" contendo os seguintes dados: <br>"
HTML = HTML & "Nome: "& var_nome &"<br>"
HTML = HTML & "Email: "& var_mail &"<br>"
HTML = HTML & "Telefone: "& var_telefone &"<br>"
HTML = HTML & "Cidade: "& var_cidade &"<br>"
HTML = HTML & "Mensagem: "& var_mensagem &"<br>"
HTML = HTML & "</strong></font></p>"
HTML = HTML & "</body>"
HTML = HTML & "</html>"
myMail.From = var_mail ' Remetente
myMail.To = "email@email.com" ' Destinatário
myMail.Subject = "Contato via site" ' Assunto do e-mail
myMail.BodyFormat = 0
myMail.MailFormat = 0
myMail.Body = HTML ' Corpo da mensagem definido na variável HTML
myMail.Send
Set myMail = Nothing
Response.Write "Muito obrigado "& var_nome &" pelo seu contato."
%>
Dim var_nome, var_data, var_mail, var_telefone, var_cidade, var_mensagem, myMail
var_nome = request.form("Nome")
var_data = request.form("Data")
var_mail = request.form("Email")
var_telefone = request.form("Telefone")
var_cidade = request.form("Cidade")
var_mensagem = request.form("Mensagem")
Set myMail = CreateObject("CDONTS.NewMail")
HTML = "<!DOCTYPE HTML PUBLIC ""-//IETF//DTD HTML//EN"">" & NL
HTML = HTML & "<html>"
HTML = HTML & "<head>"
HTML = HTML & "<meta http-equiv=""Content-Type"""
HTML = HTML & "content=""text/html; charset=iso-8859-1"">"
HTML = HTML & "<title>Exemplo de envio de email HTML com Anexo</title>"
HTML = HTML & "</head>"
HTML = HTML & "<body bgcolor=""#FFFFFF"">"
HTML = HTML & "<p><font size=""2"" face=""Verdana"">"& var_nome &" enviou-lhe um contato via seu site dia "& var_data &" contendo os seguintes dados: <br>"
HTML = HTML & "Nome: "& var_nome &"<br>"
HTML = HTML & "Email: "& var_mail &"<br>"
HTML = HTML & "Telefone: "& var_telefone &"<br>"
HTML = HTML & "Cidade: "& var_cidade &"<br>"
HTML = HTML & "Mensagem: "& var_mensagem &"<br>"
HTML = HTML & "</strong></font></p>"
HTML = HTML & "</body>"
HTML = HTML & "</html>"
myMail.From = var_mail ' Remetente
myMail.To = "email@email.com" ' Destinatário
myMail.Subject = "Contato via site" ' Assunto do e-mail
myMail.BodyFormat = 0
myMail.MailFormat = 0
myMail.Body = HTML ' Corpo da mensagem definido na variável HTML
myMail.Send
Set myMail = Nothing
Response.Write "Muito obrigado "& var_nome &" pelo seu contato."
%>
Share this topic:
Page 1 of 1
Similar Topics
| Topic | Forum | Started By | Stats | Last Post Info | |
|---|---|---|---|---|---|
|
Slacker personaliza rádio via Internet com rival do iPod
|
Notícias |
Notícias
|
|
|
|
|
Problemas Para Configurar Php Com Dreamweaver
|
Dreamweaver |
Aramidas
|
|
|
|
|
Problemas com variáveis
não consigo receber variavel na função |
Flash & ActionScript |
mili
|
|
|
|
|
Ajuda
Dúvida de como fazer upload... |
PHP |
cinhu
|
|
|
|
|
Problemas para passar variável no form
|
PHP |
Uriel Juliatti
|
|
|
|
|
Autor pretende fazer games com HQ "Cogumelos ao Entardecer"; leia entrevista
|
Notícias |
Notícias
|
|
|
|
|
Google começa a cobrar espaço extra de armazenamento em serviços online
|
Notícias |
Notícias
|
|
|
|
flash + php em guestbook....
uma coisa anormal...!!1 |
Flash & ActionScript |
potain
|
|
Publicidade
|
|