03/03/2003, 01:23
|
| | | Fecha de Ingreso: mayo-2002
Mensajes: 197
Antigüedad: 23 años Puntos: 0 | |
| Este es el código:
set oMail=Server.CreateObject("Persits.MailSender")
oMail.Host = conexion
oMail.From = remitente
oMail.FromName = nomremitente
oMail.AddAddress sMail
oMail.Subject = asunto
oMail.IsHTML = True
oMail.Body = sBody
On Error Resume Next
oMail.Send
'----Si hay error al enviar el correo que me lo describa
if Err <> 0 Then
Response.Write ( "Error: " & Err.Description )
end if
Un saludo. |