tobiasalo
-
Total de itens
1 -
Registro em
-
Última visita
Sobre tobiasalo
tobiasalo's Achievements
0
Reputação
-
fala aê galera.. meu cliente mudou de hospedagem e eu estou me fudendo pra conseguir colocar isso pra funcionar.. antes era aspmail .. agora é cdosys.. coisa que eu nunca trabalhei na vida... vou postar aqui os dados do formulário e os dados da página que processa os dados e envia em asp.. pelo amor de Deus.. estou perdendo uma grana com isso.. ajudem-me please!! formulário: <form name="formulario" action="aspmail_news.asp" method="post" align="center"> <input type="hidden" name="sort" value="true"> <input type="hidden" name="ignorefields" value=""> <input type="hidden" name="onerror" value="http://www.ecotribo.com/news_erro.htm"> <input type="hidden" name="redirect" value="http://www.ecotribo.com/news_sucesso.htm"> <input type="hidden" name="type" value="html"> <input type="hidden" name="host" value="smtp.ecotribo.com"> <input type="hidden" name="subject" value="Contato Ecotribo"> <input type="hidden" name="address" value="ecotribo@ecotribo.com"> <table width="156" height="142" border="2" cellpadding="0" cellspacing="0" bordercolor="#9A8024" id="newsleter" style="position: absolute; border-collapse: collapse; left: 24px; top: 432px; z-index: 17;"> <tr> <tudo width="383" bgcolor="#CBE093" bordercolor="#9A8024" height="16"> <strong><font face="Verdana" size="2"> Newsletter</font></strong></tudo> </tr> <tr> <tudo width="383" height="33"> <p align="left"><font face="Verdana" size="1">Receba a programação da Ecotribo por e-mail</font></tudo> </tr> <tr> <tudo width="383" height="12"> <font face="Verdana" size="1"><strong>Nome:</strong></font></tudo> </tr> <tr> <tudo width="383" height="22"><font color="#5F5728" size="2" face="Arial, Helvetica, sans-serif"> <input name="fromname" type="text" class="input" id="fromname" size="20"> </font></tudo> </tr> <tr> <tudo width="383" height="12"> <font face="Verdana" size="1"><strong>E-mail</strong></font></tudo> </tr> <tr> <tudo width="383" height="22"><font color="#5F5728" size="2" face="Arial, Helvetica, sans-serif"> <input name="from" type="text" class="input" id="from2" size="20"></font></tudo> </tr> <tr> <tudo width="383" height="1"><input type="submit" name="Submit" value="enviar"></tudo> </tr> </table> <div id="climatempo" style="position:absolute; width:131px; height:46px; z-index:20; left: 621px; top: 113px; visibility: visible;"><a href=http://selos.climatempo.com.br target=_blank> <img src=http://selos.climatempo.com.br/rj-riodejaneiro.gif border=0 width="122" height="132"></a></div> </form> AGORA A PORCARIA DO CDO <% msgHTML = "<HTML><BODY>Escreva aqui o texto do seu e-mail</BODY></HTML>" ' Definindo uma variavel auxiliar sch = "http://schemas.microsoft.com/cdo/configuration/" ' Criando o objeto de configuração do CDO Set cdoConfig = Server.CreateObject("CDO.Configuration") ' Definindo as configurações cdoConfig.Fields.Item(sch & "sendusing") = 2 cdoConfig.Fields.Item(sch & "smtpauthenticate") = 1 cdoConfig.Fields.Item(sch & "smtpserver") = "smtp.ecotribo.com" cdoConfig.Fields.Item(sch & "sendusername") = "ecotribo=ecotribo.com" cdoConfig.Fields.Item(sch & "sendpassword") = "xxxxx" cdoConfig.fields.update ' Criando o objeto de msg do CDO Set cdoMessage = Server.CreateObject("CDO.Message") ' Associando as configurações ao obj Mensagem Set cdoMessage.Configuration = cdoConfig ' Definido variaveis da msg cdoMessage.From = "ecotribo@ecotribo.com" cdoMessage.To = "ecotribo@ecotribo.com" cdoMessage.Subject = "TITULO DO E-MAIL" ' Utilize esta opção caso deseje definir o e-mail de resposta ' cdoMessage.ReplyTo = "EMailDeResposta@DominioDeResposta.com" cdoMessage.HTMLBody = msgHTML if msgHTML <> "" then cdoMessage.AutoGenerateTextBody = false cdoMessage.TextBody = msgHTML end if cdoMessage.Send Set cdoMessage = Nothing Set cdoConfig = Nothing %> quando você clica em "enviar" ele pára nessa página e não faz mais nada.. nem dá mensagem de erro nem nada..