cLoginName = "loginname" cPassword = "password" cRecipient = "kmarois@comcast.net" cSubject = "Test Email" cBody = "This is a test *cAttachment = "d:\projects\vfp1\email\test.txt" oSession = CREATEOBJECT("MSMAPI.MAPISession") oMessages = CREATEOBJECT("MSMAPI.MAPIMessages") WITH oSession .DownLoadMail = .T. .LogonUI= .F. .UserName = cLoginName .Password = cPassword .SignOn() ENDWITH oMessages.SessionID = oSession.SessionID oMessages.Compose() oMessages.RecipAddress = cRecipient oMessages.MsgSubject = cSubject oMessages.MsgNoteText = cBody oMessages.Send(.T.)