« Adobe Reader 7.0のPDFファイルの関連付けを改善する。 | トップページ | エクスプローラで「元に戻す」の内容は? »

2007年1月 9日 (火)

スクリプトからDDEを使ってPDFファイルを印刷する。

スクリプトからDDEを使うパラダイムです。

VBAならDDEExecute()などがあってDDEが使えますが、スクリプトからは?

関連付けで使える範囲なら、スクリプトからも関連付け経由で使えます。

PdfPrint.VBS ファイル

Set wShell=CreateObject("WScript.Shell")
Path="C:\Program Files\Adobe\Acrobat 7.0\Reader\AcroRd32.exe"
wShell.RegWrite "HKCR\*\shell\PdfPrint\command\",""""&Path&"""","REG_SZ"
wShell.RegWrite "HKCR\*\shell\PdfPrint\extended","","REG_SZ"
wShell.RegWrite "HKCR\*\shell\PdfPrint\ddeexec\","[FilePrintSilent(""%1"")]","REG_SZ"
wShell.RegWrite "HKCR\*\shell\PdfPrint\ddeexec\application\","Acroview","REG_SZ"
wShell.RegWrite "HKCR\*\shell\PdfPrint\ddeexec\ifexec\","[FilePrintSilent(""%1"")][AppExit]","REG_SZ"
wShell.RegWrite "HKCR\*\shell\PdfPrint\ddeexec\topic\","Control","REG_SZ"
Set Shell=CreateObject("Shell.Application")
Shell.ShellExecute WScript.Arguments.Item(0),,,"PdfPrint"

※DDEは多重処理に難があります。なので、上の例でも複数ファイルに対応できません。

« Adobe Reader 7.0のPDFファイルの関連付けを改善する。 | トップページ | エクスプローラで「元に戻す」の内容は? »