Wenas:
Estoy intentando enviar email con CDONTS y los mensajes
se me quedan en la carpeta C:\Inetpub\mailroot\Pickup.
¿Por qué puede ser?.
El código es:
Dim loNewMail
Set loNewMail = Server.CreateObject("CDONTS.NewMail")
loNewMail.From = Request.Form("nombreAlumno") & ""
loNewMail.To = "fms@grupo-arista.com"
loNewMail.Subject = "Solicitud de Cita para Tutoría"
loNewMail.BodyFormat = CdoBodyFormatHTML
loNewMail.MailFormat = CdoMailFormatMime
dim cuerpoMsg
cuerpoMsg = "SOLICITUD DE TUTORIA" & vbCrlf
cuerpoMsg = cuerpoMsg
& "*******************************************************
**********" & vbCrlf
cuerpoMsg = cuerpoMsg & "ALUMNO: " & Request.Form
("nombreAlumno") & vbCrlf
cuerpoMsg = cuerpoMsg & "EMAIL: " & Request.Form
("email") & vbCrlf
cuerpoMsg = cuerpoMsg & "TELEFONO: " & Request.Form
("tfno") & vbCrlf
cuerpoMsg = cuerpoMsg & "FECHA: " & Request.Form
("fechaCita") & vbCrlf
cuerpoMsg = cuerpoMsg & "HORARIO: " & Request.Form
("horaInicialCita") & " - " & Request.Form
("horaFinalCita")
loNewMail.Body = cuerpoMsg
loNewMail.Send()
Set loNewMail = Nothing
He hecho varias pruebas con los valores del from, to,
body, etc., y nada.
Salu2 y gracias
Leer las respuestas