problema con formulario hola amigos tengo un nuevo problema con un envio de email en al completar el formulario y enviarlo se envia correctamente pero nunca me llega al email cual sera el problema aqui esta el codigo...
gracias..
<%
'Declaramos las variables a usar
Dim Nombre, Apellido, Pais, Email, llegada, salida, comentario, OBJ_EMAIL
'Obtenemos los valores del formulario
Nombre = Request.Form("Nombre")
Apellido = Request.Form("Apellido")
Pais = Request.Form("Pais")
Email = Request.Form("Email")
llegada = Request.Form("llegada")
salida = Request.Form("salida")
Comentario = Request.Form("Comentario")
'Creación del objeto
Set OBJ_EMAIL = Server.CreateObject("CDONTS.NewMail")
OBJ_EMAIL.From = "[email protected]" 'No hace falta especificar un email valido
OBJ_EMAIL.To = "[email protected]"
OBJ_EMAIL.Subject = "consulta disponiblidad"
OBJ_EMAIL.Body = Nombre & ":::::::::" & Apellido& ":::::::::" & Pais& "::::::::::" & Email& "::::::::::" & llegada& "::::::::::" & salida& "::::::::::" & Comentario ' Cuerpo del mensaje
OBJ_EMAIL.Send 'Envia el mail
'Cierra el Objeto
Set OBJ_EMAIL = Nothing
Response.Write "En Unos Minutos Responderemos Tu Consulta"
%>
