Ir para conteúdo

POWERED BY:

Arquivado

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

hhhhhh

Problema

Recommended Posts

Olá pessoal, estou com um probleminha.. não saco muito de ASP e o cliente mandou um formulário de cadastro para acertar.. as informações do formulário são enviados para um e-mail...e ele tá dando o seguinte erro:

 

Method Not Allowed

The requested method POST is not allowed for the URL /testes/tradegourmet/bigmail.asp.

o cógido que é usado para enviar o e-mail:

 

ASP

[*]<%

 

[*]set msg Server.CreateOBject"JMail.Message" )

 

[*]msg.Logging true

 

[*]msg.FromName "Contacto por la Web"

 

[*]msg.AddRecipient Request.Form("recipient")

 

[*]msg.Subject Request.Form("subject")

 

[*]msg.Body Request.Form("nome") & vbCrLf

 

[*]msg.appendText Request.Form("email") & vbCrLf

 

[*]msg.appendText Request.Form("cidade") & vbCrLf

 

[*]msg.appendText Request.Form("assunto") & vbCrLf

 

[*]msg.appendText Request.Form("mensagem") & vbCrLf

 

[*]msg.Send("datus")

 

[*]Response.Redirect Request.Form("redirect")

 

[*]%>

 

o formulário:

 

<form name="form1" method="post" action="bigmail.asp" onsubmit="return formCheck(this);">
     <table width="552" align="center">
       <tr>
         <td valign="middle" class="texto"> </td>
         <td height="5" colspan="2" valign="middle" class="texto"><span class="titulo">Dúvidas</span><br>
             <br></td>
       </tr>
       <tr>
         <td width="164" class="texto"><input type="hidden" name="subject" value="Contacto por la Web">
             <input type="hidden" name="redirect" value="ok.htm">
             <input type="hidden" name="recipient" value="orete.nascimento@orbisys.com.br"></td>
         <td width="118" height="5" class="texto"> Nome completo:</td>
         <td width="254" height="5"><input name="nome" type="text" class="cxtexto" id="nome" size="40">
         </td>
       </tr>
       <tr>
         <td width="164" class="texto"> </td>
         <td width="118" class="texto">E-mail:</td>
         <td width="254"><input name="email" type="text" class="cxtexto" size="40">
         </td>
       </tr>
       <tr>
         <td width="164" class="texto"> </td>
         <td width="118" class="texto">Cidade:</td>
         <td width="254"><input name="cidade" type="text" class="cxtexto" id="cidade" size="40">
         </td>
       </tr>
       <tr>
         <td width="164" class="texto"> </td>
         <td width="118" class="texto">Assunto:</td>
         <td width="254"><input name="assunto" type="text" class="cxtexto" id="assunto" size="40">
         </td>
       </tr>
       <tr>
         <td valign="top" class="texto"> </td>
         <td valign="top" class="texto">Mensagem:</td>
         <td><textarea name="mensagem" cols="39" rows="5" wrap="Virtual" class="cxtexto" id="mensagem" style="width:215; height:80px"></textarea></td>
       </tr>
       <tr>
         <td valign="middle"> </td>
         <td valign="middle"><div align="center"> <br>
                 <input type="submit" name="Submit3" value="Enviar">
         </div></td>
         <td><br>
             <input type="reset" name="Submit22" value="Cancelar">
         </td>
       </tr>
     </table>
   </form>

 

Se alguém puder me ajudar, ficarei muito grato...

 

Obrigado pela atenção!!

 

Valeu!!

Compartilhar este post


Link para o post
Compartilhar em outros sites

Caro amigo,

 

Pelo que entendi utilize o codigo abaixo.

 

ASP

[*]'************CODIGO DE ENVIO DE EMAIL*********************'

 

[*]<%

 

[*]<%

 

[*]'-----------------RECUPERANDO OS VALORES DOS CAMPOS NO FORMLARIO -----'

 

[*]

 

[*]StrDepartamento Request.Form("Estados")

 

