在 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 用于开发人员和编程问题。
在与不同时区的团队合作并与他们交换电子邮件时,我经常发现,如果我能在回复电子邮件时输入我的时区,那将非常有帮助。
例如,当我使用 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 用于开发人员和编程问题。