vb.net - 电子邮件中的多个文件附件

Question

我正在使用以下代码发送带有附件的电子邮件。我可以发送一个附件，但如何发送多个附件？

Dim vrAttachFilePath As String = "c:\users\ittahad\documents\abc.doc"
If vrAttachFilePath.Length > 0 Then
    oMail.Attachments.Add(New Net.Mail.Attachment(vrAttachFilePath))
End If

Answer 1

简单地说:

Dim vrAttachFilePathFile1 As String = "c:\users\ittahad\documents\abc.doc"
Dim vrAttachFilePathFile1 As String = "c:\users\ittahad\documents\def.doc"

oMail.Attachments.Add(New Net.Mail.Attachment(vrAttachFilePathFile1))
oMail.Attachments.Add(New Net.Mail.Attachment(vrAttachFilePathFile2))

您只需对每个附件调用 Attachments.Add 即可添加任意数量的附件。