在 Windows/Outlook 中将时区显示为长日期 + 时间的一部分

Question

当与不同时区的团队合作并与他们交换电子邮件时，我经常发现，如果我能在回复电子邮件时输入我的时区，那将非常有帮助。

例如，当我使用 Outlook Microsoft回复电子邮件时，我正在回复的电子邮件将包含在我的电子邮件正文中，其中包含时间 + 日期，格式如下

寄件人：史密斯，约翰

发送时间：2015 年 1 月 23 日星期五下午 12：26

收件人：我或我的团队

主题：TGIF

我认为这是基于长时间日期和时间的Windows设置，可以在"区域设置"下的"控制面板"中进行调整。

虽然我可以在这里设置我的时区，但我找不到一种方法来包含我的时区以成为长日期或长时间格式的一部分。我想在 Outlook 上看到这样的最终结果

发送时间：太平洋标准时间 2015 年 1 月 23 日星期五下午 12：26

有谁知道怎么做？

我正在使用Outlook 2007和Windows 7，以防万一。

<小时 />

我的谷歌搜索能力今天似乎不起作用。也许是因为今天是星期五。好吧，至少在我的时区。;)

Answer 1

您可以在 PR_TRANSPORT_MESSAGE_HEADERS （DASL- http://schemas.microsoft.com/mapi/proptag/0x007D001F） 属性中找到此类信息，例如：

日期：2015 年 1 月 23 日星期五 06：47：04 +1100

尝试使用任何低级属性查看器（如 MFCMAPI 或 Outlook Spy）来浏览属性值。

类可用于访问值。

Sub DemoPropertyAccessorGetProperty()  
    Dim PropName, Header As String  
    Dim oMail As Object  
    Dim oPA As Outlook.PropertyAccessor  
    'Get first item in the inbox  
    Set oMail = _ 
       Application.Session.GetDefaultFolder(olFolderInbox).Items(1)  
    'PR_TRANSPORT_MESSAGE_HEADERS  
    PropName = "http://schemas.microsoft.com/mapi/proptag/0x007D001E"  
    'Obtain an instance of PropertyAccessor class  
    Set oPA = oMail.PropertyAccessor  
    'Call GetProperty  
    Header = oPA.GetProperty(PropName)  
    Debug.Print (Header)  
End Sub

最后，我建议在 http://www.superuser.com 网站上提出非编程问题。当前的论坛/站点适用于开发人员和编程问题。