공유 Outlook 일정에서 약속 삭제 관련 문제

Question

SharePoint 사이트에서 스크립트를 작성하고 실험실 중단이 발생할 경우 Outlook에서 약속을 만듭니다. 나는 나의 전망에서 테스트하면 작동 삭제 방법은, 그러나 그것은 공유 일정

Private Sub DeleteAllAppointments() 
    Dim olkApp As Object, _ 
     olkSession As Object, _ 
     olkCalendar As Object, _ 
     olkItem As Object, _ 
     intIndex As Integer 
    Set olkApp = CreateObject("Outlook.Application") 
    Set olkSession = olkApp.Session 
    olkSession.Logon 

    Set olkCalendar = olkSession.GetDefaultFolder(olFolderCalendar) 
    For intIndex = olkCalendar.Items.Count To 1 Step -1 
     Set olkItem = olkCalendar.Items.Item(intIndex) 
     olkItem.Delete 
    Next 
    Set olkItem = Nothing 
    Set olkCalendar = Nothing 
    olkSession.Logoff 
    Set olkSession = Nothing 
    Set olkApp = Nothing 
End Sub 

방법은 사람이 어떤 경우 궁금 해서요

Set olkCalendar = olkSession.GetDefaultFolder(olFolderCalendar) 

충돌 곳입니다 지워지지 않습니다이 아이디어를 통해이 문제를 해결할 수 있습니다. 이 폴더 경로 문제가 궁금 무엇입니까?

Answer 1

olkSession.GetDefaultFolder(olFolderCalendar)은 기본 캘린더 폴더를 검색합니다. 당신도 someRecipient가 olkSession.CreateRecipient)에 의해 반환되는 olkSession.GetSharedDefaultFolder(someRecipient, olFolderCalendar)를 (사용하거나 Namespace.Stores 모음에서 해당 저장소를 엽니 다() 대리자의 사서함이 이미있는 가정 및 Store.GetDefaultFolder를 호출해야합니다.

이