Não Funfa

Arrasted · Novembro 22, 2004

Ele redireciona...não dá erro nenhum, mas a MSG não chega no Endereço

ASP [/tr][tr]<%@LANGUAGE="VBSCRIPT"%>

<%

Option Explicit

%>

<%

Dim var_nome, var_email, var_empresa, var_telefone, var_mensagem, var_to, EnviarMail, MsgBody

var_nome = Request.QueryString("txtnome")

var_email = Request.QueryString("txtemail")

var_empresa = Request.QueryString("txtempresa")

var_telefone = Request.QueryString("txttelefone")

var_mensagem = Request.QueryString("txtmensagem")

var_to = "alternative_y@hotmail.com"

Set EnviarMail = Server.CreateObject("CDONTS.NewMail")

EnviarMail.To = var_to

EnviarMail.From = var_email

EnviarMail.Subject = "Página de Contato (STAFF) Observatorium "

MsgBody = "<html>" _

& "<head>" _

& "</head>" _

& "<body bgcolor=""#FFFFFF"">" _

& "Mensagem enviada por: " & var_nome & ", seu e-mail é: " & var_email & "a mensagem é:" & var_mensagem & "" _

& "</body>" _

& "</html>"

EnviarMail.Body = MsgBody

EnviarMail.Importance = 1

EnviarMail.BodyFormat = 0

EnviarMail.MailFormat = 0

EnviarMail.Send

Set EnviarMail = Nothing

Response.Redirect("Default.asp")

%>

[/tr]

Salgado · Novembro 22, 2004

Pode ser fila de espera no seu servidor ou pode ser que o e-mail esteja sendo recusado no e-mail receptor. Entre em contato com o suporte de seu Host e verifique com eles se há algum problema e aproveite e pergunte se eles usam algum outro componente que não seja o CDONTS.

Entrar

Arquivado

Não Funfa

Recommended Posts

Arrasted 0

Compartilhar este post

Link para o post

Compartilhar em outros sites

Salgado 4

Compartilhar este post

Link para o post

Compartilhar em outros sites

Estou criando uma calculadora de m2 e litros de tinta

Cruzamento de Bases

Consulta sem duplicação

Este projeto é apoiado pelas empresas

Fóruns

Tempo Real

Informação importante