I'm trying to add records to Outlook's inbox
(To simulate a RECEIPT of mail)
and am having difficulty.

oApp=CreateObject('Outlook.application')
oSpace=oApp.GetNameSpace('MAPI')

oMess=oSpace.GetDefaultFolder(6)
oNew=oMess.Items.Add()
oNew.Subject='This is a line'
oNew.Send

This code seems to put the data ok into the outbox, waiting to be sent

What I need to do is insert a line into the Inbox



Regards,

Gerard