Attchament names corrupt when multiple attachments

Hello experts, i am trying to create an email document with VB.Net using some examples i found. It works in general, but the file names in the created file, starting from teh 2nd attachment are corrupt. So when i open the created email, the first file name is ok, (lets say “Test.txt”) but the others look like ATTYZU6P, ATTYKA0A (looks like ATTY + random collection of capital letters)

Du you have an idea where my mistake may be? here’s the code snippet that i use:

        With noDocument

            .Form = "Memo"

            .SendTo = vaRecipient

            .Subject = strSubject

            .Body = strBody



            If strAtts <> "" Then

                Dim arrAtts As String() = Split(strAtts, vbCrLf)

                Dim oAttach As Object 'The attachment richtextfile object

                Dim oEmbed As Object 'The embedded object (Attachment)

                oAttach = .CREATERICHTEXTITEM("Attachment")



                For Each strAtt In arrAtts

                    If strAtt <> "" Then

                        oEmbed = oAttach.EMBEDOBJECT(1454, "", strAtt, Path.GetFileName(strAtt))

                    End If

                Next

            End If

            .SaveMessageOnSend = True

        End With

Subject: The names aren’t corrupt

Notes/Domino does this when attachments have the same name. Do the files you are attaching have similar names?

Subject: great!

Thanks really, that was the reason! - for test i took 3 times the identical file…