*************************** set Session = CreateObject("Redemption.RDOSession") Session.Logon set Mail = Session.GetDefaultFolder(olFolderOutbox).Items.Add("IPM.Note") Mail.Recipients.Add "eaters@lunch.com" Mail.Subject = "Lunch anybody?" Mail.Body = "Please open the message and click on one of the buttons" & vbCrLf & _ " (Chinese;Italian;Mexican;Don't care) on the toolbar" & vbCrLf & _ ''to indicate your lunch preference" Mail.VotingOptions = "Chinese;Italian;Mexican;Don't care" Mail.Send ***************************
*************************** session = CreateObject("Redemption.RDOSession") session.Logon Mail = session.GetDefaultFolder(olFolderOutbox).Items.Add("IPM.Note") && gives error - Variable 'olFolderOutbox' is not found Mail.Recipients.Add = "someshs@cybage.com" Mail.Subject = "Lunch anybody?" Mail.Body = " Test " Mail.VotingOptions = "Chinese;Italian;Mexican;Don't care" Mail.Send ***************************Please let me know the changes required in the code to run this in VFP 6.