在报告中显示PDF

Question

我想在报告中显示动态.pdf文件,如图片,它应如下所示:

我已经尝试过使用webbrowser,但是它没有出现在预览中或者当我打印报告时......

我还尝试了一个未绑定的对象,也没有成功,这里是我在Report_Load事件中的代码:

Dim vPath As String

vPath = GetNewestDocument(Me!artNr)
'Returns path for pdf file, about:blank if there is no file.
If vPath = "about:blank" Then
        Me!PDFBrowser.visible = True
        Me.PDFBrowser.SourceDoc = vbNullString
Else
        With Me.PDFBrowser
        .OLETypeAllowed = acOLELinked
        .SourceDoc = vPath
        .SizeMode = acOLESizeStretch
        End With
End If

编辑:

随着"我想动态显示......"我打算在报告中动态更改pdf.

编辑2:

我刚刚发现OLEunbound对象的类型是嵌入的,但我认为这个应该链接,因为我在其他论坛中读取:

当我尝试更改它时给出错误:"此属性无法更改,因为它是只读的"

Answer 1

您可以获得Adob​​e Acrobat（不是 Reader）的许可版本，并以编程方式控制它来捕获您想要的图像。

或者，您可以使用 VBAShell Function调用命令行 PDF 转换器（如2Jpeg）以编程方式（必要时动态）将 PDF 转换为图像（请参阅此），甚至使用正确的方法将 PDF“打印”为图像文件驱动程序（请参阅此）。

一旦有了图像文件，您就可以使用 VBA 轻松地将创建的图像加载到 Access 表单中，也许可以使用这个.

如果没有更多信息（以及我之前问题的答案），我目前无法提供更多建议，但我希望有所帮助！