sItem.Fields.Item(Tag).Value = "Someone <whoever@domain.com>"if this row failed then try this:
sItem.Fields.Item(0x0C1E001E).Value = "SMTP" && type address sItem.Fields.Item(0x0C1A001E).Value = "Someone" && sender name sItem.Fields.Item(0x0C1F001E).Value = "whoever@domain.com" && sender email addressMartinaJ
>>>sItem.Item = oMailItem >>>tag = sItem.GetIDsFromNames("{00020386-0000-0000-C000-000000000046}", "From") >>>tag = tag or &H1E && the type is PT_STRING8 && Foxpro doesn’t like this line >>>sItem.Fields(Tag) = "Someone <whoever@domain.com>" && and this line give an invalid subscript reference >>>sItem.Subject = sItem.Subject 'to trick Outlook into thinking that something has changed >>>safeitem.save() >>>>>>