Hi Canh Luong
Good to know it works. To send many attachments, it's easy, note the attachmentindex property.

*** first one
this.parent.OleMMess.AttachmentIndex = 0
this.parent.OleMMess.AttachmentType = 0
this.parent.OleMMess.AttachmentName = "ADD.TXT"
this.parent.OleMMess.AttachmentPathName = "d:\dtd40x\add.txt"
*** second one
this.parent.OleMMess.AttachmentIndex = 1
this.parent.OleMMess.AttachmentType = 0
this.parent.OleMMess.AttachmentName = "BLABLA1.TXT"
this.parent.OleMMess.AttachmentPathName = "d:\dtd40x\BLABLA1.txt"
*** third
this.parent.OleMMess.AttachmentIndex = 2
this.parent.OleMMess.AttachmentType = 0
this.parent.OleMMess.AttachmentName = "Meaningful name"
this.parent.OleMMess.AttachmentPathName = "d:\dtd40x\BLABLA3.txt"

Cheers
Jaime

>Hi Jaime B. Pinto
>Thank you a lot for your help. I try that codes and they work very good.
>However, I would like to attach many files, not one file. What are codes added in my prog.
>Can you help me again, please?
>Thanks
>Canh