如何以 Notes 形式显示来自文件系统的图像?

How to show an image from the filesystem in a Notes form?

我想在 Notes 客户端表单中显示来自文件系统的图像。 我尝试使用 Picture 对象,但即使是计算图像也只允许来自资源的图片。如果没有昂贵的第三方库,更改资源似乎是不可能的。我该如何解决?

您可以使用 «Pass-Thru HTML» 功能。您可以将 <img> 标签与您的图像一起用作 src 属性。因此,只需键入 <img src=",在此处添加 Computed Text,然后键入 " />。 Select 所有键入的文本并使其成为 «Pass-Thru HTML»(«Text\Pass-Thru HTML» 菜单)。你会看到这样的东西:

Computed Text 公式中输入保存图像路径的字段名称并保存表格:

现在,您可以使用这种形式:

Dim ws As New NotesUIWorkspace
Dim ses As New NotesSession
Dim doc As NotesDocument

Set doc = ses.CurrentDatabase.CreateDocument
doc.Form = "FileSystemImage"
doc.ImageSource = "file:///C:/Images/Add.png"

ws.EditDocument , doc

请注意,您的图片路径必须采用 url 格式。