「input type=file」で表示されるダイアログの制御方法
昨日以降(0) ２日前以降(0) ３日前以降(0) ４日前以降(0) ５日前以降(0)
| Message#1 2015年3月17日(火)09時52分 From: DSC_渡辺 | 返事 削除 変更 |
| サーバーにファイルをアップロードするWeb画面をHTML制御し、自動実行するシステムをEXCELVBAで作成しています。 web画面で参照ボタン（「input type=file」のボタン）をクリックしてファイルダイアログを表示することはできたのですが、そこで処理が止まり、手操作でボタンをクリックしない限り動かない状況となりました。 他の質問掲示板などで調べて以下のように作ってみましたが、うまくいきません。IEバージョンは10.0です。 @ファイル名のテキストボックスにフォーカスを移し、sendkeysでファイル名を入力する。 objIE.Document.Forms("****").Item("****").Select Application.SendKeys "C:\Documents and Settings\****.xxx", True objIE.Document.Forms("****").Item("****").Click 'アップロードボタン押下 Aファイルを開くダイアログを表示させて、SendKeysでフィールドにファイルパスをセットする objElement.Focus WSオブジェクト.SendKeys ("{TAB}") Sleep (1000) WSオブジェクト.SendKeys (" ") Sleep (1000) WSオブジェクト.SendKeys (ファイルパス) Sleep (1000) WSオブジェクト.SendKeys ("{ENTER}") Sleep (1000) Set WSオブジェクト = Nothing @は動作しませんでした。 Aはファイルダイアログの表示までで止まってしまいました。 何か他に方法をご存知の方はいらっしゃいましたら教えてください。 |
昨日以降 ２日前以降 ３日前以降 ４日前以降 ５日前以降
