I have the following code to send an email with MS Outlook "from" a different email address than the one the user is currently logged in as:-

sItem = safeitem
sItem.Item = oMailItem
tag = sItem.GetIDsFromNames("{00020386-0000-0000-C000-000000000046}", "From")
tag = BITOR( tag, 0x1E) && the type is PT_STRING8 (UNICODE) && Foxpro 

sItem.Fields.Item[Tag].Value = "Someone <whoever@domain.com>"

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 address

sItem.Subject = sItem.Subject  'to trick Outlook into thinking that something has changed

safeitem.save()
safeitem.send()

I can't seem to get the code to work? Can anyone help?