Exchangeオフィスに接続する365、共有メールボックス

Question

すべてをoffice365に移行した後、特定の共有メールボックスに送信されたメールを読み取るアプリケーションが失敗しました。

これを修正する方法がわかりません。移行前に正常に機能しました。

は、その時の私の資格情報は以下の通りであった。

exchangeService.Credentials =新WebCredentials（ "ユーザー"、 "PW"、 "windowsdomain"） exchangeService.AutodiscoverUrl（ "inboxxx@domain.com"）

、私が使っていたURI： 「

exchangeService.Url = exchangeService.Url =新U ri（ "https://owa.DOMAIN.com/ews/exchange.asmx"）

と交換所Exchange2010_SP2。

しかし、私はコードを正しく更新したとは思うが、移行後には機能しませんでした（明らかに私はそうではありませんでした）。

私がしようとしているコードは、このです：（これは動作しません）

Sub GetEmails() 

    Dim exchangeService As New ExchangeService(ExchangeVersion.Exchange2013) 
    'WebService Uri 
    'Try 
    exchangeService.Url = New Uri("https://outlook.office365.com/ews/exchange.asmx") 



    exchangeService.Credentials = New WebCredentials("user@domain.com", "PW") 
    exchangeService.AutodiscoverUrl("inboxxx@domain.com") 


    Dim findResults As FindItemsResults(Of Item) = exchangeService.FindItems(WellKnownFolderName.Inbox, New ItemView(10)) 
    For Each item As Item In findResults.Items 
     Dim strID As String 
     'Get mail ID 
     strID = item.Id.ToString 
     'Get Lid from mail subject 
     strLid2 = item.Subject.ToString 
     strLid2 = UCase(strLid2.Substring(strLid2.Length - 8)) 
     'Get attachements 
     Call GetAttachmentsFromEmail(exchangeService, strID) 
     'Move email 
     Call MoveEmail(exchangeService, strID) 
     'Upload files to case 
     Call GetFiles() 

    Next 

End Sub 

私は誰かが私を助けるか、正しい方向に私を指すことを願って、私は、この課題を克服することができます。

Brで VG

Answer 1

あなたはそれがあなたのために何もしない

FolderId MailboxToAccess = new FolderId(WellKnownFolderName.Inbox, "SharedMailbox@domain.com"); 
exchangeService.FindItems(MailboxToAccess, New ItemView(10)) 

が自動検出ラインを取り除く共有メールボックスなどにその場合はアクセスしたいメールボックスを指定するには、フォルダIDクラスを使用する必要があります

CASサーバー（既に静的に指定したOffice365内の単一のエンドポイント）のURLを検出するだけです。あなたに接続しているメールボックスには何の制限もありません。