三流君 ken3のmemo置き場

メモ置き場、保管庫として利用。まとまっていませんがヨロシク

挨拶・自己紹介:
失敗続きのAB型の変わり者 :三流プログラマー Ken3です
フリーのエンジニア・個人事業主です・・と書くと聞こえはイイが(それとなくカッコよく聞こえるが)、 現在は小さな案件の受注請負 と 短期派遣 で 日々つつましく?ほそぼそと暮らしてます。
(※詳細は[三流君 三流プログラマーとは?]を見てください)


広告:


[記事一覧、バックナンバーを見る]

IE操作

XXXXXさんへ JRAオッズ取得 Excel2016でテストしたブックを保存しました

XXXXXさんへ 熱い、紹介、転載不可の メッセージありがとう。JRAオッズ取得の テストで使用したExcelブックを http://ie.vba-ken3.jp/test/20170820.zip に保存しました。アレンジして使ってみてください。コードだけで、動くブックを保存していなくてすみま…

TABLE WebのJRA3連単オッズ表 二重のテーブル からデータ取得のテスト

3連単のオッズ取得にチャレンジしてみたいと思います。多くの、と言っても二名ですが、 下記のようなメッセージをいただいています >宜しければ今一番売れている馬券種の3連単を取り上げて頂けませんでしょうか。 >例えば、、 >3連単の全てのオッズ収集後に…

Excel UserForm Mode モードレスとIEを前面 おまけの WithEvents IE

Excel UserFormで起動済みのIEから表を取得する、 そんなテストを行っていますが、 操作性が悪いので、 テストしながら泥縄式に改善していきますテストで使用したExcelブックを http://ie.vba-ken3.jp/test/Book20170809.zip に保存しました。アレンジして使…

Excel Formから起動済みのIEを選択 テーブルを取得するテスト

前回 ken3memo.hatenablog.com の続きです。XXXXXさんより、下記の質問が来ました。 > 【VBA IE操作】テーブル単体を取り出す にて勉強中の老人です。 > 上記サンプルはURLを記述して表示して >WEBページにテーブルの内容を取得しておりますが、 >当方も目的…

Excel Formから起動済みのIEを選択 Bodyの値を取得するテスト

XXXXXさんより、下記の質問が来ました。 > 【VBA IE操作】テーブル単体を取り出す にて勉強中の老人です。 > 上記サンプルはURLを記述して表示して >WEBページにテーブルの内容を取得しておりますが、 >当方も目的はページを次から次に切り替えて >その都度…

テスト JRA単勝オッズをレース別に複数蓄積する

単勝オッズをレース別 取得時間別にためていきたいと思います 現在、最新のオッズを取得するところまでは、 バグ付きですがなんとかできました。ここから、分岐して、 単勝オッズが時間の経過でどのように推移するか? そんな分析をしたいので、 レース別 時…

JRA オッズの発表時間を取得します 蛇足で.getElementsByClassNameのテスト

下記、蛇足の.getElementsByClassName解説が長かったり、、 JRA オッズ取得 時刻の取得 最終オッズの判断 VBA IE操作 Ken3 ライブ プログラミング テスト中 - YouTube www.youtube.com次は、 最終オッズ や 99:99(XX時XX分) などの、 オッズの集計時間を取得…

JRA 単勝オッズ取得 いただいた要望 開催日とレースの指定にチャレンジ

全ての取り出しが バグりながらできてきたので、 次は、 開催日 と レース 指定にチャレンジしてみたいと思います。下記、いつもの解説動画です。ソースと合わせてみてください JRA オッズ取得 開催地とレースを指定 VBA IE操作 Ken3 ライブ プログラミング …

JRA オッズ取得 Click処理を共通化後 単勝オッズ人気順にチャレンジ

無音でミス収録したライブ動画にあとから音声解説を追加しました。 タイミングが合っていない場面がありますが、よろしくお願いします。【VBA IE操作】JRA オッズ取得 Click処理を共通化後 単勝オッズ人気順にチャレンジ - YouTube www.youtube.com1.ドキュ…

JRA 単勝オッズ取得 コードまとめ と Sleep DoEventsの違いをテスト

コードまとめ と Sleep DoEventsの違い VBA IE操作 Ken3 ライブ プログラミング テスト中 です・・・ - YouTube www.youtube.com1.共通のコードをまとめましょう 泥縄式でコードをコピペ、 テスト 実行 修正 再テスト・・・を繰り返していると、 コードが長…

