Problemas al intentar enviar más de 1 ADJUNTO con MAPI

[Bazooka]

Hola amigos tengo este bloque de codigo que necesito enviar un adjunto y a veces dos, pero solo me funciona cuando envio uno ya que si intento enviar 2 no pasa absolutamente nada y nunca se habre la ventana del outlook!

   

Código: [Seleccionar]

MAPISession1.SignOn
    MAPISession1.DownLoadMail = False
    DoEvents
    MAPIMessage1.SessionID = MAPISession1.SessionID
    MAPIMessage1.Compose
    MAPIMessage1.RecipAddress = txtSendTo
    MAPIMessage1.RecipDisplayName = Label1 '"Aca lo que muestro"
    MAPIMessage1.ResolveName
    MAPIMessage1.MsgSubject = Label3 '"Liquidación: Diciembre/2011" 'AnsParseStr
    MAPIMessage1.AttachmentIndex = 0
    MAPIMessage1.AttachmentType = 0
    MAPIMessage1.AttachmentPathName = FileToAttach
    MAPIMessage1.AttachmentPosition = 0

    'si activo estas lineas que serian para enviar el segundo adjunto no se envia nada!!
    'CUANDO DIGO NADA ME REFIERO NI AL PRIMERO NI AL SEGUNDO NI SE ABRE LA VENTANA
    'EMERGENTE PARA EL ENVIO
    '    MAPIMessage1.AttachmentIndex = 1
    '    MAPIMessage1.AttachmentPathName = FileDetalle
    '    MAPIMessage1.AttachmentName = Left$(AnsParseStr, Len(AnsParseStr) - 4) & "_detalle.txt"
    '    MAPIMessage1.AttachmentPosition = 1

[E N T E R]

Por que no le metes en un .rar o un zip, entonces se convierte solo en 1 archivo ademas va a ser mas chico.

[Bazooka]

es solo un archvivo de texto con datos muy pequeños y no quiero complicar el codigo comprimiendo, luego descomprimiendo y todo eso.
ya lo tengo armado y funcionando pero solo me surge este moco ahora!