SMTP_Sender

4D v19

SMTP_Sender


SMTP_Sender ( smtp_ID ; msgRemetente {; excluirOpcao} ) -> Resultado

Parâmetro	Tipo	Descrição
smtp_ID	Inteiro longo	Referencia da mensagem
msgRemetente	Texto	Endereço de email (1 unicamente)
excluirOpcao	Inteiro	0 = Adicionar, 1 = Substituir, 2 = Excluir
Resultado	Inteiro	Código de erro

Descrição

O comando SMTP_Sender agrega o endereço de email da pessoa que envia a mensagem. Este comando está destinado a ser utilizado quando o remetente não é o autor real da mensagem, ou para indicar entre um grupo de autores quem enviou realmente a mensagem. Este comando não é necessário se o conteúdo do campo "Remetente" é redundante com o do campo "De".

Quando as mensagens são criadas e enviadas automaticamente por um programa, a área de cabeçalho Remetente deve fazer referencia a conta de correio do administrador do programa e não a conta administrada pelo programa.

smtp_ID é a referencia inteiro longo de um email criado com o comando SMTP_New.

msgRemetente contém o email a inserir no cabeçalho Remetente da mensagem. Só um endereço de email pode ser especificado para este cabeçalho.

excluirOpcao é um valor inteiro que especifica se deseja adicionar ou eliminar o cabeçalho Remetente:

Um valor de zero, agrega o novo valor ao campo Remetente.
Se passar um valor de 1, o conteúdo do parâmetro passado substituirá o conteúdo do cabeçalho existente. Neste caso, se passar uma cadeia vazia em msgRemetente, será eliminado o cabeçalho "Remetente".
Se passar 2, o cabeçalho "Remetente" é apagado da mensagem.
excluirOpcao é um parâmetro opcional que por padrão tem o valor zero.

Exemplo

Neste exemplo, três pessoas escrevem uma mensagem, sobre uma modificação da política da empresa, que deve ser distribuída a todos da empresa pela secretaria. As respostas a esta mensagem devem ser enviadas as três pessoas presentes no cabeçalho "De".

 $From:="prez@acme.com, vp@acme.com, cfo@acme.com"

 $Error:=SMTP_From($smtp_id;$From;0)

 $Error:=SMTP_Sender($smtp_id;"secretary@acme.com";0)

 $Error:=SMTP_Subject($smtp_id;"Mudança de política da empresa";0)

 $Error:=SMTP_To($smtp_id;◊Todos_Empregados;0)

Ver também

SMTP_New