2

因此，我有一个如下所示的自定义电子邮件表单/消息，我想访问“文档标题：”字段值以将其插入电子邮件正文。

我目前有这个代码；

Function Item_Send()
    Item.Body = Item.Body + UserProperties.Find("TextBox1").Text
End Function

我已经尝试了多种变体，例如Item.UserProperties.Find(...).Value,Find(...).Value本身,UserProperties.Find("TextBox1", false).Text等。

研究;
CodeProject
MSDN 查找方法文档
Microsoft 支持 - 如何创建电子邮件表单
Microsoft 支持 - 关于自定义 Outlook 表单的常见问题解答
Microsfot 支持 - 使用用户定义的字段

我似乎无法找到解决方案。 如果我添加到我得到的参数中
，发布的代码会返回； 自己找到给了我Object requred: 'UserProperties.Find(...)'
falseObject doesn't support this property of method: 'UserProperties.Find'
Type mismatch: 'Find'

这就是我能得到的所有错误信息。任何帮助将不胜感激。（我使用脚本编辑器按钮来编写上面的代码，而不是 Visual Basic 按钮）。

在此处输入图像描述

4

1 回答 1

2

将有问题的行更改为

set prop = Item.UserProperties.Find("TextBox1")
if Not (prop Is Nothing) Then
  Item.Body = Item.Body + prop.Value
End If

还要确保属性名称确实是“TextBox1”，这听起来像是一个控件名称。使用OutlookSpy查看项目：单击项目按钮，选择 UserProperties 属性，单击浏览，转到 IEnumVariant 选项卡，双击该属性。

您还可以单击 IMessage 按钮查看原始 MAPI 属性。

于 2013-05-17T06:00:44.160 回答