読者です 読者をやめる 読者になる 読者になる

三流君 ken3のmemo置き場

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



VBS

コマンドライン で 引数を受け取る

vbs

VBSで コマンドラインの引数を受け取るのは、 意外と簡単で Set args = WScript.Arguments で、セット後に args.Count で 個数(スペースで区切って複数取得可能) args.item(0) 0から引数の配列として使えます下記、テストで作ったコード Set args = WScript.…

.VBSの起動場所 は WScript.Shellの.CurrentDirectoryで?

vbs

プログラムと同じ位置にファイルを作りたかったり、 同じフォルダーの設定ファイルを読みたかったり、 そんな処理で、起動場所がほしかったので、 [:title=VBS 起動場所] で検索してみました。すると、 WScript.Shell の .CurrentDirectory で 取得できそう…

テスト JRA IPAT 8.2 開催地・競馬場単位でループさせる

動画で三流解説動画の簡単な説明ソースコードと解説は http://d.hatena.ne.jp/ken3memo/20120414/1334371125 を見てください。 全体の流れは http://ken3hitori.g.hatena.ne.jp/bbs/30 を見てください。次は、開催地、競馬場単位でループさせてみます。場名…

テスト JRA IPAT 8.1 1Rから最後まで 次のレースを選択 繰り返す

動画で三流解説動画の簡単な説明ソースコードと解説は http://d.hatena.ne.jp/ken3memo/20120414/1334362211 を見てください。 全体の流れは http://ken3hitori.g.hatena.ne.jp/bbs/30 を見てください。変数を2つ作成して、 レース番号 と オッズの種類を覚…

テスト JRA IPAT 7.3 単勝のオッズをカンマ区切りで出力してみた

動画で三流解説動画の簡単な説明ソースコードと解説は http://d.hatena.ne.jp/ken3memo/20120414/1334341263 を見てください。 全体の流れは http://ken3hitori.g.hatena.ne.jp/bbs/30 を見てください。目的のテーブルを If objTABLE(n).Rows(0).Cells(0).In…

テスト JRA IPAT 7.2 テーブルの左上のデータを確認する

動画で三流解説動画の簡単な説明ソースコードと解説は http://d.hatena.ne.jp/ken3memo/20120414/1334337346 を見てください。 全体の流れは http://ken3hitori.g.hatena.ne.jp/bbs/30 を見てください。テーブルの左上が枠番となっているテーブルを探したか…

テスト JRA IPAT 7.1 テーブルのソースを探る

動画で三流解説動画の簡単な説明ソースコードと解説は http://d.hatena.ne.jp/ken3memo/20120414/1334334236 を見てください。 全体の流れは http://ken3hitori.g.hatena.ne.jp/bbs/30 を見てください。テーブルのソースを確認したかったので、 表示済みのIE…

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

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

テスト JRA IPAT 4.オッズのボタンを押す

動画で三流解説動画の簡単な説明ソースコードと解説は http://d.hatena.ne.jp/ken3memo/20120407/1333783892 を見てください。 全体の流れは http://ken3hitori.g.hatena.ne.jp/bbs/30 を見てください。 本当は、指定したレース番号のオッズボタンを押すのが…

テスト JRA IPAT 3.開催地を選択する SELECTタグの処理

動画で三流解説動画の簡単な説明ソースコードと解説は http://d.hatena.ne.jp/ken3memo/20120407/1333776823 を見てください。 全体の流れは http://ken3hitori.g.hatena.ne.jp/bbs/30 を見てください。 name=m の SELECTタグのOPTIONを選択 selected 状態に…

テスト JRA IPAT 2.起動した情報メニューを操作する

動画で三流解説動画の簡単な説明ソースコードと解説は http://d.hatena.ne.jp/ken3memo/20120407/1333765522 を見てください。 全体の流れは http://ken3hitori.g.hatena.ne.jp/bbs/30 を見てください。IPAT情報メインメニュー を同じように探します。また、…

テスト JRA IPAT 1.2 情報メニューを押す

動画で三流解説動画の簡単な説明ソースコードと解説は http://d.hatena.ne.jp/ken3memo/20120407/1333765403 を見てください。 全体の流れは http://ken3hitori.g.hatena.ne.jp/bbs/30 を見てください。見つけた、IEから、情報メニューを押したかったので、 …

テスト JRA IPAT 1.1 情報メニューを探す

動画で三流解説動画の簡単な説明ソースコードと解説は http://d.hatena.ne.jp/ken3memo/20120407/1333765069 を見てください。 全体の流れは http://ken3hitori.g.hatena.ne.jp/bbs/30 を見てください。 'シェルのオブジェクトを作成する Set objShell = Cre…

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で…

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…

CScript で .vbsを実行してみた

