Ir para conteúdo

POWERED BY:

Arquivado

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

Fernando SA

Como enviar informações do Formulário em ASP

Por , em ASP Clássico

Recommended Posts

Fernando SA    0

Fernando SA
Postado

Olá pessoal estou com uma dúvida. Gostaria de saber como faço para enviar as informações de um formulário para um e-mail usando a linguagem ASP. Tentei este script mas não está dando certo! Gostaria que alguém analizasse por favor!! http://forum.imasters.com.br/public/style_emoticons/default/joia.gif

 

 

Formulário




              <table width="520" border="0" align="center" cellpadding="0" cellspacing="2">



                <tr>



                  <td bgcolor="#FFFFFF" class="style83"><div align="right"> Assunto da Mensagem _linenums:0'><html><head><title> Formulário></title></head><body><form method="POST" action="enviar.asp" onsubmit="MM_validateForm('nome','','R','ddd telefone','','RisNum','telefone','','RisNum','ddd celular','','NisNum','celular','','NisNum','email','','NisEmail','cidade','','R','estado','','R','mensagem','','R');return document.MM_returnValue">              <table width="520" border="0" align="center" cellpadding="0" cellspacing="2">                <tr>                  <td bgcolor="#FFFFFF" class="style83"><div align="right"> Assunto da Mensagem:</div></td>                  <td width="2" rowspan="10" bgcolor="#FFFFFF"> </td>                  <td colspan="4"><div align="left">                    <select name="assunto" class="style77" id="assunto" onfocus="MM_popupMsg('ATENÇÃO! NÃO ACEITAMOS CURRÍCULOS ENVIADOS POR E-MAIL OU POR ESTA PÁGINA! Se você estiver interessado, envie o seu currículo dentro de um envelope para o endereço Rua das Mangueiras, 189 - Centro, São Luís, Maranhão - Cep: 65010-360. Ou venha pessoalmente entregá-lo na recepção. ')">                      <option value="#">Escolha...</option>                      <option value="Informacao">Informação</option>                      <option value="Duvida">Dúvida</option>                      <option value="Sugestao">Sugestão</option>                      <option value="Critica">Crítica</option>                      <option value="Reclamacao">Reclamação</option>                      <option value="Sugestao para o Site">Sugestão para o Site</option>                      <option value="Observe o campo abaixo">Outro Assunto</option>                    </select>                    <input name="**" type="checkbox" id="**" onclick="MM_popupMsg('Aguarde, você será redirecionado para uma página específica de Orçamento!');MM_goToURL('parent','orcamento.asp');return document.MM_returnValue" value="**" />                    <label><span class="style88">Orçamento</span></label>                    <span class="style88">                    de Serviços                    </span></div>                    <label>                    <div align="left"></div>                    </label></td>                </tr>                <tr>                  <td bgcolor="#FFFFFF"><div align="right" class="style77">Outro Asunto:</div></td>                  <td colspan="4"><div align="left">                    <input name="outro_assunto" type="text" class="style77" id="outro_assunto" size="25" />                  </div></td>                </tr>                <tr>                  <td width="173" bgcolor="#FFFFFF"><div align="center" class="style83">                      <div align="right">Nome:</div>                  </div></td>                  <td colspan="4">                                          <div align="left">                        <input name="nome" type="text" class="style77" id="nome" size="40" />                                              </label>                      </div></td></tr>                                <tr>                  <td bgcolor="#FFFFFF" class="style77"><div align="right">Empresa:</div></td>                  <td colspan="4"><div align="left">                    <input name="empresa" type="text" class="style77" id="empresa" onfocus="MM_popupMsg('Preencha este campo somente se for Pessoa Jurídica!')" size="40" />                  </div></td>                </tr>                <tr>                  <td bgcolor="#FFFFFF"><div align="center" class="style83">                      <div align="right">DDD:</div>                  </div></td>                  <td width="21" bgcolor="#FFFFFF"><label>                    <label>                    </label>                    <label>                                          <div align="left">                        <input name="ddd_telefone" type="text" id="ddd_telefone" size="3" maxlength="3" />                        </div>                    </label></td>                  <td width="67" bgcolor="#FFFFFF"><div align="left" class="style83">                    <div align="center">Telefone:</div>                  </div></td>                  <td colspan="2"><div align="left">                    <input name="telefone" type="text" class="style77" id="telefone" size="16" />                  </div></td>                </tr>                <tr>                  <td bgcolor="#FFFFFF" class="style77"><div align="right">DDD:</div></td>                  <td bgcolor="#FFFFFF"><div align="left">                    <input name="ddd_celular" type="text" id="ddd_celular" size="3" maxlength="3" />                  </div></td>                  <td bgcolor="#FFFFFF" class="style77"><div align="center">Celular:</div></td>                  <td colspan="2"><div align="left">                    <input name="celular" type="text" class="style77" id="celular" size="16" />                  </div></td>                </tr>                                <tr>                  <td bgcolor="#FFFFFF" class="style77"><div align="right">E-mail:</div></td>                  <td colspan="4"><label>                                            <div align="left">                          <input name="email" type="text" class="style77" id="email" size="30" />                                                </label>                        </div></td>                </tr>                                <tr>                  <td bgcolor="#FFFFFF" class="style83"><div align="right">Cidade:</div></td>                  <td colspan="2"><div align="left">                    <input name="cidade" type="text" id="cidade" size="15" />                  </div></td>                  <td width="68" class="style83"><div align="center">Estado:</div></td>                  <td width="175"><div align="left">                    <input name="estado" type="text" class="style77" id="estado" onclick="MM_popupMsg('Digite a sigla do Estado; Ex.: Maranhão - MA!')" size="2" maxlength="2" />                  </div></td>                </tr>                                <tr>                  <td bgcolor="#FFFFFF"><div align="center" class="style83">                      <div align="right">Mensagem: </div>                  </div></td>                  <td colspan="4"><label>                                          <div align="left">                        <textarea name="mensagem" cols="42" rows="8" class="style77" id="mensagem"></textarea>                                            </label>                        </div></td>                </tr>                                <tr>                  <td><div align="left"></div></td>                  <td colspan="4"> </td>                </tr>                <tr>                  <td height="58" colspan="6"><label>                      <div align="center">                        <input name="Submit" type="submit" class="style60" value="Enviar" />                        <input name="Submit2" type="reset" class="style60" value="Limpar tudo" />                      </div>                    </label>                      <label></label></td>                </tr>              </table>               </form></body></html>


 


 



