Multiple attachments with VBSendMail (SMTP Send Mail for VB6.0)

[indydavid32]

Hello everyone. I am using SMTP Send Mail for VB6.0. Everythig works great except I am only able to send one attachment at a time. Does anyone know how I can send 2 attachments with an email using this component?

Here is my code.

poSendMail.Subject = "Profit and loss statement."
poSendMail.Attachment = "C:\P&L-" & Trim(Reports.Combo3.Text) & "-" & Trim(Reports.Combo1.Text) & ".pdf"
poSendMail.Attachment = "C:\ServiceAnalysis-" & Trim(Reports.Combo3.Text) & "-" & Trim(Reports.Combo1.Text) & ".pdf"
poSendMail.Send
Set poSendMail = Nothing

The preceding code just sends the 2nd attached file, not the first one.
I also tried posendmail.attachment file1 & "," & file2. This doesn't work either. I also tried it with a semicolon instead of a comma.

Thanks