Jump to content
Fórum Script Brasil
  • 0

Problema Com Asp


Guest Felipe Candido
 Share

Question

Guest Felipe Candido

alguém sabe porque na hora que eu clico em enviar aparece isso

Method Not Allowed

The requested method POST is not allowed for the URL /enviar.asp.

--------------------------------------------------------------------------------

Apache/1.3.37 Server at www.fcas1.gyphost.com Port 80

link do Formulario http://www.fcas1.com/default.asp

Qualquer coisa me mande um e-mail também [email protected]

Obrigado pela atenção! ;)

Link to comment
Share on other sites

3 answers to this question

Recommended Posts

  • 0
posta o codigo

default

<html><head>
<title>(Exemplo)</title>
</head>
<body topmargin="0" leftmargin="0">
<div align="center">
<center>
<table border="0" width="266">
<tr>
<td width="258" valign="top" height="1">
<form method="POST" action="enviar.asp">
<div align="center">
<center>
<table border="0" width="50%" cellspacing="0" cellpadding="0">
<tr>
<td width="96%">
<p align="left"><font size="2" face="Verdana">Nome:</font></td>
</tr>
<tr>
<td width="96%">
<p align="left"><font size="2" face="Verdana"><input type="text" name="nome" size="25" style="font-family: Verdana; font-size: 10 pt; border-style: solid; border-width: 1"></font></td>
</tr>
<tr>
<td width="96%">
<p align="left"><font size="2" face="Verdana">E-mail:</font></td>
</tr>
<tr>
<td width="96%">
<p align="left"><font size="2" face="Verdana"><input type="text" name="email" size="25" style="font-family: Verdana; font-size: 10 pt; border-style: solid; border-width: 1"></font></td>
</tr>
<tr>
<td width="96%">
<p align="left"><font size="2" face="Verdana">Assunto:</font></td>
</tr>
<tr>
<td width="96%">
<p align="left"><font size="2" face="Verdana"><input type="text" name="assunto" size="25" style="font-family: Verdana; font-size: 10 pt; border-style: solid; border-width: 1"></font></td>
</tr>
<tr>
<td width="96%">
<p align="left"><font size="2" face="Verdana">Mensagem:</font></td>
</tr>
<tr>
<td width="96%">
<p align="left"><font size="2" face="Verdana"><textarea rows="5" name="mensagem" cols="25" style="font-family: Verdana; font-size: 10 pt; border-style: solid; border-width: 1"></textarea></font></td>
</tr>
<tr>
<td width="96%"> </td>
</tr>
<tr>
<td width="96%">
<p align="center"><font face="Verdana"><input type="submit" src="imagens/enviar.gif" value="Enviar >>" name="enviar"></font></td>
</tr>
</table>
</center>
</div>
</form>
</center>
</td>
</tr>
</table>
</div>
</body>
</html>
enviar
<%
'Declarando variveis
Dim sNameTo, sNameFrom, sEmailFrom, sText, sEmailTo, sAssunto

'Pegando os dados digitados nos campos e colocando em variaveis
sNameFrom = Request.Form("nome")
sEmailFrom = Request.Form("email")
sEmailTo = "[email protected]"
sNameTo = "FCAS1.COM"
sText = Request.Form("mensagem")
sAssunto = Request.Form("assunto")

'Cria o objeto
  set mailer = server.createobject("SMTPsvg.Mailer")
  Mailer.FromName = sNameFrom
  Mailer.FromAddress = sEmailFrom
'Host para envio de emails
  Mailer.RemoteHost = "mail.fcas1.com"
  Mailer.AddRecipient sEmailTo, sNameTo
  Mailer.Subject = sAssunto  & " - E-mail"

'Monta a texto para o envio
  strMsgHeader = sNameFrom & "(" & sEmailFrom & ") " & " quem enviou! " & vbCrLf & vbCrLf
  strMsgFooter = sText
  Mailer.BodyText = strMsgHeader & strMsgFooter
' Se for enviado redirecionar para obrigado.asp
  if Mailer.SendMail then
     Response.Redirect "obrigado.asp"
  else
' Se não for enviado mostra o erro que ocoreu
     Response.Write ("Ocorreu um erro.<BR>")
     Response.Write ("O Erro é " & Mailer.Response)
  end if
%>

[b]obrigado[/b]

<html><head>
<title>(Exemplo)</title>
</head>
<body topmargin="0" leftmargin="0">
<div align="center">
<center>
<table border="0" width="439">
<tr>
</center>
<p align="center"><font color="#00B0FF" size="3"><b>Muito Obrigado !!</b></font><p align="center"><font size="2"></font><p align="center"><font size="2">
Sua Mensagem foi enviada com sucesso.</font>
</td>
</tr>
</table>
</div>
</td>
</body>
</html>

Está POST do Codigo fonte que estou com o problema...

Desde já Obrigado!! :)

Link to comment
Share on other sites

  • 0

Acho que sei o que pode ser.. A maioria dos servidores ta bloqueando envio de email sem autenticação...

Eu tenho hospedagem no IG Empresas, e semana passada todos os meus códigos de envio pararam por causa do script de envio.

Então configurei todos para o CDOSYS

Olha o codigo ai:

sch = ""

Set objConfig = Server.CreateObject("CDO.Configuration")

objConfig.Fields.Item(sch & "sendusing") = 2

objConfig.Fields.Item(sch & "smtpauthenticate") = 1

objConfig.Fields.Item(sch & "smtpserver") = "smtp.seuservidor.com.br"

objConfig.Fields.Item(sch & "smtpserverport") = 25

objConfig.Fields.Item(sch & "smtpconnectiontimeout") = 120

objConfig.Fields.Item(sch & "sendusername") = "[email protected]"

objConfig.Fields.Item(sch & "sendpassword") = "senha_do_email"

objConfig.Fields.Update

'Aqui ele irá criar a Mensagem'

Set objMessage = Server.CreateObject("CDO.Message")

Set objMessage.Configuration = objConfig

'O email do remetente (seria o seu email)

objMessage.From = "[email protected]"

Para

objMessage.To = "email"

'Assunto do email'

objMessage.Subject = "Assunto"

htmlText = "Seu HTML de Email"

É so chamar as variáveis que estão no começo do seu código na config do CDO...

Link to comment
Share on other sites

Join the conversation

You can post now and register later. If you have an account, sign in now to post with your account.

Guest
Answer this question...

×   Pasted as rich text.   Paste as plain text instead

  Only 75 emoji are allowed.

×   Your link has been automatically embedded.   Display as a link instead

×   Your previous content has been restored.   Clear editor

×   You cannot paste images directly. Upload or insert images from URL.

 Share



  • Forum Statistics

    • Total Topics
      150.2k
    • Total Posts
      647.5k
×
×
  • Create New...