Tek-Tips is the largest IT community on the Internet today!

Members share and learn making Tek-Tips Forums the best source of peer-reviewed technical information on the Internet!

  • Congratulations TouchToneTommy on being selected by the Tek-Tips community for having the most helpful posts in the forums last week. Way to Go!

I found the code

Status
Not open for further replies.

Johnweida

MIS
Apr 29, 2003
91
CN
Dear Mike,

I found the code and put the code to my form like below:

#DEFINE olFolderCalendar 9
LOCAL oOutlook,oNameSpace,oDefaultFolder
oOutlook = CREATEOBJECT("outlook.application")
oNameSpace = oOutlook.getnamespace("MAPI")
oDefaultFolder=oNameSpace.GetDefaultFolder (olFolderCalendar) &&Calendar
oDefaultFolder.display()

Is this OK ? (I omit other "#Define")

Great Mike, Thank you again and again.

John Satellite
 
It shouldn't post a new thread. But I really made a mistake.Please forgive me.

John Satellite
 
Status
Not open for further replies.

Part and Inventory Search

Sponsor

Back
Top