Página "enviar.asp"


 








 



' às variáveis _linenums:0'><html><head><title>Enviando email!!!</title></head><body><%' Adicionando os valores submetidos pelo formulário' às variáveis : assunto, outro_assunto, nome, empresa, ddd_telefone, telefone, ddd_celular, celular, email, cidade, estado, mensagemAssunto = TRIM( Request("assunto"))OutroAssunto = TRIM( Request("outro_assunto"))Nome = TRIM( Request("nome"))Empresa = TRIM( Request("empresa"))DDDTelefone = TRIM( Request("ddd_telefone"))Telefone = TRIM( Request("telefone"))DDDCelular = TRIM( Request("ddd_celular"))Celular = TRIM( Request("celular"))Email= TRIM( Request("email"))Cidade = TRIM( Request("cidade"))Estado = TRIM( Request("estado"))Mensagem = TRIM(Request("mensagem"))' Verificando se foi digitado o email de remetenteIF Email <> "" THEN' Caso tenha sido digitado, o script prossegue nas linhas abaixo' Criando o objeto para enviar email Set myMail = Server.CreateObject("SMTPsvg.Mailer" )' Definindo o Host SMTP de seu provedor ou servidor  myMail.RemoteHost = "smtp.metafisio.com.br"' Definindo o destino do email     myMail.AddRecipient "metafisio@metafisio.com.br", "Francisco Prado"' Remetente do Email     myMail.FromAddress = Email' Assunto do Email     myMail.Subject = Assunto' Corpo do email (a mensagem que foi digitada no formulário)     myMail.BodyText = OutroAssunto & Nome & Empresa & DDDTelefone & Telefone & DDDCelular & Celular & Cidade & Estado & Mensagem' Enviando o email     myMail.SendMail' Fechando o objeto para envio de email Set myMail = Nothing'  Agora o usuário é redirecionado para a página de'  agradecimento obrigado.html   Response.redirect "confirmacao.htm"' Caso não tenha sido digitado email no formulário' o script prossegue nas linhas abaixo pulando todas a cimaELSE ' O usuário recebe a mensagem de erro Response.Write "OBS: O campo email não foi digitado."' Fim de instrução IFEND IF%></body></html>



Desde já agradeço!!!!



Fernando Araujo



fernando-araujo@hotmail.com



			
		


		

			
				
					

	
	
		

			
				
				

					
				

			
			
			
		

	


				
			
			
    
				
					
					
					
				
				
  • 
					
				
    • 
			

		


		
	


	

		

			
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