かにフルパスです。pstファイルとは何ですか?
質問
があるので、プログラムの位置を調べ、現在のユーザーの見通し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]
これは少し役立つかもしれません。
所属していません StackOverflow