ASP+Flash

[du_rio 0]

Olá!minha 1º participação aki e já vou abusando da boa vontade de vcs.é o seguinte: fiz um site em Flash q contém um pequeno form. para minha surpresa, o servidor onde hospedei os arqs me gerou um problema na hora do envio do tal form diretamente para a cx de e-mail do cliente. depois de muita briga eles "resolveram" meu problema desenvolvendo um script em ASP, porém não sei absolutamente nada de ASP! dai peço um help a vcs.o q eu preciso: o form é peq com apenas: nome, e-mail, tel, end e o campo de msg, de quem está preenchendo o form.mas!!!!!!! que ao enviar o form vá direto para o e-mail "contatos@empresa.com.brtem uma linha que eu achei muito estranha que um tal: 'objCDOSYSMail.AddAttachment("e:\home\ewbank1\web\teste\anexocdosys.jpg"), que acredito ter sido para testar o script.De qualquer forma..... estou colocando o script abaixo (desculpem pelo TAMANHO deste post, ok?) se alguem puder ajudar, eu agradeço muiiiiiiiiito! meu e-mail: durio101@ig.com.br<% if request("nomerem") <> "" then 'cria o objeto para o envio de e-mail Set objCDOSYSMail = Server.CreateObject("CDO.Message") 'cria o objeto para configuração do SMTP Set objCDOSYSCon = Server.CreateObject ("CDO.Configuration") 'SMTP objCDOSYSCon.Fields("http://schemas.microsoft.com/cdo/configuration/smtpserver") = "smtp2.locaweb.com.br" 'porta do SMTP objCDOSYSCon.Fields("http://schemas.microsoft.com/cdo/configuration/smtpserverport") = 25 'porta do CDO objCDOSYSCon.Fields("http://schemas.microsoft.com/cdo/configuration/sendusing") = 2 'timeout objCDOSYSCon.Fields("http://schemas.microsoft.com/cdo/configuration/smtpconnectiontimeout") = 30 objCDOSYSCon.Fields.update 'atualiza a configuração do CDOSYS para o envio do e-mail Set objCDOSYSMail.Configuration = objCDOSYSCon 'e-mail do remetente objCDOSYSMail.From = trim(request.form("nomerem")) & "<" & trim(request.form("emailrem")) & ">" 'e-mail do destinatário objCDOSYSMail.To = trim(request.form("emaildest")) 'anexo 'objCDOSYSMail.AddAttachment("e:\home\ewbank1\web\teste\anexocdosys.jpg") 'assunto da mensagem objCDOSYSMail.Subject = request.form("assunto") 'conteúdo da mensagem objCDOSYSMail.TextBody = request.form("recado") 'objCDOSYSMail.fields.update 'envia o e-mail objCDOSYSMail.Send 'destrói os objetos Set objCDOSYSMail = Nothing Set objCDOSYSCon = Nothing response.write "E-mail enviado com Sucesso..." end if%>Super obrigado a todos!!!!!!!!!!!!!

[kheros 0]

Olá!

minha 1º participação aki e já vou abusando da boa vontade de vcs.

é o seguinte: fiz um site em Flash q contém um pequeno form.  para minha surpresa, o servidor onde hospedei os arqs me gerou um problema na hora do envio do tal form diretamente para a cx de e-mail do cliente.  depois de muita briga eles "resolveram" meu problema desenvolvendo um script em ASP, porém não sei absolutamente nada de ASP!  dai peço um help a vcs.

 

o q eu preciso: o form é peq com apenas: nome, e-mail, tel, end e o campo de msg, de quem está preenchendo o form.

mas!!!!!!! que ao enviar o form vá direto para o e-mail "contatos@empresa.com.br

 

tem uma linha que eu achei muito estranha que um tal: 'objCDOSYSMail.AddAttachment("e:\home\ewbank1\web\teste\anexocdosys.jpg"), que acredito ter sido para testar o script.

 

De qualquer forma..... estou colocando o script abaixo (desculpem pelo TAMANHO deste post, ok?) se alguem puder ajudar, eu agradeço muiiiiiiiiito! meu e-mail: durio101@ig.com.br

 

 

