4D Netkit: Anexar uma mensagem de correio eletrónico com o Gmail

Pode haver momentos em que acha necessário manter um email como modelo dentro de uma etiqueta designada em sua caixa de correio. Com o lançamento de 4D 20 R5, introduzimos uma funcionalidade que lhe permite adicionar um email a uma caixa de correio sem o enviar.

Conexão de conta

Antes de anexar um email, vamos criar um objeto de conexão OAuth 2.0 e um objeto Google.

var $oAuth2 : cs.NetKit.OAuth2Provider
var $google : cs.NetKit.Google
$oAuth2:=cs.NetKit.OAuth2Provider.new($credentials)
$google:=cs.NetKit.Google.new($oAuth2; {mailType: "JMAP"})

Anexar uma mensagem de correio eletrónico

Para anexar uma mensagem de correio eletrónico, é necessário utilizar a função .append():

$status:=$google.mail.append($mail)

Por defeito, o e-mail é criado com uma etiqueta “DRAFT”, mas pode alterá-la passando um segundo parâmetro:

$status:=$google.mail.append($mail;["INBOX"])

$mail:=$google.mail.getMail($draftId)
$mail.to:="Toaddress@mail.com"

$status:=$google.mail.send($mail)
if ($status.success)
   // If you no longer need your draft
   $google.mail.delete($draftId)
end if