Deividy Postado Novembro 14, 2003 Denunciar Share Postado Novembro 14, 2003 da erro na linha 18 que é está msg MaiFormat = 0uma ajuda por facor<% nome = Request.QueryString("nome") email = Request.QueryString("email") Dim msg, texto Set msg = Server.CreateObject("CDONTS.NewMail") texto = "<html><body>" texto = texto & "<center>Este email está sendo enviado no formato HTML</center><p>" texto = texto & "Você pode colocar qualquer TAG que desejar. " texto = texto & "<a href=http://www.cohesp.com.br>LINK</a>." texto = texto & "</body></html>" msg.From = "deividy@cohesp.com.br" msg.To= email msg.Subject = "Email em HTML" msg.BodyFormat = 0 msg MaiFormat = 0 msg.Body = texto msg.AttachFile Server.MapPath("logoAgenteAmbiental.gif") msg.Send Set msg = Nothing %> Citar Link para o comentário Compartilhar em outros sites More sharing options...
0 ursolouco Postado Novembro 14, 2003 Denunciar Share Postado Novembro 14, 2003 Brother!!!msg MaiFormat = 0Faltou o pontinhu.....msg.MaiFormat = 0Abraços!!! Citar Link para o comentário Compartilhar em outros sites More sharing options...
0 cybermix Postado Novembro 14, 2003 Denunciar Share Postado Novembro 14, 2003 passo perto em urso, falto o ponto mas é maiLformat o certo seriamsg.MailFormat = 0 Citar Link para o comentário Compartilhar em outros sites More sharing options...
0 ursolouco Postado Novembro 14, 2003 Denunciar Share Postado Novembro 14, 2003 Vixe!!!Esqueci o "L" zinhu...Valeu...E ai deividy, resolveu ? Citar Link para o comentário Compartilhar em outros sites More sharing options...
0 Deividy Postado Novembro 14, 2003 Autor Denunciar Share Postado Novembro 14, 2003 Vei só um minuto que vou almoçar mais já lhe digo que não deu certo Citar Link para o comentário Compartilhar em outros sites More sharing options...
0 ursolouco Postado Novembro 14, 2003 Denunciar Share Postado Novembro 14, 2003 Não, qual o erro desta vez ? Citar Link para o comentário Compartilhar em outros sites More sharing options...
0 ursolouco Postado Novembro 14, 2003 Denunciar Share Postado Novembro 14, 2003 Deividy!!Mail enviado com CDonts !! [v. Ursolouco]<% nome = Request.QueryString("nome") email = Request.QueryString("email") email = CStr(email) Dim msg, texto Set msg = Server.CreateObject("CDONTS.NewMail") texto = "<html><body>" texto = texto & "<center>Este email está sendo enviado no formato HTML</center><p>" texto = texto & "Você pode colocar qualquer TAG que desejar. " texto = texto & "<a href=http://www.cohesp.com.br>LINK</a>." texto = texto & "</body></html>" msg.From = "deividy@cohesp.com.br" msg.To= email msg.Subject = "Email em HTML" msg.BodyFormat = 0 msg.MailFormat = 1 msg.Body = texto meuGif = Server.MapPath("logoAgenteAmbiental.gif") msg.AttachFile(meuGif) msg.Send Set msg = Nothing %>Veja se funciona amigão!!Abraços!! Citar Link para o comentário Compartilhar em outros sites More sharing options...
0 Deividy Postado Novembro 14, 2003 Autor Denunciar Share Postado Novembro 14, 2003 Não sei o que acontece mais deve ser o servido dá uma olhada é só uma página de teste ainda.click aqui :( Citar Link para o comentário Compartilhar em outros sites More sharing options...
0 ursolouco Postado Novembro 14, 2003 Denunciar Share Postado Novembro 14, 2003 Brother!!Testei seu código, ele processa normal, porem escreve na tela o email que o cara digitou no campo email.Faz o seguinte:Coloca os dois código aqui pra mim ver... Citar Link para o comentário Compartilhar em outros sites More sharing options...
0 Deividy Postado Novembro 14, 2003 Autor Denunciar Share Postado Novembro 14, 2003 agora ele dá outro erro, no AttachFile Vou explicar o que quero assim fica mais facil, eu quero poder enviar um e-mail com o logo da empresa como resposta ao formulario que vai ter no site.Automatico. formulario é esse<body> <p>Formulario de teste</p> <form name="form1" method="post" action="va.asp" > <table width="760" border="0" cellpadding="0" cellspacing="0"> <tr> <td>Nome</td> </tr> <tr> <td><input type="text" name="nome"></td> </tr> <tr> <td>e-mail</td> </tr> <tr> <td><input type="text" name="email"></td> </tr> <tr> <td><input name="enviar" type="submit" id="enviar" value="enviar"></td> </tr> </table> </form> <p> </p> </body> e estou recebendo nesse <% nome = Request.Form("nome") email = Request.Form("email") 'response.Write(email) 'response.End() Dim msg, texto Set msg = Server.CreateObject("CDONTS.NewMail") texto = "<html><body>" texto = texto & "<center>Este email está sendo enviado no formato HTML</center><p>" texto = texto & "Você pode colocar qualquer TAG que desejar. " texto = texto & "<a href=http://www.cohesp.com.br>LINK</a>." texto = texto & "</body></html>" msg.From = email msg.To= "deividy_r_ramires@hotmail.com" msg.Subject = "Email em HTML" msg.BodyFormat = 0 msg.MailFormat = 0 msg.Body = texto msg.AttachFile "logoAgenteAmbiental.gif" msg.Send Set msg = Nothing response.Redirect("form.asp") %> Citar Link para o comentário Compartilhar em outros sites More sharing options...
0 ursolouco Postado Novembro 14, 2003 Denunciar Share Postado Novembro 14, 2003 Vejamos!!!<% nome = Request.Form("nome") email = Request.Form("email") 'response.Write(email) 'response.End()Dim msg, textoSet msg = Server.CreateObject("CDONTS.NewMail") texto = "<html><body>" texto = texto & "<center>Este email está sendo enviado no formato HTML</center><p>" texto = texto & "Você pode colocar qualquer TAG que desejar. "texto = texto & "<a href=http://www.cohesp.com.br>LINK</a>."texto = texto & "</body></html>" msg.From = CStr(email)msg.To= "deividy_r_ramires@hotmail.com" msg.Subject = "Email em HTML" msg.BodyFormat = 1msg.Body = textomsg.AttachFile "logoAgenteAmbiental.gif"msg.Send Set msg = Nothing response.Redirect("form.asp")Olha ai, que por hoje é só, vou pra kasa, e agora só segundonaAbraçoss Citar Link para o comentário Compartilhar em outros sites More sharing options...
0 Deividy Postado Novembro 14, 2003 Autor Denunciar Share Postado Novembro 14, 2003 continua com erro na imagem Citar Link para o comentário Compartilhar em outros sites More sharing options...
0 ursolouco Postado Novembro 14, 2003 Denunciar Share Postado Novembro 14, 2003 Brother!!Erro na imagem ? A Imagem esta no mesmo diretorio que esta sendo enviado o arquivo ? Abraços!!! Citar Link para o comentário Compartilhar em outros sites More sharing options...
Pergunta
Deividy
da erro na linha 18 que é está msg MaiFormat = 0
uma ajuda por facor
<% nome = Request.QueryString("nome") email = Request.QueryString("email") Dim msg, texto Set msg = Server.CreateObject("CDONTS.NewMail") texto = "<html><body>" texto = texto & "<center>Este email está sendo enviado no formato HTML</center><p>" texto = texto & "Você pode colocar qualquer TAG que desejar. " texto = texto & "<a href=http://www.cohesp.com.br>LINK</a>." texto = texto & "</body></html>" msg.From = "deividy@cohesp.com.br" msg.To= email msg.Subject = "Email em HTML" msg.BodyFormat = 0 msg MaiFormat = 0 msg.Body = texto msg.AttachFile Server.MapPath("logoAgenteAmbiental.gif") msg.Send Set msg = Nothing %>Link para o comentário
Compartilhar em outros sites
12 respostass a esta questão
Posts Recomendados
Participe da discussão
Você pode postar agora e se registrar depois. Se você já tem uma conta, acesse agora para postar com sua conta.