質問

があるので、プログラムの位置を調べ、現在のユーザーの見通しpstファイルを通してAPI呼び出しまたはレジストリへのエントリーはお済ですか?

役に立ちましたか?

解決

展望償還, できる繰り返し処理を実行し、メッセージ店舗のVBAを使用 RDOStores収集からアクセス可能 RDOSession.Stores 物件です。

私は将来への可能性があることだと類似したりしているのVBA...

編集:

当然のことながら、経路の街で符号化されたのStoreId文字列になります。Googleが この:

Sub PstFiles()
  Dim f As MAPIFolder

  For Each f In Session.Folders
    Debug.Print f.StoreID
    Debug.Print GetPathFromStoreID(f.StoreID)
  Next f
End Sub

Public Function GetPathFromStoreID(sStoreID As String) As String
  On Error Resume Next
  Dim i As Long
  Dim lPos As Long
  Dim sRes As String

  For i = 1 To Len(sStoreID) Step 2
    sRes = sRes & Chr("&h" & Mid$(sStoreID, i, 2))
  Next

  sRes = Replace(sRes, Chr(0), vbNullString)
  lPos = InStr(sRes, ":\")

  If lPos Then
    GetPathFromStoreID = Right$(sRes, (Len(sRes)) - (lPos - 2))
  End If
End Function

で試作しています。

他のヒント

パスは以下のどこかにあるはずです:

  

[HKEY_CURRENT_USER \ Software \ Microsoft \ Windows   NT \ CurrentVersion \ Windowsメッセージング   Subsystem \ Profiles \ Outlook]

これは少し役立つかもしれません。

ライセンス: CC-BY-SA帰属
所属していません StackOverflow
scroll top