1

Я хотел бы создать подпись с четким отслеживаемым URL. В идеале ссылка будет что-то вроде www.domain.com?Email=$EMAILADDRESS

Где $ EMAILADDRESS - текущий адрес электронной почты, на который отправляется. Очевидно, что это может измениться, если есть способ сделать это, остальная часть URL-адреса просто сообщает веб-сайту, каковы данные.

Это возможно в Outlook?

1 ответ1

2

Вы можете запустить макрос, нажав на кнопку "Отправить", которая затем напрямую изменит содержание письма.

Как стартер на десять:

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

Если вы указали в своем письме $EMAILADDRESS (например, свою подпись), его заменит адрес электронной почты отправителя.

Всё ещё ищете ответ? Посмотрите другие вопросы с метками .