4D Doc Center : SMTP

4D Internet Commands v14

SMTP_MessageID


SMTP_MessageID ( smtp_ID ; mensaje_ID {; opcion} ) -> Resultado

Parámetro	Tipo	Descripción
smtp_ID	Entero largo	Referencia del mensaje
mensaje_ID	Texto	Identificación única del mensaje
opcion	Entero	0 = Añadir (predeterminado), 1 = Reemplazar, 2 = Suprimir
Resultado	Entero	Código de error

Descripción

El comando SMTP_MessageID añade un campo "mensaje-ID " en el encabezado del mensaje cuya referencia se pasa en smtp_ID. Este identificador único se utiliza en particular en los foros o listas de correo públicas. En general, los servidores de correo añaden automáticamente este encabezado a los mensajes que envían. Puede utilizar este comando para definir su contenido.

smtp_ID contiene el ID de un mensaje de correo electrónico creado con el comando SMTP_New.

En mensaje_ID, pase el identificador a asociar al mensaje. Los contenidos a pasar son normalmente sin restricciones, sin embargo por convención, por lo general son de la forma "letrasONumeros@dominio", por ejemplo "abcdef.123456@4d.com". Tenga en cuenta que algunos servidores de correo electrónico (como Gmail) no reconocen los encabezados "message-id" personalizados y los reemplazan cuando no están en esta forma.

El parámetro opcion le permite especificar si conservar o eliminar el encabezado mensaje_ID existente:

Si pasa 0 (valor por defecto si el parámetro se omite), se añade el contenido del parámetro pasado al contenido existente.
Si pasa 1, el contenido del parámetro pasado reemplaza el contenido existente.
Si pasa 2, los contenidos existentes se eliminan del mensaje.

Ejemplo

En este ejemplo, un mensaje con un encabezado "message-id" específico se envía para cada registro de la tabla [Admin]:

 $error:=SMTP_New($smtp_id)

 $error:=SMTP_Host($smtp_id;"infoserv.com")

 $error:=SMTP_From($smtp_id;"info@infoserv.com")

 $error:=SMTP_Subject($smtp_id;"General statistics")

 FIRST RECORD([Admin])

 For($i;1;Records in selection([Admin]))

    $error:=SMTP_Body($smtp_id;$Stats)

    $error:=SMTP_To($smtp_id;[Admin]Email;1) // Remplaza el encabezado "A" por un nuevo valor

    $error:=SMTP_MessageID($smtp_id;[Admin]ID+"@infoserv.com";1) // Uso del ID del admin

    $error:=SMTP_Send($smtp_id)

    NEXT RECORD([Admin])

 End for

 $error:=SMTP_Clear($smtp_id)