JRA HP から 単勝オッズの取り込み 開催場所でループ

1Rから12Rまでの書き出しができたので、 次は、 開催場所、開催日のループを作成してみます。www.youtube.com JRA 単勝オッズ 開催場所のループ処理 VBA IE操作 Ken3 ライブ プログラミング テスト中 です・・・ - YouTube1.開催日を取り出す 開催日を取り出…

IE操作 Web上の表 取り込み rowspan の対応を少し考えてみた

JRAオッズの取り込みで、 枠番の取り込みが正しくなく、 データがズレてセットされてしまった前回 ken3memo.hatenablog.com の続きです。下記、まだ慣れてない ライブ プログラミング動画。 単勝表の取り込み バグ修正 VBA IE操作 JRA Ken3 ライブ プログラ…

ライブ配信でIE操作の参照設定など JRAオッズ取得できなかったけど・・

なれないライブ配信 で 問い合わせの多い JRA オッズ取得 IE操作の参照設定などを解説してみました。 ※JRA単勝オッズぐらいは取得・・と思ったが、 約二時間かかって、こんなもんかぐらいしかできなかった ぉぃぉぃ参照設定とデバッグ風景 VBA IE操作 JRA Ke…

XXXXXさんへ If TypeName(objWindow.document) = "HTMLDocument" のチェックを残してみては?

下記の質問をいただきました。 JRAのホームページをボタンを押しながら画面を切り替えていこうとおもい、 次のken3の方法で実行しましたが、Title名がどのページも同じで、うまく切り替わってくれません。 そこで、「****」以下の方法でbodyから一意の文…

XXXXXさんへ もしかしてKB4022168 適用後にIE不具合なら

データの自動取得中、 Windows7のIEが強制終了 停止 クラッシュ の 件ですが、 もしかして、先月末に公開された 更新プログラム KB4022168 適用なら 更新後に Win7でIEが強制終了 停止 クラッシュする現象が発生するみたいなので、 試しに更新プログラムをア…

XXXXXさんへ 未解決 あとで調べる ◆質問「VBAのIE操作でリスト選択時にFireEventが効かない」

下記の質問をいただくが、解決しなかった。再度 あとで見てみる・・・ ◆質問「VBAのIE操作でリスト選択時にFireEventが効かない」〇VBAコーディングFor Each Obj In ObjIE.Document.getElementsByTagName("OPTION") If Obj.Value = "Black Gunmetal" Then Ob…

XXXXXさんへ IE操作 msgBox を 入れて、デバッグする 三流な方法?

え~と、最近対応が冷たいと評判の三流プログラマーです ※冷たいと感じた方々、すみませんと冒頭で謝りつつ、下記、いつものグダグタデバッグ動画です。 【VBA IE操作】デバッグでMsgBox を 入れて、デバッグする 三流な方法? 【三流君】 - YouTube www.you…

IE操作 自動巡回STOP 原因はニセの警告画面 広告が表示されて エラーになる

だいぶ前に作成して納品した、 安定稼働中のIE操作で自動巡回が止まると連絡をいただく、 ^^^^^^^^^^ 再現性がなかったのだが、 いきなり下記のような画面が出て、止まることが判明。サイトに表示されている 広告 から この画面出ているようなのだが・・・・…

XXXXXさんへ IE操作 次への処理について・・・案だけ回答

下記の質問をいただきました。 ヤフーファイナンスの信用買い残のデータを77表分ワークシートに取得するにはどういうコードを書いたら良いか悩んでいます。 最初の表は取得出来るのですが、下の数字や次へを自動的に押して取得する方法が上手く出来ません。 …

XXXXXさんへ IE操作 img src の ファイル名を取得したい

※いつもの、脳内垂れ流し動画です。 【IE操作 VBA】データ取得の基本?.InnerTEXT.OuterHTML For Each で回す【三流君】 - YouTube ※質問・ソースとあわせてみてください。 テストで、 http://ie.vba-ken3.jp/test/20160706/test20160706.html に↑テスト用ペ…

熱心な読者さんに VBA IE操作の本とサイトを教えていただきました

最近、サイト更新はしていないのに、 熱心な読者さんに VBA IE操作の本とサイトを教えていただきました。Excel VBAでIEを思いのままに操作できるプログラミング術Excel VBAでIEを思いのままに操作できるプログラミング術 Excel 2013/2010/2007/2003対応作者:…