<% if request("nomerem") <> "" then

'cria o objeto para o envio de e-mail

Set objCDOSYSMail = Server.CreateObject("CDO.Message")

'cria o objeto para configuração do SMTP

Set objCDOSYSCon = Server.CreateObject ("CDO.Configuration")

'SMTP

objCDOSYSCon.Fields("http://schemas.microsoft.com/cdo/configuration/smtpserver") = "smtp2.locaweb.com.br"

'porta do SMTP

objCDOSYSCon.Fields("http://schemas.microsoft.com/cdo/configuration/smtpserverport") = 25

'porta do CDO

objCDOSYSCon.Fields("http://schemas.microsoft.com/cdo/configuration/sendusing") = 2

'timeout

objCDOSYSCon.Fields("http://schemas.microsoft.com/cdo/configuration/smtpconnectiontimeout") = 30

objCDOSYSCon.Fields.update

'atualiza a configuração do CDOSYS para o envio do e-mail

Set objCDOSYSMail.Configuration = objCDOSYSCon

'e-mail do remetente

objCDOSYSMail.From = trim(request.form("nomerem")) & "<" & trim(request.form("emailrem")) & ">"

'e-mail do destinatário

objCDOSYSMail.To = trim(request.form("emaildest"))

'anexo

'objCDOSYSMail.AddAttachment("e:\home\ewbank1\web\teste\anexocdosys.jpg")

'assunto da mensagem 

objCDOSYSMail.Subject = request.form("assunto")

'conteúdo da mensagem

objCDOSYSMail.TextBody = request.form("recado")

'objCDOSYSMail.fields.update

'envia o e-mail

objCDOSYSMail.Send

'destrói os objetos

Set objCDOSYSMail = Nothing

Set objCDOSYSCon = Nothing

response.write "E-mail enviado com Sucesso..."

end if

%>

 

Super obrigado a todos!!!!!!!!!!!!!

<{POST_SNAPBACK}>

===================================================

:P

Pelo conhecimento que tenho é o seguinte:

 

http://forum.imasters.com.br/public/style_emoticons/default/assobiando.gif esse código a baixo indica que você está enviando uma imagem em anexo quando envia a mensagem!

 

tem uma linha que eu achei muito estranha que um tal: 'objCDOSYSMail.AddAttachment("e:\home\ewbank1\web\teste\anexocdosys.jpg"), que acredito ter sido para testar o script.

Agora você tem que saber qual a tecnologia que seu servidor utiliza para o envio d e-mail's

 

ASP

[*]

 

[*]Pergunta para o suporte se é: ASPEMAIL e o Jmail ou CDconts

 

Depois partimos para fazer o formulário em Asp.

:lol:

Aguardo posts...

B)

Kheros

[Mário Monteiro 179]

o basico pra começar é isso mesmo saber que recursos o server tyem...pra não ter trabalho em vão...

[du_rio 0]

Oládesculpe pela demora, mas andei pra lá de enrolado durante a semana.respondendo sua pergunta, o suporte é Cdontes, ok?obrigado pela atenção e pela força!

[kheros 0]

Olá

desculpe pela demora, mas andei pra lá de enrolado durante a semana.

 

respondendo sua pergunta, o suporte é Cdontes, ok?

 

obrigado pela atenção e pela força!

<{POST_SNAPBACK}>

http://forum.imasters.com.br/public/style_emoticons/default/blush.gif

 

De CDconts non sei muito...

 

mas sei que eh mais ou menos parecido com os outros

 

1 form

2 enviar.asp

e

3 obrigado.*

 

o dê atenção as "instancias" do form (não sei explicar direito, mas é o nome que você dá ao objeto ou campo a ser preenchido online!)

 

então as instancias serão chamadas no enviar.asp

 

coisa que não sei fazer mas tem aki no fórum um tutorial :

http://www.imasters.com.br/forum/index.php...T&f=26&t=117244

 

neste você vê as diferenças e faz o seu enviar.asp

[du_rio 0]

Valeu kheros!!!!vou dar uma olhada no script e depois te dou um retorno, ok?abração!