人力検索はてな
モバイル版を表示しています。PC版はこちら
i-mobile

環境:WindowsXP、Excel2003、IE6
手動では下記のような操作を実行します。
1.「ダウンロード」aタグをクリック。
2.「ファイルのダウンロード」ウィンドウ開く。「保存(S)」クリック
3.「名前をつけて保存」ウィンドウ開く。ファイル名入力。「保存(S)」クリック
4.「ダウンロードの完了」ウィンドウ開く。「閉じる」クリック
この2-4をVBAで自動化したいと考えています。

http://www.moug.net/faq/viewtopic.php?t=48813
には下記URLによって解決したと報告されています。
http://hpcgi1.nifty.com/MADIA/VBBBS/wwwlng.cgi?print+200901/09010002.txt
しかし、ここにあるFileDownLoad_Procプログラムを見ても依然として2の「保存(S)」クリックができません。
さらに、ファイル名に特定の文字列を入力できません。
このプログラムをそのまま使っても上記以外は正常に動作します。
どなたかお解かりの方ご教示ください。

1273732133
●拡大する

●質問者: dositaraiino
●カテゴリ:コンピュータ インターネット
✍キーワード:IE6 URL VBA WindowsXP ウィンドウ
○ 状態 :終了
└ 回答数 : 3/3件

▽最新の回答へ

1 ● spyglass
●27ポイント

Windows上のでの反復(マクロ)でしたらExcelを使わなくてもUWSCを使われた方が簡単ですよ。

「UWSC」

http://www.uwsc.info/

一度だけマウスを操作すればビデオの録画の様に自動でコードを作成してくれます。

あとは出来上がったコードを実行するだけで同じ操作が出来ますよ。

◎質問者からの返答

早速のご回答有難うございました。

「UWSC」のプロ的な使い方を知らないので間違っているかもしれませんが以下の理由で使えないと考えています。

1. できるだけ不特定多数の人にプログラムが実行できる環境にしたい。

MS Officeなら新たなインストールは不要だが、

UWSCなら別途インストールしてもらう必要がある。

2. ダウンロードのファイルネームをサーバーが自動で付してくれる名前で良いのならUWSCでもOKだと思いますが、付加情報を加えたい。

3. ダウンロードの件数が変動するケース及び個人のPC設定でダウンロード釦の位置が変わるためUWSCで共通のアプリが提供できない。

違っていたらご教示ください。

コメント1返事

> IE7とIE6で 保存ボタンのハンドルの取得の仕方が違うのかも しれん。

EnumChildWindowsでも確認しましたが、ハンドルは正しく取れています。

「保存ボタンを押す」コードが違うと思います。

参照したコードの意味が理解できていません。

もし、お解かりでしたら他の方法も含めご教示ください。


2 ● kick_m
●27ポイント

http://dobon.net/vb/dotnet/internet/downloadfile.html

◎質問者からの返答

ご回答有難うございます。

私のVBAの環境は「Visual Basic 6.5」です。

他の社員の環境を考えて、できればこの環境に参照設定を追加して目的を達成したいのですが無理でしょうか?

もし、どうしてもだめなら「Visual Basic 2010 Express Edition」↓に変更します。

http://homepage1.nifty.com/rucio/main/material/VB2010Install.htm

ご返事ください。


3 ● MAXPOWER
●26ポイント

コメント欄でtakntさんがおっしゃているとおりでは?

http://rararahp.cool.ne.jp/cgi-bin/lng/vc/vclng.cgi?print+200902...

◎質問者からの返答

EnumChildWindowsでも確認しましたが、

hDlg = FindWindowA("#32770", "ファイルのダウンロード")

hDlg2 = FindWindowEx(hDlg, 0&, "Button", "保存(&S)")

上記でハンドルは正しく取れています。

さらに、WM_ACTIVATEでも「保存」にフォーカスが移動するのがわかります。

PostMessageA hDlg2, WM_IME_KEYDOWN, VK_RETURN, 0&)

で反応はしますが、キャンセルをクリックしてしまいます(フォーカスを「保存」に移動してあっても)。

どうしたらいいのか策が無く弱っています。

関連質問


●質問をもっと探す●



0.人力検索はてなトップ
8.このページを友達に紹介
9.このページの先頭へ
対応機種一覧
お問い合わせ
ヘルプ/お知らせ
ログイン
無料ユーザー登録
はてなトップ