XXXXXさんへ IE操作 .getElementsByTagNameで集め .NextSiblingで次を取得してみては?

VBA IE操作で下記の質問をいただきました。 >とあるサイトから、TEL番号を取得したいのです。 >EXCELファイルのB列にURLが100件以上並んでいます。 >そのURLを開いて、TEL番号を取得し、C列に記載…という処理をURLの個数分行うマクロで苦戦しています。>対象…

XXXXXさんへ 自動操作除け 画像のボタンを押す方法について

下記のような質問を最近よくいただきます。 >IDとパスワードについては、自動入力できるようになりましたが >ログインボタンの自動クリックができません。 >ログインボタンが画像になっていて困ってます。 ログインボタンが画像ロボット除け、先読み除けの処…

XXXXXさんへ TypeNameでエラーの件 未解決でお力になれずスミマセン。

下記の質問をいただきました。 起動済みIE、操作済み、既存の表示済みWEB画面を操作したい と、思いまして、検索してここにたどり着いたんですが、 HPの方にある マクロを試してみたんですが、 Debug.Print "タイプは:" & TypeName(objWindow.document) …

XXXXXさんへ IEのWithEventsを使ったイベント処理

>DocumentCompleteのイベントを利用しようと >思い、三流君さんの下記URLのコードをそのままテストしてみた >のですが、その二つのイベントハンドラーに制御が渡りません。 > >http://d.hatena.ne.jp/ken3memo/20100114/1263452016 >WithEvents が使えるのが…

XXXXXさんへ 新規に起動したIEを見つけるサンプル

>リンクをクリックし開いたポップアップに、 >for each objTAG in objIE...系の処理をしたいのですが、 >objIEが親ページを参照しているためうまくいきません。 >objIEをアクティブページにするには、どのようにすればいいのでしょうか。 と質問をいただく。…

XXXXXさんへ IE自動操作で「別のプログラムでOLEの操作が完了するまで待機を続けます」で止まってしまう件ですが...

XXXXXさんより http://www.ken3.org/vba/backno/vba175.html から 下記の質問をいただく。 >大量のデータを処理すると >「別のプログラムでOLEの操作が完了するまで待機を続けます」の >ダイアログが表示されます。表示されたら「OK」ボタンを自動的に >クリ…

XXXXXさんへ VBA IE 表の取り込みサンプルが rowspan colspan に対応してなくて お力になれずスミマセン

XXXXXさんより、下記の質問をいただく。 > OKWaveでも質問させて貰っているので、そちらを見て戴いた方が早いのでURLを貼っておきます。 > http://okwave.jp/qa/q7555611.html > > 南関東の出馬表の取り込みを自動化したいのですが、VBAで出来るのでしょうか…

XXXXXさんへ TDタグを見つけたら.parentElementを使って親TRを探し、その下を探ってみては?

こんにちは。 返信、かなり遅れてすみません。 ><td>未取得</td>のテーブルのときにだけ該当のsubmitボタンを押させたいのですが、 >全てのサブミットのボタン名がaction_user_detail_indexで同じなため未取得の識別ができません。 <form style="float: left;"> <input type="hidden" name="uniq" value="da1" /> <input type="hidden" value="784" name="id" /> <tr> <td>bbbbbb</td> <td>契約中</td> <td>取得済み</td> …</tr></form>

IE9から? getElementsByClassNameってあるんだぁ。

IE9から? getElementsByClassNameってあるんだぁ。getElementsByClassNamehttp://q.hatena.ne.jp/1335028581 の コメントをみると、 IEの互換モード で 動作不可だったと、 自己解決されていました。下記が、人力検索の質問内容です。 >以下の質問がキャン…

テスト JRA IPAT 5.SELECTタグ レースの選択と種類

動画で三流解説動画の簡単な説明ソースコードと解説は http://d.hatena.ne.jp/ken3memo/20120408/1333842442 を見てください。 全体の流れは http://ken3hitori.g.hatena.ne.jp/bbs/30 を見てください。画面がオッズの画面に切り替わったら、上からn番目 で …

JRA IPATで情報を取得 8.2 開催地・競馬場単位でループさせる

次は、開催地、競馬場単位でループさせてみます。場名を覚えた後にループさせてみます。'競馬場・開催地でループする。 jのループ For j = 0 To nJYO - 1 '↑上で保存したnJYOの分だけ回る でループを作り、 'name=m の オプションのj番目を選択する objSELEC…

