hi all,
hi,
I am developing a application which would open the shared calender of outlook and read the meeting notices and also modifies the meeting notice from Vb.I am successful in opening the shared calender but now how can i read/write the contents of the shared calender. please provide me the syntax of functions that can acheive the purpose in VB.
I have one more problem when i execute the code.. it gives a popup window saying that " A program is trying to access e-mail address you have stored in outlook .. do u want to allow this this" and it gives me the option to allow access for either 1 or 2 or 5 or 10 min" .. How can i get rid of this pop up message? i have read and write access to this share calender
here is the code i used to open the shared calender
Dim olNs As Outlook.Namespa ce
Dim objMAPIFolder As Outlook.MAPIFol der
Dim myRecipient As Outlook.Recipie nt
Dim olApp As Outlook.Applica tion
Set olApp = CreateObject("O utlook.Applicat ion")
Set olNs = olApp.GetNamesp ace("MAPI")
olNs.Logon
Set myRecipient = olNs.CreateReci pient("Conf 102")
myRecipient.Res olve
If myRecipient.Res olved Then
Set objMAPIFolder = olNs.GetSharedD efaultFolder _
(myRecipient, olFolderCalenda r)
End If
objMAPIFolder.D isplay
Thanks
hi,
I am developing a application which would open the shared calender of outlook and read the meeting notices and also modifies the meeting notice from Vb.I am successful in opening the shared calender but now how can i read/write the contents of the shared calender. please provide me the syntax of functions that can acheive the purpose in VB.
I have one more problem when i execute the code.. it gives a popup window saying that " A program is trying to access e-mail address you have stored in outlook .. do u want to allow this this" and it gives me the option to allow access for either 1 or 2 or 5 or 10 min" .. How can i get rid of this pop up message? i have read and write access to this share calender
here is the code i used to open the shared calender
Dim olNs As Outlook.Namespa ce
Dim objMAPIFolder As Outlook.MAPIFol der
Dim myRecipient As Outlook.Recipie nt
Dim olApp As Outlook.Applica tion
Set olApp = CreateObject("O utlook.Applicat ion")
Set olNs = olApp.GetNamesp ace("MAPI")
olNs.Logon
Set myRecipient = olNs.CreateReci pient("Conf 102")
myRecipient.Res olve
If myRecipient.Res olved Then
Set objMAPIFolder = olNs.GetSharedD efaultFolder _
(myRecipient, olFolderCalenda r)
End If
objMAPIFolder.D isplay
Thanks