VB 脚本，在保持格式不变的同时修改正文

Question

我想使用 VBscript 打开一个模板（或 .msg），编辑正文，同时保留格式，最后发送电子邮件。

电子邮件中有一个名为“插入日期”的部分，我想在其中插入日期。

这是我目前拥有的一些代码：

Set ol = CreateObject("Outlook.Application") 
Set msg = ol.CreateItemFromTemplate([location of template file] 

Set doc = msg.GetInspector.WordEditor 

If Not doc Is Nothing Then 
    doc.application.selection.find.execute _ 
        "insert date", , , , , , , , , DateValue(Now() - Weekday(Now(), vbMonday) - 2), wdReplaceAll 
End If 

不幸的是，这并没有替换文本，而只是突出显示了文本，我无法做任何进一步的事情。

另一个相关问题： 我是编码新手，我使用 VBScript 是因为我来自 VBA，在那里我正在做与文档非常相似的事情。看来 VBScript 不仅有限制，而且我觉得它不是很容易使用（可能是因为它不是很强大？） 是否有另一种语言可用于自动化此类事情并与 Outlook 交互？ 也许是 Python，但我不确定从哪里开始使用 Microsoft Office 集成。 注意：我确信许多编码语言都可以做到这一点，但我在工作中可以使用的东西受到限制，所以任何不太知名的语言肯定不会被支持:(

Answer 1

我不知道 vbs（或替代品）....

但是当你用 Outlook-vba 标记它时，我正在用这段代码做类似的事情：

mailitem.HTMLBody = Replace(mailitem.HTMLBody, "text old", "text new" & now())

您还可以使用 html-tags 使文本变粗、变大或其他。

最大