05/04/2005, 16:12
|
| | | Fecha de Ingreso: marzo-2005
Mensajes: 11
Antigüedad: 20 años, 1 mes Puntos: 0 | |
| Gracias, una ultima cosa
Vale, muchas gracias. Una cosilla mas donde introduzco lo eso en el script que he puesto.
Set objMessage = CreateObject("CDO.Message")
objMessage.Subject = "TITULO DEL EMAIL"
objMessage.Sender = "EL QUE MANDA EL MENSAJE"
objMessage.To = "EL QUE LO RECIBE"
ObjMessage.HTMLBody ="CUERPO DEL MENSAJE (EN ESTE CASO HTML)"
objMessage.Configuration.Fields.Item("http://schemas.microsoft.com/cdo/configuration/sendusing") = 2
objMessage.Configuration.Fields.Item("http://schemas.microsoft.com/cdo/configuration/smtpserver") = "SERVIDOR SMTP"
objMessage.Configuration.Fields.Item("http://schemas.microsoft.com/cdo/configuration/smtpserverport") = 25
objMessage.Configuration.Fields.Item("http://schemas.microsoft.com/cdo/configuration/smtpconnectiontimeout") = 60
objMessage.Configuration.Fields.Update
objMessage.Send
set objmessage=nothing |