[*]StrNome Request.Form("nome")

 

[*]StrTelefone Request.Form("telefone")

 

[*]StrEstado Request.Form("estado")

 

[*]StrEmail Request.Form("email")

 

[*]StrAssunto Request.Form("assunto")

 

[*]

 

[*]

 

[*] '---------------------INICIO DO CORPO DO EMAIL EM FORMATO HTML -------'

 

[*]

 

[*]StrDescricao = StrDescricao & " <table width='100%' border='0' cellpadding='0' cellspacing='0'>"

 

[*]StrDescricao = StrDescricao & " <tr> "

 

[*]StrDescricao = StrDescricao & " <td colspan='2' valign='top'><div align='center'></div></td>"

 

[*]StrDescricao = StrDescricao & " </tr>"

 

[*]StrDescricao = StrDescricao & " <tr> "

 

[*]StrDescricao = StrDescricao & " <td colspan='2' valign='top' bgcolor='#CC3333'><font color='#FFFFFF' size='2' face='Verdana, Arial, Helvetica, sans-serif'><strong>Para:</strong></font></td>"

 

[*]StrDescricao = StrDescricao & " </tr>"

 

[*]StrDescricao = StrDescricao & " <tr> "

 

[*]StrDescricao = StrDescricao & " <td valign='top'> </td>"

 

[*]StrDescricao = StrDescricao & " <td valign='top'> </td>"

 

[*]StrDescricao = StrDescricao & " </tr>"

 

[*]StrDescricao = StrDescricao & " <tr> "

 

[*]StrDescricao = StrDescricao & " <td valign='top'><font size='2' face='Verdana, Arial, Helvetica, sans-serif'>Departamento:</font></td>"

 

[*]StrDescricao = StrDescricao & " <td valign='top'> <font size='2' face='Verdana, Arial, Helvetica, sans-serif'> "

 

[*]StrDescricao = StrDescricao & "'"&StrDepartamento&"'"

 

[*]StrDescricao = StrDescricao & " </font></td>"

 

[*]StrDescricao = StrDescricao & " </tr>"

 

[*]StrDescricao = StrDescricao & " <tr> "

 

[*]StrDescricao = StrDescricao & " <td valign='top'><font size='2' face='Verdana, Arial, Helvetica, sans-serif'> </font></td>"

 

[*]StrDescricao = StrDescricao & " <td valign='top'><font size='2' face='Verdana, Arial, Helvetica, sans-serif'> </font></td>"

 

[*]StrDescricao = StrDescricao & "</tr> "

 

[*]StrDescricao = StrDescricao & " <tr> "

 

[*]StrDescricao = StrDescricao & " <td colspan='2' valign='top' bgcolor='#CC3333'><font color='#FFFFFF' size='2' face='Verdana, Arial, Helvetica, sans-serif'><strong>De:</strong></font></td>"

 

[*]StrDescricao = StrDescricao & " </tr>"

 

[*] %>

 

[*]  <%

 

[*]'--------INICIO DO CODIGO CDONTS-----------------'

 

[*]

 

[*]Set objmail  Server.CreateObject("CDONTS.NewMail"

 

[*]objmail.From  = StrDepartamento

 

[*]objmail.to  = StrDepartamento

 

[*]objmail.subject = StrAssunto

 

[*]objmail.Body  = strDescricao 'AQUI E A VARIAVEL QUE RECEBE O SEU FORMULARIO PARA QUE SEJE IMPRESSO NO EMAIL DO USUARIO

 

[*]objmail.BodyFormat = 0

 

[*]objmail.MailFormat = cdoMailFormatText

 

[*]objmail.send 

 

[*]

 

[*]Set objmail = nothing 

 

[*] Response.Redirect("obrigado.asp")

 

[*]%>

 

sendo entao e so você colocar no ACTION do seu formulario o nome do arquivo de ENVIO DE EMAIL que tem o codigo acima.

 

Compartilhar este post


Link para o post
Compartilhar em outros sites

×

Informação importante

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