yo tengo un problema parecido, solo que en mi caso el mensaje no se envia en ningun caso dandome el siguiente mensaje de error:
Persits.MailSender.4 error '800a0006'
550 5.7.1 Unable to relay for [email protected]
/enviomail.asp, line 98
El codigo que uso es el siguiente:
Ape = TRIM( Request("apenom"))
Ema = TRIM( Request("email"))
Ciu = TRIM( Request("ciudad"))
Men = TRIM( Request("mensaje"))
IF ema <> "" THEN
Set myMail = Server.CreateObject("Persits.MailSender")
myMail.Host = "mail.mipagina.com.ar"
myMail.From = ema
myMail.FromName = apenom
myMail.AddAddress "[email protected]"
myMail.Subject = "Mensaje de " & apenom
myMail.Body = men
myMail.Send
Set myMail = Nothing
Response.Redirect "gracias.asp"
ELSE
Response.Write "error.asp"
END IF
no se que error tiene el codigo....