動画で三流解説動画の簡単な説明http://q.hatena.ne.jp/1146809629#a521669 など、を参考にすると、 Cscript xxxx.vbs でスクリプトを実行、 WScript.Echo で 画面表示を行っているみたいなので、 バッチファイルを作成して、テストしてみます。test.vbs WSc…

コマンドプロンプト CScript で .vbsを実行してみた

vbs

http://q.hatena.ne.jp/1146809629#a521669 など、を参考にすると、 Cscript xxxx.vbs でスクリプトを実行、 WScript.Echo で 画面表示を行っているみたいなので、 バッチファイルを作成して、 コマンドプロンプト上で実行のテストしてみます。test.vbs WScr…

回答下書き VBSからOutlook 連絡先を探す で いいなら....

30人ほどのメールアドレスが正しく入力できているか確認しやすい… - 人力検索はてな ちょっと自信がないので、回答下書きして、質問内容とマッチしているかチェックしてから回答欄に書く予定。 (予定は未定?) 'VBSからOutlook 連絡先を探す 'Outlook.Applic…

VBS から Outlook 起動 CreateObjectで作成

動画で三流解説動画の簡単な説明VBSからOutlookを起動してみた。 と言っても単純に CreateObject("Outlook.Application") で作成しただけです。 http://www.ken3.org/cgi-bin/group/vba_outlook.asp で 少し三流解説(自分脳内語の垂れ流し)を行っているので…

VBS IE操作 confirm確認メッセージを無効にする小細工

動画で三流解説動画の簡単な説明ソースコードと全体の流れは http://d.hatena.ne.jp/ken3memo/20110828 を見てくださいVBS(WSH)で、confirm確認メッセージをつぶしてから、 ボタンをクリックして処理を行いました。小細工で同名の関数を.createElement SCRIP…

VBS IE操作 .Valueで値をセット .Clickでボタンを押す JRA入出金メニュー

動画で三流解説動画の簡単な説明ソースコードと全体の流れは http://d.hatena.ne.jp/ken3memo/20110828 を見てくださいVBS(WSH)で、名前の付いた項目に値をセットして、ボタンをクリックしてみたいと思います。input type=text は、 名前を指定して .Value …

VBS IE操作 name=MENU1 の ボタンを押す JRA入出金メニュー 入金指示

動画で三流解説動画の簡単な説明ソースコードと全体の流れは http://d.hatena.ne.jp/ken3memo/20110828 を見てくださいVBS(WSH)で、名前の付いたボタンをクリックしてみたいと思います。同じように、入出金メニュー(新しく開いたIE)を探してから、 name=MENU…

VBS IE操作 リンク先を調べ クリックする

動画で三流解説動画の簡単な説明ソースコードと全体の流れは http://d.hatena.ne.jp/ken3memo/20110828 を見てくださいVBS(WSH)で、IEのドキュメントからリンク先を調べてクリックしてみたいと思います。.getElementsByTagName で Aのタグを集めます .Length…

VBS IE操作 表示されているIEをURLを条件に探す

動画で三流解説動画の簡単な説明ソースコードと全体の流れは http://d.hatena.ne.jp/ken3memo/20110828 を見てくださいVBS(WSH)から表示されているIEをURLを条件に探してみたいと思います。CreateObject Shell.Application で シェルのオブジェクトを作成し…

VBS IE操作 楽天ツールバー使用時の自動ログイン処理をテスト/デバッグ

動画で三流解説動画の簡単な説明コードは http://d.hatena.ne.jp/ken3memo/20110722/1311345764 を見てください。 読者より、すばやいレス・質問が来たので、テスト/デバッグしてみました。動画解説やテスト結果 動画元: VBS IE操作 楽天ツールバー使用時の…

VBS で IEを操作して 楽天に自動でログインするスクリプトを作成 テスト

動画で三流解説動画の簡単な説明コードは http://d.hatena.ne.jp/ken3memo/20110721 に置いておくので、実験してみてください。 VBS から IEを使用して、 楽天市場にログインするスクリプトを作成してみたいと思います 作成の流れは、 1.ログインページのソ…

三流君 IE操作 VBSでJRA-IPATログインを例題に新しいウインドウを処理

動画で三流解説動画の簡単な説明ソースは http://d.hatena.ne.jp/ken3memo/20110716 を見てください。JRA IPATログインを例題にして、新しいウインドウ(IE)を取得してみました。と言っても、手抜きの objShell.Windows(objShell.Windows.Count - 1) を最後の…

三流君 IE操作 VBSから起動したIEでイベント処理する 試行錯誤のテスト

動画で三流解説動画の簡単な説明コードは http://d.hatena.ne.jp/ken3memo/20110709 を みてください。VBSから起動したIEでイベント処理を行いたかったので、 試行錯誤のテストをしてみました。動画解説やテスト結果 動画元: 三流君 IE操作 VBSから起動したI…

