activate window "debug output" * simple test email program using MAPI oleMAPISession = createobject( "MSMAPI.MAPISession.1" ) * Signon to mail with oleMAPISession .UserName = "Test" .Password = "" .Signon() * Check the SignOn status if ( .SessionID > 0 ) oleMAPIMessages = createobject( "MSMAPI.MAPIMessages.1" ) * tell the message the SessionID oleMAPIMessages.SessionID = .SessionID debugout "Successful mail log on" else debugout "Mail login failed" return endif endwith * Send an email with oleMAPIMessages .Compose() * Set the Recipient name and resolve .RecipDisplayName = "DavidFrankenbach@worldnet.att.net" .RecipType = 1 .ResolveName() .MsgSubject = "This is the Subject" .MsgNoteText = "This is the email text" .Send( .f. ) endwith * Read the InBox with oleMAPIMessages .Fetch() for i = 0 to .MsgCount-1 .MsgIndex = i debugout .MsgSubject endfor endwith * Signoff oleMAPISession.Signoff()