| |
ＨＴＴＰ://members3.jcom.home.ne.jp/cgi-bin/board.cgi?ID=daruma_kyo&MSO=jcom
ＨＴＴＰ://excelfactory.net/excelboard/excelvba/excel.cgi?mode=all&namber=97173&rev=0
↑こちらにて回答を頂きました。マルチポストしてしまい大変申し訳ありませんでした。
環境は
Mac OS 9.1(Mac OS J1-9.1)、Word 2001、スクリプト編集プログラム J2-1.5.5
VBA (5.00, print(application.vbe.version)にて)
です。
ファイルのダウンロードはAppleScriptを使用する事により可能
VBAからAppleScriptを使用するにはMacScript関数を使用
AppleScript:download.scptというファイル名でVBAと同じフォルダに保存
set the target_URL to "ＨＴＴＰ://www.jem.org/cgi/reprint/188/11/1977.pdf"
set the destination_file to ((path to desktop as string) & "test.pdf")
tell application "URL Access Scripting"
download target_URL to file destination_file replacing yes
end tell
tell application "Finder" to open alias destination_file
VBA:
Sub download()
MacScript ("download.scpt")
End Sub
これでうまく行きました。まだ試していませんが、
ＨＴＴＰ://office.microsoft.com/ja-jp/access/HA012288801041.aspx
にあるようにMacScript関数は戻り値を返してくれるようなので、
XML取得もAppliScriptのdownload関数で同様に処理できそうです。
ありがとうございました。
|
|
tosh
- 07/5/13(日) 19:35 -
