Ir para conteúdo

POWERED BY:

Arquivado

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

SlipJon

Enviar Formulário por Email

Por , em ASP Clássico

Recommended Posts

SlipJon    0

SlipJon
Postado

Estou tentando fazer um formulário de pedido via email, porém quando o email chega tudo que tem ascento fica com outros caractres.. alguém poderia me ajudar?

 

<h3>Pedido</h3>
<p class="p1">Para efetuar um pedido, preencha todos os campos abaixo e após o envio aguarde nossa confirmação de recebimento no prazo de um(1) dia útil.</p>
<form action="http://www.netwizard.com.br/mailto/mailto.asp" method="POST">
<input type="hidden" name="sendto" value="solange@solangefestas.com.br" >
<input type="hidden" name="resulturl" value="http://www.solangefestas.com.br/obrigado.asp">
<input type="hidden" name="subject" value="Assunto do E-mail">
  <table border="0" cellpadding="3" cellspacing="2">
	<tr><td width="74"><div align="right"><span class="p1">Nome:</span></div></td><td width="258"><input name="nome" type="text" class="formulario" size="40"></td></tr>
	<tr><td><div align="right"><span class="p1">E-mail:</span></div></td><td><input name="email" type="text" class="formulario" size="40"></td></tr>
	<tr><td><div align="right"><span class="p1">Telefone:</span></div></td><td><input name="telefone" type="text" class="formulario" size="40"></td></tr>
	<tr><td><div align="right"><span class="p1">Endereço:</span></div></td><td><input name="endereco" type="text" class="formulario" size="40"></td></tr>
	<tr><td><div align="right"><span class="p1">Cidade:</span></div></td><td><input name="cidade" type="text" class="formulario" size="40"></td></tr>
	<tr>
	  <td valign="top"><div align="right"><span class="p1">Pedido:</span></div></td>
	  <td><textarea name="pedido" cols="40" rows="10">--Exemplo--

nome do produto 1 / quantidade
nome do produto 2 / quantidade
nome do produto 3 / quantidade
nome do produto 4 / quantidade</textarea></td>
	</tr>
	<tr><td valign="top"> </td><td><input value="Enviar" type="submit" /></td></tr>
  </table>
  <br />
  <br />
  <br />
  <br />
</form>

Compartilhar este post

Link para o post
Compartilhar em outros sites

hargon    64

hargon
Postado

Você tem que postar o código de envio, não o código do formulário.

Compartilhar este post

Link para o post
Compartilhar em outros sites

luizsnpjr    0

luizsnpjr
Postado

Olá....cra...eu postei esses tempos atraz um esquema de envio de emails com imagem:

 

Clique aqui pra ver o POST

 

Faça um request.form("") para os campos que vocês está enviando dessa forma em um arquivo chamado enviar.asp

 

NOME = Request.Form("nome")
EMAIL = Request.Form("email")

e encaixar nesta parte do código:

 

vcampo = "Nome = " &NOME& "<br>E-mail = " &EMAIL

Basta você adicionar os outros campos desta mesma forma e testar....qualquer coisa é só chamar ok.

Até mais.

Compartilhar este post

Link para o post
Compartilhar em outros sites

SlipJon    0

SlipJon
Postado

Olá....cra...eu postei esses tempos atraz um esquema de envio de emails com imagem:

 

Clique aqui pra ver o POST

 

Faça um request.form("") para os campos que vocês está enviando dessa forma em um arquivo chamado enviar.asp

 

NOME = Request.Form("nome")
EMAIL = Request.Form("email")

e encaixar nesta parte do código:

 

vcampo = "Nome = " &NOME& "<br>E-mail = " &EMAIL

Basta você adicionar os outros campos desta mesma forma e testar....qualquer coisa é só chamar ok.

Até mais.

Não intendo muito de asp, este arquivo q você fala no seu outro tópico seria o aquele q vai na "action=" do meu formulário?

Compartilhar este post

Link para o post
Compartilhar em outros sites

Ted k'    126

Ted k'
Postado

SlipJon, é proibido dar UP nos postes de acordo com as regras do fórum!

 

faça como o hargon falou, poste os código de envio!

Compartilhar este post

Link para o post
Compartilhar em outros sites

Salgado    4

Salgado
Postado

Se o próprio servidor lhe passa um caminho para enviar o e-mail é melhor você procurar diretamente o suporte do mesmo, já que aqui não teremos acesso ao código para poder sugerir correções.

Compartilhar este post

Link para o post
Compartilhar em outros sites

SlipJon    0

SlipJon
Postado

Olha só, tentei com este exemplo agora

 

<html>
<head><titulo>Formulário</titulo></head>
<body>
Preencha os campos solicitados:
<br><br>
<form method="post" action="enviar.asp">
Nome:<br><input type="text" name="nome"><br>
Email:<br><input type="text" name="email"><br>
Assunto:<br><input type="text" name="assunto"><br>
Mensagem:<br><textarea name="mensagem" cols="30" rows="5"></textarea><br><br>
<input type="submit" value="Enviar">
</form>
</body>
</html>

 
Código do arquivo enviar.asp
<%
Dim objEmail	 'Controle de Email

'Muitos métodos do controle lançam uma exception, entao vamos utilizar On Error
On Error Resume Next

Set objEmail = Server.CreateObject("Dundas.Mailer")	 'Objeto de Email

'Vamos capturar os dados passados pelo formulário
Nome = Request("nome")
Email = Request("email")
Assunto = Request("assunto")
Mensagem = Request("mensagem")

'Endereço de quem vai RECEBER o Email
objEmail.TOs.Add "MeuEmail@MeuDominio.com"

'Assunto da Mensagem
objEmail.Subject = Assunto

'Endereço de quem está ENVIANDO o Email
objEmail.FromAddress = Email

'Servidor de SMTP. Aumenta a velocidade de envio
objEmail.SMTPRelayServers.Add "smtp.netwizard.com.br"

'Seta a propriedade Body. Mensagem do Email
objEmail.Body = Mensagem

'Envia o Email
objEmail.SendMail

'Testa por sucesso ou falha no envio
If Err.Number <> 0 Then
'Ocorreu um erro, então mostramos a descrição
	Response.Write "Desculpe, ocorreu o seguinte erro: " & Err.Description
Else
'Sucesso!
	Response.Write "O Email foi enviado com sucesso!"
End If

'Tira o objeto da memória
Set objEmail = Nothing
%>

e continua dando erro da ascentuação

Compartilhar este post

Link para o post
Compartilhar em outros sites

hargon    64

hargon
Postado

Utiliza Server.HTMLEncode() na variável mensagem.

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