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

Display timezone as part of long date+time in Windows/Outlook

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

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

From: Smith, John

Sent: Friday, January 23, 2015 12:26 PM

To: Me or my team

Subject: TGIF

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

虽然我可以在此处设置我的时区,但我找不到将我的时区包含在长日期或长时间格式中的方法。我想在 Outlook 上看到这样的最终结果

Sent: Friday, January 23, 2015 12:26 PM PST

有人知道怎么做吗?

我正在使用 Outlook 2007 和 Windows7,以防万一。


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

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

Date: Fri, 23 Jan 2015 06:47:04 +1100

尝试使用任何低级别 属性 查看器(例如 MFCMAPI 或 Outlook Spy)来探索 属性 值。

PropertyAccessor class 可用于访问值。

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 网站上提问非编程问题。当前 forum/site 用于开发人员和编程问题。