Marcia,thanks very much for that.... that worked great.

Is there a way of also inserting the From and Date/Time ?

Regards,

Gerard



>I'm trying to add records to Outlook's inbox
>
>Try this:
>
>

>oApp = CreateObject( 'Outlook.application' )
>oSpace = oApp.GetNameSpace( 'MAPI' )
>oMess = oSpace.GetDefaultFolder( 6 )
>oNew = oApp.CreateItem( 0 )
>oNew.Subject = 'This is a line'
>oNew.Recipients.Add( 'me@myself.com' )
>oCopy = oNew.Copy()
>=oCopy.Move( oMess )
>