Cómo migrar Collaboration Data Objects para NTS aplicaciones Microsoft Collaboration Data Objects para Windows 2000

Seleccione idioma Seleccione idioma
Id. de artículo: 810702 - Ver los productos a los que se aplica este artículo
Este artículo se ha archivado. Se ofrece "tal cual" y no se volverá a actualizar.
Expandir todo | Contraer todo

En esta página

Resumen

En este artículo paso a paso describe cómo migrar código existente basado en el modelo de objetos CDONTS CDOSYS.

Puede utilizar el cdonts.dll y CDOSYS.dll bibliotecas de objetos para crear y procesar correo electrónico mediante formatos estándar de Internet y protocolos. Collaboration Data Objects para NTS (CDONTS) se implementó originalmente para utilizar con Microsoft Commercial Internet Server (MCIS) y se incluyen en Windows NT Option Pack. CDONTS también se incluyó como parte de Windows 2000 por compatibilidad con Windows NT. CDONTS no se incluye con Microsoft Windows XP y versiones posteriores de Windows. Microsoft Collaboration Data Objects para Windows 2000 (CDOSYS) se ha implementado y se incluye como un componente de sistema operativo Windows 2000. El código existente que se basa en CDONTS debe migrar a CDOSYS.

Comparación de características

La tabla siguiente compara la compatibilidad del sistema operativo (SO) y compatibilidad de característica en el cdonts.dll y las bibliotecas de CDOSYS.dll.
Contraer esta tablaAmpliar esta tabla
característica CDONTS CDOSYS notas
Soporte técnico para Windows NTnoNinguno incluido con OS
Compatibilidad con Windows 2000Ambos incluido con OS
Compatibilidad con Windows XPnoCDOSYS incluido sólo con OS
Compatibilidad con el servidor de Exchange
Enviar correo
Exponer en grupos de noticiasno
Enviar (posterior) mediante simple de transferencia de correo (SMTP) el puerto de protocolo de transferencia de noticias de la red (NNTP) no
Formatos de mensaje MIME y UUEncode
Control explícito de estructura de parte de cuerpo MIME, codificación, charset y otros. no
Compatibilidad con HTML y MHTML
Lista / leer el directorio de almacenamiento local no
Lista / leer Bandeja de entrada a través de POP3 no
Compatibilidad de receptor de eventos de transporte no
Responder y reenviar funcionesno

Ejemplos

Los ejemplos siguientes muestran cómo realizar la misma tarea utilizando CDONTS y mediante el uso de CDOSYS. Cada uno de los siguientes ejemplos describe una característica que tienen las dos bibliotecas y, a continuación, muestra proporciona código para implementar la característica en cada biblioteca. Estos ejemplos de código se han comprobado mediante Windows 2000 Service Pack 2 (SP2) y las siguientes versiones de las bibliotecas:
  • CDONTS 6.0.3939.0
  • CDOSYS 6.0.3943.3

Envío simple

En este ejemplo es el uso más popular para las dos bibliotecas. En este caso, ambas bibliotecas de escribir el mensaje al directorio de recogida de SMTP el servidor. La ruta de acceso del directorio es de lectura de la metabase local.
Ejemplo CDONTS
 set m =
CreateObject("CDONTS.NewMail") m.Send "user1@company.com", _
"user2@company.com", _ "test 1", _ "hello there" 
Ejemplo CDOSYS
 Set m =
CreateObject("CDO.Message") m.From = "user1@company.com" m.To =
"user2@company.com" m.Subject = "test 1" m.TextBody = "hello there"
m.send

Enviar cuerpo HTML

Los ejemplos siguientes colocar texto HTML en el mensaje. En caso contrario, estos ejemplos son similares a los ejemplos de "Enviar simple". En ambos conjuntos de ejemplos, se utiliza el formato de mensaje de varias partes/alternativos MIME. Además, se crea automáticamente un cuerpo de texto sin formato del HTML. El cuerpo de texto sin formato se incluye como parte del cuerpo de texto sin formato.
Ejemplo CDONTS
 sHTML = "<html><body><font
color=""#FF0000"">" & _ "hello,
Red</font></body></html>" Set m =
CreateObject("CDONTS.NewMail") m.MailFormat = 0 ' CdoMailFormatMime
m.BodyFormat = 0 ' CdoBodyFormatHTML m.Send "user1@company.com", _
"user2@company.com", _ "test 1", _ sHTML 
Ejemplo CDOSYS
 sHTML = "<html><body><font
color=""#FF0000"">" & _ "hello,
Red</font></body></html>" Set m = CreateObject("CDO.Message")
m.From = "user1@company.com" m.To = "user2@company.com" m.Subject = "test 1"
m.HtmlBody = sHTML m.send

