Power Builder - archivos adjuntos

Que tal,

Yo utilizo el siguiente codigo para enviar un mail, pero quisiera saber como puedo hacer para colocar archivos adjuntos a este. ¿Alguien sabe como hacerlo? por favor es muy urgente.

Paolo

mailSession mSes
mailReturnCode mRet
mailMessage mMsg
mSes = create mailSession
mRet = mSes.mailLogon(mailNewSession!)

IF mRet <> mailReturnSuccess! THEN
MessageBox("Mail", 'Logon failed.')
RETURN
END IF

mMsg.Recipient[1].address = dw_1.getitemstring(1,"direccionce")
mRet = mSes.mailSend(mMsg)

IF mRet <> mailReturnSuccess! THEN
MessageBox("Correo Electronico", 'Correo Electronico No enviado')
RETURN
END IF
mSes.mailLogoff()
DESTROY mSes

Agrega:
mMsg.Recipient[1].address = dw_1.getitemstring(1,"direccionce")

// Adjunta
mAttach[tt].FileType = mailAttach!
mAttach[tt].PathName = // Origen del Path
mAttach[tt].FileName = // Nombre del Archivo
mAttach[tt].Position = len(mMsg.notetext) - 1
mMsg.AttachmentFile = mAttach

mRet = mSes.mailSend(mMsg)
-----------------------

Suerte!