Hola:
Tengo el siguiente problema. Tengo una pagina ASP donde un usuario, ingresa sus datos y me manda un mail a mi. Pero cuando yo además quiero enviarle un mail a él para confirmar su registración me tira el siguiente error
Persits.MailSender.4 error '800a0006'
Yo tengo lo siguiente:
Const cServidorSMTP = "mail.miservidor.com"
Const cCorreoPersonal = "
[email protected]"
Const cNombreCorreo = "Prueba"
Function EnviarCorreo(psDe, psNombreDe, psPara, psNombrePara, psTema, psCuerpo)
Dim oMail
Set oMail = Server.CreateObject("Persits.MailSender")
oMail.Host = cServidorSMTP
oMail.From = psDe
oMail.FromName = psNombreDe
oMail.AddAddress psPara, psNombrePara
oMail.Subject = psTema
oMail.Body = psCuerpo
oMail.Send
If Err.Number <> 0 Then
EnviarCorreo = Err.Description
Else
EnviarCorreo = ""
End If
Set oMail = Nothing
End Function
Luego llamo a la función de la siguiente forma:
sMail1 = EnviarCorreo(sCorreoElectronico, sDe, cCorreoPersonal, cNombreCorreo, sTema1, sCuerpo & sDetalle)
sMail2 = EnviarCorreo(cCorreoPersonal, cNombreCorreo, sCorreoElectronico, sDe, sTema2, sCuerpo)
Alguien tiene idea porque esta fallando con el segundo envío de datos? y cómo solucionarlo?
Muchas gracias!
Saludos