Posso usar o endereço de e-mail no corpo do e-mail automaticamente

Question

Gostaria de criar uma assinatura com um URL rastreável distinto. Idealmente, o link seria algo como www.domain.com?Email=$EMAILADDRESS

Em que $ EMAILADDRESS é o endereço de e-mail atual enviado para. Obviamente, isso pode mudar se houver uma maneira de fazer isso, o restante da URL é apenas para informar ao site quais são os dados.

Isso é possível no Outlook?

    

Answer 1

Você pode acionar uma macro ao clicar no botão "Enviar", que modifica diretamente o conteúdo do e-mail.

Como entrada para dez:

Private Sub Application_ItemSend(ByVal Item As Object, Cancel As Boolean)

    Dim email As String

    ' Don't stop for errors
    On Error Resume Next

    ' Get STMP email address of first recipient of email.
    email = Item.Recipients.Item(1).PropertyAccessor.GetProperty("http://schemas.microsoft.com/mapi/proptag/0x39FE001E")

    ' If that fails, then use blank ("") instead
    If Err.Number <> 0 Then email = ""

    ' Work out what type of email it is and then replace $EMAILADDRESS in
    ' the body to that of 'email'
    Select Case Item.BodyFormat
        Case olFormatHTML
            Item.HTMLBody = Replace(Item.HTMLBody, "$EMAILADDRESS", email)
        Case olFormatRTF
            Item.RTFBody = Replace(Item.RTFBody, "$EMAILADDRESS", email)
        Case Else
            Item.Body = Replace(Item.Body, "$EMAILADDRESS", email)
    End Select

    On Error Goto 0

End Sub

Se você colocar $EMAILADDRESS em seu e-mail (por exemplo, sua assinatura), ele será substituído pelo endereço de e-mail dos remetentes.