使用VBA进行访问:我需要做的是将BLOB数据传送到“textstream”并将其发送到pdftk的stdin。以下是我到目前为止的情况:
With objStream
.Type = adTypeBinary
.Open
.Write Rst.Fields("lngBLOB").Value
.Position = 0
.Type = adTypeText
.CharSet = "us-ascii"
End With
txtStrContract = objStream.ReadText
Set objShell = CreateObject("WScript.Shell")
Set oExec = objShell.Exec("CMD /K")
With oExec
.StdIn.WriteLine "pdftk - fill_form """ & strTempXFDF & """ output """ & strFilledPDF & """"
.StdIn.Write txtStrContract
Debug.Print .StdErr.ReadAll()
Debug.Print .StdOut.ReadAll()
End With
唯一的问题是,我没有得到任何错误,但我的合并的pdf文件也没有被创建。 如果我提取两个文件并通过命令行手动合并它们,我已检查文件是否会成功合并
我一直在搜索,直到我觉得自己正在失去理智!