Thanks for the help guys,

I was able to fix the problem by adding:

Thisform.oleMmess.MsgNoteText = 'text body'

Before I wasn't putting anything into the body just the attatchment, but just adding something to the body fixed the problem.

Thanks for your help again.