JRA IPATで情報を取得 8.1 1Rから最後まで 次のレースを選択 繰り返す

変数を2つ作成して、 レース番号 と オッズの種類を覚えます。 Dim nR 'レース数 Dim strR_NAME(13) 'レース 通常連番だからいらないんだけど・・・ 'SELECTのタグを集める .getElementsByTagName("SELECT")を使用 Set objSELECT = objIE.Document.getEleme…

JRA IPATで情報を取得 7.3 単勝のオッズをカンマ区切りで出力してみた

目的のテーブルを If objTABLE(n).Rows(0).Cells(0).InnerTEXT = "枠番" Then で探すことができたので、 中のデータ(テキスト)を取り出し、カンマ区切りで出力してみます。ポイントは、 .Rows.Length で 行数、 .Rows(y).Cells.Length で 列数 が取得できる…

JRA IPATで情報を取得 7.2 テーブルの左上のデータで確認する 左上が枠番のテーブルを探す

テーブルの左上が枠番となっているテーブルを探したかったので、Wscript.ECHO objTABLE(n).Rows(0).Cells(0).InnerTEXT みたいな感じて、 .Rows(0)で1行目、 .Cells(0)で1列目 の .InnerTEXTで中の文字を取得できるので、 If objTABLE(n).Rows(0).Cells(0)…

JRA IPATで情報を取得 7.1 テーブルのソースを探る

テーブルのソースを確認したかったので、 表示済みのIEを探し、 .getElementsByTagName("TABLE")を使用して、テーブルを集めて、 Set objTABLE = objIE.Document.getElementsByTagName("TABLE") .Lengthで個数のチェック、 中身(.OuterHTML)をWscript.ECHOで…

XXXXXさんへ VBA で カーソル移動のAPI SetCursorPos を使ってみては?

また また また、ダメでした、、と連絡をいただく(涙)(涙)(涙) >テキストボックスにカーソルが存在するのではなく、 >テキストボックス以外の場所でマウスが動いたことで送信されるようです。 > >わたしの力ではVBAでマウスの動きを感知させる手段が思いつき…

XXXXXさんへ IE操作 .Focus で フォーカスがセットできると思います。

XXXXXさんへ Aタグ リンクの文字を探して押す - ken3memo (三流君) と XXXXXさんへ IE操作で DoEventを入れたり処理待ちを入れてみては? - ken3memo (三流君) の 流れ、続きです。(※三度目の正直、二度あることは三度ある・・・(ぉぃぉぃ))またまた、ダメで…

XXXXXさんへ IE操作で DoEventを入れたり処理待ちを入れてみては?

XXXXXさんへ Aタグ リンクの文字を探して押す - ken3memo (三流君) の 続きで ダメでした、、と連絡をいただく(涙) >幾度と申し訳ございません。 > > For Each objA In objIE.document.all.tags("A") 'Aのタグを.allから抜く > MsgBox "確認用" & objA.inner…

XXXXXさんへ Aタグ リンクの文字を探して押す

下記の質問がきました。 <li class="mode"><a tabindex="2" href="javascript:void(0)" onClick="send()">返信</a></li> <li class="wmode" style="display:none;"><a tabindex="3" href="javascript:void(0);" onClick="Question();">質問</a></li> <li class="dmmode" style="display:none;"></li>

5.レースの選択と種類(単勝や馬連、、)を選択する

画面がオッズの画面に切り替わったら、テストで、 レース番号を選択(テストで11Rを選択) オッズの種類(一番上の 単・複 を選択) してまみす。 <SELECT name="s"> <OPTION value="3121210" selected>1R</OPTION> <OPTION value="3121220">2R</OPTION> ・ ・ <OPTION value="31212a0">10R</OPTION> <OPTION value="31212b0">11R</OPTION> <OPTION value="31212c0">12R</OPTION> </SELECT>

JRA IPATで情報を取得 4.オッズのボタンを押す

本当は、レース番号のオッズボタンを押すのが正しいと思いますが、 ここでは、一番初めに見つけた オッズ の ボタンを押してみます。 ※1Rに決め打ちして、オッズの画面に切り替える処理としては、同じように .getElementsByTagName("INPUT")で集めて、 Set o…

3.開催地を選択する SELECTタグの競馬場を選択し決定を押す

