Sir,
I have used the following code(via foxite.com) from the above said subject, but sorry to say when I run the same then attached message come.

The message is "Class definition Redemption.SafeMailItem is not found".

I have installed office 2007 at my system & the Outlook 2007 is running very fine on it.

I wish to contact u from foxite.com but could not understand how to.

Kindly guide me.

Thanks and best regards.
Love to say that I am FOXPRO Lover too.

-------------------------------------------------------------------------------------
LOCAL loOutlook AS Outlook.Application
LOCAL loNameSpace AS Outlook.NameSpace
LOCAL loMailItem AS Outlook.MailItem
LOCAL loSafeItem AS Object

#DEFINE olMailItem 0

loOutlook = CREATEOBJECT('Outlook.Application')
loNameSpace = loOutlook.GetNamespace("MAPI")
loNameSpace.Logon
loMailItem = loOutlook.CreateItem( olMailItem ) && This creates the MailItem Object
loSafeItem = CREATEOBJECT(‘Redemption.SafeMailItem’)

WITH loSafeItem
.Item = loMailItem && This attaches the Mail Object to
&& Redemption SafeMailItem Object
.Recipients.Add("fred.bloggs@bloggsville.com")
.Subject = "Test Email with VFP & Redemption"
.Body = "This is the Main Body of the Message"
.Send && this does not cause the Security Dialog to be displayed.
ENDWITH
----------------------------------------------------------------
Raj.....
Instant: 0999-999-3560
Visit My Web-Site: www.kholikhopdi.funurl.com
Be thankful for what u have. B creative. B innovative. Think differently & positively.


Raj...
rajneesh2350@yahoo.co.in
rajneesh2350@gmail.com
M-999-999-3560 (India)