Ir para conteúdo

POWERED BY:

Arquivado

Este tópico foi arquivado e está fechado para novas respostas.

dribeltrami

no CDONTS

Por , em ASP Clássico

Recommended Posts

dribeltrami    0

dribeltrami
Postado

Olá pessoal do Fórum Imasters,Estou fazendo um site em asp, só que sou nova em asp, não sei quase nada, e a minha dúvida é a seguinte:Fiz um formulário onde as pessoas poderam enviar suas notícias, até ai tudo bem, o problema que estou tendo é quando a notícia é um pouco grande o formulário não é enviado, mas quando a notícia e menor ele envia perfeitamente.O que pode estar acontecendo, alguém poderia me ajudar, por favor......

Compartilhar este post

Link para o post
Compartilhar em outros sites

dribeltrami    0

dribeltrami
Postado

Olá Stumpyeu criei um textarea e não esta em banco de dados, o formulário é enviado direto para o e-mail, vou por o codigo abaixo:enviar_noticia.asp

<form name="form1" action="enviar_email.asp" ><p><font size="2" face="Tahoma"><strong>Formulário para Envio de Notícias</strong></font></p><p><strong><font size="2" face="Tahoma">Nome: <br>      <input name="txtnome" type="text" size="30"></font></strong></p><p><strong><font size="2" face="Tahoma">E-mail: <br>      <input name="txtemail" type="text" size="30"></font></strong></p><p><strong><font size="2" face="Tahoma">Notícia: <br>      <textarea name="txtnoticia" cols="60" rows="10"></textarea></font></strong></p><p><strong><font size="2" face="Tahoma"><input type="submit" name="Submit" value="Enviar Notícia"></font></strong></p></form>

enviar_email.asp

<%Option ExplicitDim var_nome, var_mail, var_comentario, var_to, EnviarMail, MsgBodyvar_nome = Request.QueryString("txtnome")var_mail = Request.QueryString("txtemail")var_comentario = Request.QueryString("txtnoticia")var_to = "dribeltrami@zipmail.com.br"Set EnviarMail = Server.CreateObject("CDONTS.NewMail")EnviarMail.To = var_toEnviarMail.From = var_mailEnviarMail.Subject = "Notícias dos Usuários"MsgBody = "<html>" _& "<head>" _& "</head>" _& "<body bgcolor=""#FFFFFF"">" _& "<p align=""center""><font face=""Verdana, Arial, Helvetica, sans-serif"" size=""2"">Você recebeu uma mensagem de <b>" & var_nome & "</b>, e-mail <b>" & var_mail & "</b> que mandou a seguinte notícia:</font></p><p align=""center""><font face=""Verdana, Arial, Helvetica, sans-serif"" size=""2""><b>" & var_comentario & "</b></font></p>" _& "</body>" _& "</html>"EnviarMail.Body = MsgBodyEnviarMail.Importance = 1EnviarMail.BodyFormat = 0EnviarMail.MailFormat = 0EnviarMail.SendSet EnviarMail = NothingResponse.redirect "obrigado.asp"%>

Obrigada

Compartilhar este post

Link para o post
Compartilhar em outros sites
Ir para a lista de tópicos ASP Clássico
×

Informação importante

Ao usar o fórum, você concorda com nossos Termos e condições.

  Aceito