競馬場 開催地 選択のソースを見ると <FORM method=post action=http://info.ipat.jra.go.jp/p/s> <INPUT name=g value=Mnu01 type=hidden> <INPUT name=s value=0000000 type=hidden> <INPUT name=j value=6123500000 type=hidden> <INPUT name=w value=3e2c27747c352f23 type=hidden> <TD> <SELECT size=4 name=m> </select></td></form>

JRA IPATで情報を取得 2.起動した情報メニュー(新しいIE)を操作する

IPAT情報メインメニュー https://info.ipat.jra.go.jp/p/s を探します。また、馬鹿の一つ覚えで CreateObject("Shell.Application") から探ってみました。 おまけで、みつけたIEのFORMタグを表示してみました。操作動画: http://www.youtube.com/watch?v=dwN…

JRA IPATで情報を取得 1.2 情報メニューを押す

上で見つけた、IEから、情報メニューを押したかったので、 .getElementsByTagName("A") で、 リンクのAタグを集めて、 .OuterHTMLで中身のソースを確認、 中に、情報メニューがあるか?(InStr関数で探し) If InStr(objA(n).OuterHTML, "情報メニュー") > 0 T…

JRA IPATで情報を取得 1.1 情報メニューを探す

ここから、情報メニューが表示されているIEを探して、処理を行うには?似ている処理、入金処理からコードをコピーして使ってみます(ぉぃぉぃ)'シェルのオブジェクトを作成する Set objShell = CreateObject("Shell.Application")ここから、 For Each objWind…

最近質問が多い、JRA IPATの操作関係をまとめてみる予定・・・

予定では、↓と続く予定なんだけど・・1.IPAT ログインhttp://www.ipat.jra.go.jp/ に ログインする ログイン処理 ログイン処理 解説とソースコード ↑を見てください。 2.入金処理投票する前に 軍資金を入金しないといけないので、 入金処理 解説とソースコー…

XXXXXさんへ IE操作 VBA 参照設定で Microsoft Browser Helper が見つからない件

>UserForm3.web1.Document.body.innerText >で取得できました。 >ありがとうございました。 > >ところで,ken3さんのホームページでおっしゃっている,参照設定のことですが, >Microsoft Browser Helper が見つかりません。どのようにすれば表示させられる…

XXXXXさんへ Document.body.Innertext を 試してみては?

>さて,ひとつお聞きしたいことがあります。 >UserForm1フォームに配置したIEコントロールに表示した >ウェブページのソース(テキストデータ)を取得するには >どのようにすれば良いのでしょうか? >UserForm1.web1.Document.textのようにしてみましたが…

XXXXXさんへ IE操作 IDやclassを指定してデータを抜き出したい

こんにちは。下記の質問をいただきました。 >三流さんのサイトでも複数の方法で >テーブルデータや特定のデータを抜き出して >処理を行っているのを拝見したのですが > >例えばですが) ><tr id="_pocketAtt" class="b01"> >↑このようなものや ><ul id="STATUS" class="clearfix"> >↑このようなもの ><LI id=timeLabel class=timeLabel> >↑このようなタグがあった</li></ul></tr>…




三流君へ メッセージを送る

全ての質問に答えることはできませんが、
ダメもとで、気軽に質問、感想、メッセージを送ってくださいね・・・

感想や質問・要望・苦情など 三流君へメッセージを送る。
下記のフォームからメッセージを送ることができます。


あなたのお名前(ニックネーム):さん
返信は?:

アドレス:に返事をもらいたい
感想や質問↓:


(感想や質問・要望・苦情はHPで記事に載せることがあります。)
例:[XXXXさんへ回答例]←みたいに回答していたり...


Ken3 ホームページ 目次

分類:HPを大きく分けると4つの柱(分類)です。
・[Excel/Access VBA]の解説
・[ASP(Active Server Pages)]の解説。
・[元コンビニ店長時代の話]が弟に巻き込まれ、失敗した脱サラ、畑違い?の仕事で失敗。
・[プログラマーの愚痴]では、あまり見せたくない三流プログラマーの内面かな。
三流君を踏み台にする
主に上記4つの分類でHP作成やメルマガの発行を行ってます。
※更新頻度が落ちていて情報の鮮度が悪いです。

三流解説動画の再生リスト
https://www.youtube.com/user/ken3video/playlists

本当に三流なんです(笑):たまにスゴイですねなんて言われることもありますが、
真実は→ [三流君の真実は...] ←を初めに見てくださるとわかると思います。
(からくりは、成功例↑しか載せてなくて ヒドイ失敗例はお蔵入り迷宮入りが多かったりします)