Testem Esse Form-email

Alguem poderia testar esse form-email, porque já não sei mais o que fazer, ela da a mensagemde confirmação, não acusa erro, mas nunca chega o e-mail, pensei que era problema do host, mas testei em outro e não deu, mesma coisa, confirma o enviu mas nunca chega.

se alguem puder testar eu agradesso

o script : enviam.asp

<% Response.Expires = 0 %>
<% REM Previous line is used to work around proxy caching problems. %>
<%

if request("enviar") = "enviar" then

Dim Nomex, Emailx, Mensagemx, Armazenax

Nomex = Request.Form("Nome")
Emailx = Request.Form("Email")
Mensagemx= Request. Form("mensagem")
Armazenax = "<HTML><HEAD><BODY>" + "Nome: " + Nomex + " " + "Email: " + Emailx + " " + "Mensagem: " + Mensagemx + "</HTML></HEAD></BODY>"

Response.Write " <center>essa é sua mensagem</center> "

Response.Write Nomex & " "
Response.Write Emailx & " "
Response.Write Armazenax & " "

%>
<%
Set objNewMail = Server.CreateObject ("CDONTS.NewMail")
objNewMail.From = Nomex
objNewMail.To = "tresdk4@hotmail.com"
objNewMail.Subject = "Mensagem da 3DK"
objNewMail.BodyFormat = 0
objNewMail.MailFormat = 0
objNewMail.Body = Armazenax
e=objNewMail.Send
Set objNewMail = Nothing

if e then
Response.Write "Mensagem não enviada"
else
Response.Write "Mensagem enviada com sucesso!!!!!!!!!!!!!!!!!! !!"
end if
response.end
end if

%>

valeu

Este post foi editado por Fabioz: 24/06/2004, 15:49

Fórum WMO: Testem Esse Form-email - Fórum WMO

Testem Esse Form-email pra ver de funciona

#1 Fabioz

#2 Fabioz

#3 thalisvalle

#4 Fabioz

#5 Agente Linhares

#6 Fabioz

1 usuário(s) está(ão) lendo este tópico
0 membro(s), 1 visitante(s) e 0 membros anônimo(s)

Skin e idioma

Execution Stats