リスト選択時にFireEventが効かない
未読分：9件
昨日以降(0) ２日前以降(0) ３日前以降(0) ４日前以降(0) ５日前以降(0)
Excel VBAでIEを思いのままに操作できるプログラミング術 Excel 2013/2010/2007/2003対応
近田 伸矢, 植木 悠二, 上田 寛
IEのデータ収集＆自動操作のプログラミング本はこの1冊だけ！IEの起動やポップアップウィンドウ、表示を制御する基本的なコードはもちろん、テキストボックスやラジオボタン、表、ハイパーリンクなどのHTML部品を制御する方法など、自動操作に欠かせないノウハウを丁寧に解説。
| Message#9 2019年11月29日(金)16時37分 From: ジャッカル | 返事 削除 変更 |
| まず、どういう風にプログラムを組んだのか情報下さい。 > あるサイトの編集ページのレイアウトが変更され、以前はクリックで来ていたボタンのクリックが不可能となりました。 > 以下がそのコードになります。 > > <a class="button__input" href="javascript:void(0);"><span class="button__label">在庫情報の反映をおこなう</span></a> > > 今まではクラスやinnertextでタグを識別しクリックイベントで操作ができていましたが、このタグでは成功しません。 > 参考までに、FireFoxでjavascriptのイベントを見ると以下の4つがありました。 > ・onMouseUp > ・onMouseDown > ・onMouseEnter > ・onMouseLeave > > 解答お待ちしております、宜しくお願い致します。 |
| Message#8 2019年8月14日(水)18時02分 From: S.U | 返事 削除 変更 |
| あるサイトの編集ページのレイアウトが変更され、以前はクリックで来ていたボタンのクリックが不可能となりました。 以下がそのコードになります。 <a class="button__input" href="javascript:void(0);"><span class="button__label">在庫情報の反映をおこなう</span></a> 今まではクラスやinnertextでタグを識別しクリックイベントで操作ができていましたが、このタグでは成功しません。 参考までに、FireFoxでjavascriptのイベントを見ると以下の4つがありました。 ・onMouseUp ・onMouseDown ・onMouseEnter ・onMouseLeave 解答お待ちしております、宜しくお願い致します。 |
| Message#7 2017年12月7日(木)17時25分 From: r_federer23 | 返事 削除 変更 |
| NMCのメッセージ(#6)への返事 返信が遅れ大変申し訳ありませんでした。 アドバイスのおかけでイベントを発行させることができ問題解決に至りました。 大変感謝しております。 今後とも宜しくお願い致します。 |
| Message#6 2017年11月25日(土)19時12分 From: NMC | 返事 削除 変更 |
| Obj.FireEvent ("OnChange")が効くのは、IE8までのようです。それ以降の環境では https://qiita.com/rinkun/items/08b6329c0e6fd3db7b37 や http://itref.fc2web.com/javascript/document/createevent.html の情報が役に立つと思われます。 https://www.6pm.com/p/indigo-rd-margot-2-black/product/9029825/color/3 のwebページを、objIEに捕捉した後、 本件では、以下のようにすれば良いのではないでしょうか。 Set evt = objIE.document.createEvent("HTMLEvents") evt.initEvent "change", True, False '★第１引数Trueは、先祖要素（もしあれば）に、changeイベントの影響を波及させるため objIE.document.getElementById("pdp-size-select").Value = "3109" 'サイズ10 objIE.document.getElementById("pdp-size-select").dispatchEvent evt '★ |
| Message#5 2017年11月20日(月)19時04分 From: r_federer23 | 返事 削除 変更 |
| みかさのメッセージ(#4)への返事 ご連絡ありがとうございます。 もう少し具体的に教えて頂けると大変有難く思います。 > 外部ファイルで保存されているかjQueryなどで記述されている部分があると思います。 > その関数を直接実行するとどうでしょうか。 |
| Message#4 2017年11月13日(月)18時01分 From: みかさ | 返事 削除 変更 |
| 外部ファイルで保存されているかjQueryなどで記述されている部分があると思います。 その関数を直接実行するとどうでしょうか。 > みかさのメッセージ(#2)への返事 > > ご連絡ありがとうございます。 > ObjIE.Document.all(i)を調べましたが"OnChange"の文字列は見つかりませんでした。 > 他のアドバイスを頂ければ有難く思います。 > > > OnChangeに設定されているJavascriptを実行させてはいかがでしょうか？ > > |
| Message#3 2017年11月11日(土)10時03分 From: r_federer23 | 返事 削除 変更 |
| みかさのメッセージ(#2)への返事 ご連絡ありがとうございます。 ObjIE.Document.all(i)を調べましたが"OnChange"の文字列は見つかりませんでした。 他のアドバイスを頂ければ有難く思います。 > OnChangeに設定されているJavascriptを実行させてはいかがでしょうか？ > |
| Message#2 2017年11月5日(日)20時36分 From: みかさ | 返事 削除 変更 |
| OnChangeに設定されているJavascriptを実行させてはいかがでしょうか？ > VBAのIE操作において下記サイトのサイズリストから表示上"6.5"を選択できるが、イベントが発生しない為選択が完結しない。（選択が完結すると「Only 4 left in stock」が表示される）リストからサイズを選択する方法をご教示下さい。 > > 〇対象サイト > https://www.6pm.com/p/indigo-rd-margot-2-black/product/9029825/color/3 > > 〇VBAコーディング > For Each Obj In ObjIE.Document.getElementsByTagname("SELECT") > If Obj.OuterHTML Like "*pdp-size-select*" Then > Obj.selectedindex = 2 > Obj.FireEvent ("OnChange") > End If > Next |
| Message#1 2017年10月28日(土)12時58分 From: r_federer23 | 返事 削除 変更 |
| VBAのIE操作において下記サイトのサイズリストから表示上"6.5"を選択できるが、イベントが発生しない為選択が完結しない。（選択が完結すると「Only 4 left in stock」が表示される）リストからサイズを選択する方法をご教示下さい。 〇対象サイト https://www.6pm.com/p/indigo-rd-margot-2-black/product/9029825/color/3 〇VBAコーディング For Each Obj In ObjIE.Document.getElementsByTagname("SELECT") If Obj.OuterHTML Like "*pdp-size-select*" Then Obj.selectedindex = 2 Obj.FireEvent ("OnChange") End If Next |
昨日以降 ２日前以降 ３日前以降 ４日前以降 ５日前以降