三流君 IE操作 で Document.Script.setTimeout を 使い javaScriptの実行テスト

動画で三流解説動画の簡単な説明ソースは http://d.hatena.ne.jp/ken3memo/20110626/1309072974 を みてください。よく、私の例だと、リンクやボタンのオブジェクトを探して .Clickで押したように動作させていますが、 http://q.hatena.ne.jp/1248657374 で…

VBS VBScriptを使って JRA IPAT の ページを表示する

動画で三流解説動画の簡単な説明ソースは http://d.hatena.ne.jp/ken3memo/20110626/1309072052 を みてください ・IEの起動 ・表示待ち ・データのセットをテストしてみた。動画解説やテスト結果 動画元: VBS VBScriptを使って JRA IPAT の ページを表示す…

VBS IE操作 テスト .getElementsByTagName("span")を使用

動画で三流解説動画の簡単な説明http://q.hatena.ne.jp/1324480980 の 質問テスト(VBSだけど...) 'spanのタグを集める .getElementsByTagName("span")を使用 Set objspan = objIE.Document.getElementsByTagName("span") でテストしてみました。動画解説やテ…

Outlook File://を付けてファイルにハイパーリンクを付ける

動画で三流解説動画の簡単な説明ソースコードと解説は、 http://d.hatena.ne.jp/ken3memo/20101121/1290292444 を見て 笑ってください。File://L:\フォルダー名\ファイル名 みたいに、 頭に FILE:// を 付ければ OKだと思います。L:\報告書\10月.xls なら Fi…

OutlookのVBAをVBSで動かしたい CreateObject Outlook.Application

動画で三流解説動画の簡単な説明Outlookで作成した テストプログラムをVBSから動かしたかったので 少し遊んでみました。 ソースコードと流れは http://d.hatena.ne.jp/ken3memo/20101018/1287345173 を見てください。動画解説やテスト結果 動画元: Outlookの…

XXXXさんへ VBS IE操作でBlogにログイン ブログの入力・登録処理

VBS IE操作でBlogにログイン ブログの入力・登録処理下記の質問をいただきました。 >https://www.so-net.ne.jp/blog/ >を自動で開き、IDとパスワードを入れて、ログインを押し、 >新規作成を押して、表示されるブログの記事作成画面で、 >タイトルと記事にEX…

XXXXさんへ VBS IE操作で alt="ログイン"のボタンを探して押す方法

>最近VBSを勉強し始めた初心者です。 >SONETブログのログインボタンを押す方法がわからず、悪戦苦闘しています。 >http://blog.so-net.ne.jp/ >どのようにしたらボタンを押す事ができるのか教えていただけたら幸いです。 http://blog.so-net.ne.jp/ …

暗証番号入力 confirm確認メッセージを無効にする JRA入出金メニュー

暗証番号入力後、実行ボタンを押すと入金します。よろしいですか? と confirm で 確認メッセージが表示されます。 if (errFlg == 0) { if (cmd == "EXEC") { if (confirm("入金します。よろしいですか?")) { frm.EXEC.disabled = true; } else { return fa…

金額を入れて、確認ボタンを押す JRA入出金メニュー 入金指示

input type="text" は、 名前を指定して .Value に 値をセット type="BUTTON"のボタンは、名前を指定して .Click で ボタンを押しました。HTMLの入力項目やボタンにName=と名前が付いていると楽だなぁ・・と思いつつ。作成過程・テスト結果→ http://www.yout…

name=MENU1 の ボタンを押す JRA入出金メニュー 入金指示

新しく 開いた 入出金メニューを見ると、入金指示 が 選択 の ボタンになっています。 ソースを確認すると、 input style="width:100px; height:30px;" type="BUTTON" name="MENU1" value="選 択" onClick="submitForm(this.form, ' となっています。 name="…

リンク先を調べる Aタグをチェックする

次に、リンクのボタンを押したいので、 Aタグ、リンクのHTMLを探ります。押したいのは 入出金メニュー なので、そこら辺りを探ります。 'Aタグを集め、中身を確認する 'Aのタグを集める .getElementsByTagName("A")を使用 Set objA = objIE.Document.getElem…

VBS から 表示されているIEを探してみる

VBSから表示されているIEを探してみたいと思います。 'URLとタイトルを表示させるテスト 'オブジェクトを格納する変数 Dim objShell, objWindow 'シェルのオブジェクトを作成する Set objShell = CreateObject("Shell.Application") 'ウインドウの数だけまわ…

楽天ツールバー使用時の自動ログイン処理をVBSでテスト/デバッグ

デバック、現状確認。質問者から 前回作成した楽天市場のログイン処理ですが、 楽天ツールバーのログインページだと動作しない・・・ と連絡を受ける。微妙に違う ログイン画面原因は、ツールバーのログインページのボタンがログインだったので、 次へを探し…