>All,
>
> I need a sample of how to loop through items in an Outlook calendar.
>
>Please help

e.g.

oOutlook=NewObject("outlook.application")
oMAPI=oOutlook.GetNameSpace("MAPI")
oCal=oMAPI.GetDefaultFolder(9) 
For Each oItem in oCal.Items
  ? oItem.Subject, oItem.Start, oItem.End
Next

you can use the Object Browser in vfp7+ to view enum values for GetDefaultFolder(). All folders work pretty much the same -- you can loop through the Items collection and Items have many of the same properties, although each folder has a default type of item that it holds.