（用cc场）

Question

之前您关闭这个问题，因为它“没有任何意义”和“这是不可能的”发送不同内容的一封电子邮件为每个收件人，请听我说：

问题：

我们实施跟踪像素（我可下载的专属网址GIF文件）在我们发送使用我们的系统的每封电子邮件，这有助于我们跟踪电子邮件的打开。这里的问题是，当我们的CC几个收件人跟踪像素被下载，我们无法检测谁已经打开了该邮件，因为所有的电子邮件抄送的内容必须是相同的。

可能的解决方案：

如果SMTP服务器是控制注入跟踪像素的SMTP可以在邮件正文从接收者通过发布每个接收者使用不同的网址更改为收件人，假装收到的所有收件人相同的信息。

然而，使用公共SMTP服务器（例如谷歌的SMTP）这似乎并不可能，但也有企业（AirMail举例）仍然是能够做到这一点，发送每个收件人不同的内容（不同的跟踪网址在cc消息中）。当我检查电子邮件标题时，它们似乎是从Google邮件服务器发送的（客户端帐户使用gmail.com帐户）。这怎么可能？

Answer 1

他们正在为每个人唯一的消息。没有什么真正的神奇。通常某种类型的邮件合并。

Answer 2

虽然我没有给你一个C＃解决方案，这里是一个很好的解决方案VBA，使用Excel。

Sub Send_Files() 
'Working in Excel 2000-2016 
'For Tips see: http://www.rondebruin.nl/win/winmail/Outlook/tips.htm 
    Dim OutApp As Object 
    Dim OutMail As Object 
    Dim sh As Worksheet 
    Dim cell As Range 
    Dim FileCell As Range 
    Dim rng As Range 

    With Application 
     .EnableEvents = False 
     .ScreenUpdating = False 
    End With 

    Set sh = Sheets("Sheet1") 

    Set OutApp = CreateObject("Outlook.Application") 

    For Each cell In sh.Columns("B").Cells.SpecialCells(xlCellTypeConstants) 

     'Enter the path/file names in the C:Z column in each row 
     Set rng = sh.Cells(cell.Row, 1).Range("C1:Z1") 

     If cell.Value Like "?*@?*.?*" And _ 
      Application.WorksheetFunction.CountA(rng) > 0 Then 
      Set OutMail = OutApp.CreateItem(0) 

      With OutMail 
       .to = cell.Value 
       .Subject = "Testfile" 
       .Body = "Hi " & cell.Offset(0, -1).Value 

       For Each FileCell In rng.SpecialCells(xlCellTypeConstants) 
        If Trim(FileCell) <> "" Then 
         If Dir(FileCell.Value) <> "" Then 
          .Attachments.Add FileCell.Value 
         End If 
        End If 
       Next FileCell 

       .Send 'Or use .Display 
      End With 

      Set OutMail = Nothing 
     End If 
    Next cell 

    Set OutApp = Nothing 
    With Application 
     .EnableEvents = True 
     .ScreenUpdating = True 
    End With 
End Sub 

http://www.rondebruin.nl/win/s1/outlook/amail6.htm