从 Lotus Notes 操作创建和显示 PDF 文件
Create and show a PDF file from a Lotus Notes action
我使用 CreateObject("Word.application") 方法在表单内使用一个动作来创建一个 Word 文档,然后我根据自己的喜好对其进行修改并将其保存在一个临时目录中。
通过调用 nameOfTheDocument.visible(true),我可以在创建 Word 文档后立即显示它,通过修改保存操作,我可以将新创建的文档保存为 PDF,但是我不能找到一种向用户展示它的方法。
尝试在 PDF 对象上调用 visible(true) 会导致错误 "Instance member VISIBLE does not exist"
我们过去使用 Shell 命令启动 PDF。像下面这样的东西。唯一的缺点是如果可执行文件的位置发生变化(无论是升级还是更改为不同的程序),代码就会中断。
Dim ProgPath$, FilePath$
Dim result As Integer
'Path of the executable
ProgPath$ = |"C:\Program Files (x86)\Adobe\Acrobat 7.0\Acrobat\Acrobat.exe"|
'Path of the file to open
FilePath$ = | "C:\TestFile.PDF"|
result = Shell(ProgPath$ & FilePath$,1)
嗯...最好和正确的方法 - 使用 OS 文件关联。
我使用 java 方式:
//Win
Process p = Runtime.getRuntime().exec("rundll32 url.dll,FileProtocolHandler " + filePath);
p.waitFor();
//MacOS.*Nix
Process p = Runtime.getRuntime().exec("/usr/bin/open " + filePath);
p.waitFor();
但您可以在 Lotusscript 上调用此命令:
Shell({rundll32 url.dll,FileProtocolHandler } & fullFilePath,1)
'or
Shell({/usr/bin/open } & fullFilePath,1)
我使用 CreateObject("Word.application") 方法在表单内使用一个动作来创建一个 Word 文档,然后我根据自己的喜好对其进行修改并将其保存在一个临时目录中。
通过调用 nameOfTheDocument.visible(true),我可以在创建 Word 文档后立即显示它,通过修改保存操作,我可以将新创建的文档保存为 PDF,但是我不能找到一种向用户展示它的方法。
尝试在 PDF 对象上调用 visible(true) 会导致错误 "Instance member VISIBLE does not exist"
我们过去使用 Shell 命令启动 PDF。像下面这样的东西。唯一的缺点是如果可执行文件的位置发生变化(无论是升级还是更改为不同的程序),代码就会中断。
Dim ProgPath$, FilePath$
Dim result As Integer
'Path of the executable
ProgPath$ = |"C:\Program Files (x86)\Adobe\Acrobat 7.0\Acrobat\Acrobat.exe"|
'Path of the file to open
FilePath$ = | "C:\TestFile.PDF"|
result = Shell(ProgPath$ & FilePath$,1)
嗯...最好和正确的方法 - 使用 OS 文件关联。 我使用 java 方式:
//Win
Process p = Runtime.getRuntime().exec("rundll32 url.dll,FileProtocolHandler " + filePath);
p.waitFor();
//MacOS.*Nix
Process p = Runtime.getRuntime().exec("/usr/bin/open " + filePath);
p.waitFor();
但您可以在 Lotusscript 上调用此命令:
Shell({rundll32 url.dll,FileProtocolHandler } & fullFilePath,1)
'or
Shell({/usr/bin/open } & fullFilePath,1)