Enviar con datos adjuntos en formato MIME

Ejemplo CDONTS
Set m = CreateObject("CDONTS.NewMail") m.MailFormat = 0 ' CdoMailFormatMime
m.AttachFile "d:\ptsp\test\test.doc" m.Send "user1@company.com", _
"user2@company.com", _ "test.doc", _ "Here is the document you
requested"
Ejemplo CDOSYS
 Set m
= CreateObject("CDO.Message") m.From = "user1@company.com" m.To =
"user2@company.com" m.Subject = "test.doc" m.TextBody = "Here is the document
you requested." m.AddAttachment "file://d:\ptsp\test\test.doc"
m.send

Enviar con datos adjuntos en formato UUENCODE

Para ambas bibliotecas para enviar el mensaje con datos adjuntos UUEncode, cambiar una propiedad en el mensaje para cambiar el formato.
Ejemplo CDONTS
 Set m =
CreateObject("CDONTS.NewMail") m.MailFormat = 1 ' CdoMailFormatText
m.AttachFile "d:\ptsp\test\test.doc" m.Send "user1@company.com", _
"user2@company.com", _ "test.doc", _ "Here is the document you requested"
Ejemplo CDOSYS
 Set m =
CreateObject("CDO.Message") m.MimeFormatted = false m.From =
"user1@company.com" m.To = "user2@company.com" m.Subject = "test.doc"
m.TextBody = "Here is the document you requested." m.AddAttachment
"file://d:\ptsp\test\test.doc" m.send

Enviar mensaje de texto Unicode

Este ejemplo incluye un carácter Unicode (el símbolo del euro, ?, código de Unicode punto 0x20ac) en el nombre de presentación del destinatario y en el texto del mensaje. En ambos ejemplos, se codifica "?" en la propiedad CharSet de utf-7 . Debe utilizar CDONTS el CP_UTF7 = 65000 constante. CDOSYS, el nombre de CharSet es unicode-1-1-utf-7 .
Ejemplo CDONTS
 Set s = CreateObject("CDONTS.Session") S.LogonSMTP "User 1",
"user1@company.com" s.SetLocaleIDs 65000 ' cpUTF7 Set m = s.Outbox.Messages.Add
m.MessageFormat = 0 ' CdoMime set r = m.Recipients.Add 'r.address =
"user2@company.com" r.name = "Joe ?" r.address = "<joe.euro@company.com>"
m.Subject = "Unicode content" m.Text = "That will be ?5, please."
m.Send
Ejemplo CDOSYS
set m =
CreateObject("CDO.Message") m.From = "User1 <user1@company.com>" m.To =
"Joe ? <joe.euro@company.com>" m.Subject = "Unicode content" set b =
m.bodypart b.charset = "unicode-1-1-utf-7" m.textbody = "That will be ?5,
please." m.send

Referencias

Para obtener más información, visite los sitios Web de MSDN siguientes: Para obtener más información, haga clic en el número de artículo siguiente para verlo en Microsoft Knowledge Base:
816789Acceso de lectura a todos con el grupo se quita después de instalar Exchange 2000 Service Pack 3

Propiedades

Id. de artículo: 810702 - Última revisión: jueves, 27 de febrero de 2014 - Versión: 6.5
La información de este artículo se refiere a:
  • Microsoft Exchange Server 2003 Enterprise Edition
  • Microsoft Exchange Server 2003 Standard Edition
  • Microsoft Exchange 2000 Server Standard Edition
  • Microsoft Collaboration Data Objects 2.0 for NT Server
  • Microsoft Collaboration Data Objects 2.0
Palabras clave: 
kbnosurvey kbarchive kbmt kbhowtomaster kbhowto KB810702 KbMtes
Traducción automática
IMPORTANTE: Este artículo ha sido traducido por un software de traducción automática de Microsoft (http://support.microsoft.com/gp/mtdetails) en lugar de un traductor humano. Microsoft le ofrece artículos traducidos por un traductor humano y artículos traducidos automáticamente para que tenga acceso en su propio idioma a todos los artículos de nuestra base de conocimientos (Knowledge Base). Sin embargo, los artículos traducidos automáticamente pueden contener errores en el vocabulario, la sintaxis o la gramática, como los que un extranjero podría cometer al hablar el idioma. Microsoft no se hace responsable de cualquier imprecisión, error o daño ocasionado por una mala traducción del contenido o como consecuencia de su utilización por nuestros clientes. Microsoft suele actualizar el software de traducción frecuentemente.
Haga clic aquí para ver el artículo original (en inglés): 810702

Contact us for more help

Contact us for more help
Connect with Answer Desk for expert help.
Get more support from smallbusiness.support.microsoft.com