with Thisform.oMAPI m.lcEmailAddress = oApp.GetClientEmail(oApp.inPersonId) IF NOT EMPTY(m.lcEmailAddress) .AddRecipient(m.lcEmailAddress) ELSE x3MSGSVC("No Email address found for this client.") ENDIF .AddAttachment(m.lcOutputFile) .cSubject = JUSTFNAME(m.lcOutputFile) .Send(.T.) endwithThis works fine for my Thunderbird email program, but a client using Outlook 2003 says they get prompted with the normal Outlook "something else is trying to send email" message, but then nothing happens after they "allow it".