La tecnología Collaboration Data Objects de Microsoft ofrece un conjunto de componentes con servicios suficientes para el envío de mensajes, articulando el nivel de control que sea necesario. Una lista de las clases y servicios disponibles puede consultarse en su página de MSDN Aquí se reproducen en general:
.| Message | Usada para manejar un mensaje. Cada objeto instanciado expone las interfaces IMessage, IBodyPart, y IDataSource |
| BodyPart | Para manejar el cuerpo de un mensaje. Expone la interface IBodyPart |
| BodyParts | Colección de objetos BodyPart, cada objeto expone IBodyParts |
| Configuration | Usado para configurar un objeto Message, necesario cuando no se desea usar el ambiente default para el mensaje. Expone IConfiguration |
| DropDirectory | Usada para recolectar mensajes de un sistema de archivos. |
| Messages | Usada para manejar una colección de mensajes |
Los servicios CDO fueron mencionados en el foro EDGE por Marc Guldimann, quien expuso allí un caso de uso de la clase Message. El hilo completo de discusión puede ser consultado todavía. Lo esencial de su uso es transcripto abajo:
Date: 6-Jan-05 02:56
Author: Marc Guldimann (marc.guldimann@sisa.ch)
Subject: Source-API (VBScript)
hi
we have tested the following code and it worked....so it should work for you as well (even we are on plex 5.5):
1) create a "source code" object 2) set "script engine" to vbscript 3) copy/paste the following statements
-----code-----------
Set myMail=CreateObject("CDO.Message")
myMail.Subject="This is the subject"
myMail.From="from@domain.com"
myMail.To="to@domain.com"
myMail.TextBody="Insert text here"
myMail.Configuration.Fields.Item _ ("http://schemas.microsoft.com/cdo/configuration/sendusing")=2
'Name or IP of remote SMTP server myMail.Configuration.Fields.Item _ ("http://schemas.microsoft.com/cdo/configuration/smtpserver") _ ="ip_of_smtp_server"
'Server port myMail.Configuration.Fields.Item _ ("http://schemas.microsoft.com/cdo/configuration/smtpserverport") _ =port_of_smtp_(25)
myMail.Configuration.Fields.Update
myMail.Send
-----code-----------
4) use parameters to fill dynamically the variables (subject, to/from etc.)
THAT'S IT.
this is an easy way to send an easy mail. if you want to include attachements you have to check the CDO.Message info at microsoft. we do not use attachements until today.
sorry for the layout.
cheers and good luck
marc
(http://edgeusergroup.pugmarks.net/forums/Index.cfm?CFApp=82?&Message_ID=87270)