Bueno si mi servicio de correo requiere autenficacion desde luego, pero si antes funcionaba bien de este forma programando en boton Enviar el evento (<form name="form1" method="post" action="contactar.asp">)
contenido archivo contactar.asp
Set Mail = Server.CreateObject("Persits.MailSender")
Mail.Host = "mail.miweb.com.co"
Mail.From = "
[email protected]"
Mail.FromName = "Contactos Web Carficol S.A"
Mail.Subject= "Contacto Pagina Web"
Mail.Body = "Contactos Pagina Web " & VbCrLf & VbCrLf
Mail.Body = Mail.Body & "Fecha y Hora :--> " & now() & VbCrLf & VbCrLf
Mail.Body = Mail.Body & "Datos del Contacto" & VbCrLf & VbCrLf
Mail.Body = Mail.Body & "Nombre: " & Request.Form("nombre") & VbCrLf
Mail.Send
if Err <> 0 Then
Response.Write Err.Description
else
<script language="JavaScript" >
alert("El mensaje fue enviado correctamente");
</script>
end if
<%
He probado ejecutando www.miweb.com.co\contactar.asp y llega un email en Blanco asi que si funciona.
Lo unico que hice fue seleccionar todo este mismo codigo de contactar.asp y lo he pegado cuando el sistema compara el numero catpcha y si es igual pues deberia enviar el email
Asi quedo:
if Request.ServerVariables("REQUEST_METHOD") = "POST" then
strCAPTCHA = Trim(Request.Form("strCAPTCHA"))
if CheckCAPTCHA(strCAPTCHA) = true then
%>
Set Mail = Server.CreateObject("Persits.MailSender")
Mail.Host = "mail.miweb.com.co"
Mail.From = "
[email protected]"
Mail.FromName = "Contactos Web Carficol S.A"
Mail.Subject= "Contacto Pagina Web"
Mail.Body = "Contactos Pagina Web " & VbCrLf & VbCrLf
Mail.Body = Mail.Body & "Fecha y Hora :--> " & now() & VbCrLf & VbCrLf
Mail.Body = Mail.Body & "Datos del Contacto" & VbCrLf & VbCrLf
Mail.Body = Mail.Body & "Nombre: " & Request.Form("nombre") & VbCrLf
Mail.Send
if Err <> 0 Then
Response.Write Err.Description
else
<script language="JavaScript" >
alert("El mensaje fue enviado correctamente");
</script>
end if
<%
else
%>
<script language="JavaScript" >
alert("Imposible enviar este mensaje, el codigo de seguridad NO es valido");
</script>
<%
Pero no envia nada, quiero saber si ese codigo esta bien por que se me hace raro que no funcione como deberia ser.
Gracias por su ayuda y colaboracion.
Ing. Bladimir Silva T
Colombia