Jump to content
Fórum Script Brasil
  • 0

Erro... Formmail


marcelolima
 Share

Question

bom dia...

tenho uma página de contatos...

que na hora de enviar, dá a seguinte msg de erro:

HTTP 500.100 - Servidor interno Erro - erro do ASP

Internet Information Services

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

Informações técnicas (para a equipe de suporte)

Tipo de erro:

Objeto Server, ASP 0177 (0x800401F3)

ProgID inválido. Para obter informações adicionais específicas sobre esta mensagem, visite o site Microsoft Online Support localizado em: http://www.microsoft.com/contentredirect.asp (site em inglês).

/sviventes/contato/enviar.asp, line 14

Tipo de navegador:

Mozilla/4.0 (compatible; MSIE 6.0; Windows NT 5.0; .NET CLR 1.1.4322)

Página:

POST 102 bytes to /sviventes/contato/enviar.asp

A LINHA 14 É A SEGUINTE:

14   set mailer = server.createobject("SMTPsvg.Mailer")

preciso de ajuda urgente!!!1

Edited by dark0
Link to comment
Share on other sites

17 answers to this question

Recommended Posts

  • 0

Sobre o CDONTS, no tópico de Tutoriais tem o link pra baixar, e o comando para instalar!

Basta olhar!

Abraços

Link to comment
Share on other sites

  • 0

<%
'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 = "Seres Viventes"
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 = "smtp2.locaweb.com.br"
  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 "index.asp?lcl=EnviaEmail"
  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
%>

essa é a página de envio!!!

Link to comment
Share on other sites

  • 0

você não precisa ver se aspmail esta configurado.

Ele disse que vai transformar seu codigo do aspmail para CDONTS

dá uma olhada aqui.. só pra ver:

http://www.scanet.com.br/aspmail-x-cdonts.php

e aqui tb:

http://www.mco2.com.br/suporte_componentes_cdonts.asp

ate mais

Link to comment
Share on other sites

  • 0

Segue código adaptado para CDONTS:

<%
'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 = "Seres Viventes"
sText = Request.Form("mensagem")
sAssunto = Request.Form("assunto")

'Cria o objeto
 set mailer = server.createobject("CDONTS.NewMail")
 Mailer.From = sEmailFrom
 Mailer.To = sEmailTo
 Mailer.Subject = sAssunto  & " - E-mail"

'Monta a texto para o envio
 strMsgHeader = sNameFrom & "(" & sEmailFrom & ") " & " quem enviou! " & vbCrLf & vbCrLf
 strMsgFooter = sText
 Mailer.body = strMsgHeader & strMsgFooter
 Mailer.Send 
 Set Mailer = nothing 
 Response.Redirect "index.asp?lcl=EnviaEmail"
%>

Faz um teste que fiz meio na pressa

Link to comment
Share on other sites

  • 0

Outro possível erro, é a permissão de pastas aí..

Pois, eu já vi casos, onde ao invés de enviar o email, ele coloca eles numa pasta maluca, dentro do WWWROOT..

então ver, se o WWWROOT esta com as permissões de escrita para o usuario do IIS.

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.7k
    • Total Posts
      648.4k
×
×
  • Create New...