三流君 ken3のmemo置き場

三流プログラマーのメモ書きです。主にVBAやWindowsの話題が多いです

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

よく検索されるキーワード: [質問回答XXXXさんへ] [CreateObject] [VBA] [JRA競馬オッズ]

CreateObject の検索結果:

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

…626/1309072052 を みてください ・IEの起動 ・表示待ち ・データのセットをテストしてみた。動画解説やテスト結果www.youtube.com 動画元: VBS VBScriptを使って JRA IPAT の ページを表示する - YouTube 動画区分・リンク 20110626 三流君 IE操作 VBS VBScript JRA IPAT CreateObject InternetExplorer.Application getElementsByName

Access2010 から Excelを開く方法 Access2003のコードを貼り付けテスト

…et oApp = CreateObject("Excel.Application") oApp.Visible = True 'Only XL 97 supports UserControl Property On Error Resume Next oApp.UserControl = True動画解説やテスト結果www.youtube.com 動画元: Access2010 から Excelを開く方法 Access2003のコードを貼り付けテスト - YouTube 動…

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

…ttp://d.hatena.ne.jp/ken3memo/20101018/1287345173 を見てください。動画解説やテスト結果www.youtube.com 動画元: OutlookのVBAをVBSで動かしたい CreateObject Outlook.Application - YouTube 動画区分・リンク 三流君 Outlook VBA VBS CreateObject Outlook.Application olFolderContacts イミディエイト

QA2010-06-20 1.OutlookのVBAから、EXCELを起動する

…ことは、OutlookのVBAから、EXCELの特定セルの情報をどのように取得するかです。 を処理したいので、 アウトルックからエクセルを起動する、そんな方法を調べてみます。動画解説やテスト結果www.youtube.com 動画元: QA2010-06-20 1.OutlookのVBAから、EXCELを起動する - YouTube 動画区分・リンク 三流君 VBA 2010-06-20 Outlook CreateObject Excel.Application テスト動画

VBA(vbs)でパワーポイントの操作 マクロ記録ほか入り口

…2003までで、PowerPoint2007からは無くなったみたいです。※残念です。。。 マクロ記録を使って スライドショー の 自動実行にチャレンジしてみました。動画解説やテスト結果www.youtube.com 動画元: VBA(vbs)でパワーポイントの操作 マクロ記録ほか入り口 - YouTube 動画区分・リンク VBA CreateObject PowerPoint.Application パワーポイント マクロ記録 三流君 Ken3 テスト 2010-06-10

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

…t objIE = CreateObject("InternetExplorer.application") objIE.Top = 100 objIE.Left = 100 objIE.Width = 1024 objIE.Visible = True 'ページを開く(.Navigateで表示する。) objIE.Navigate "http://blog.so-net.ne.jp/" Wscript.Sleep 1000 '1000で1秒 '読み込み完了となるまで、ループ…

BUG0822 VBAでIE操作 IEのOpen Closeを繰り返すと落ちる

…いて閉じて、を単純にCreateObject("InternetExplorer.Application") と .Quit 繰り返しているから メモリの解放やタイミングかなぁ? 負荷テストを行わないで、自分の贅沢な環境で動いたから、、、or テストプログラムは小さくて、実データが付いていないから、たまたま動いた、全体のソースと解説は http://www.ken3.org/guchi/backno/guchi205.html のNo.205 負荷テストの重要性 IEのOpe…

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

…t objIE = CreateObject("InternetExplorer.application") objIE.Top = 100 objIE.Left = 100 objIE.Width = 1024 objIE.Visible = True 'ページを開く(.Navigateで表示する。) objIE.Navigate "http://blog.so-net.ne.jp/" Wscript.Sleep 1000 '1000で1秒 '読み込み完了となるまで、ループ…

001 参照設定をしましよう。 三流君 VBA IE操作

…InternetExplorer 'IEオブジェクト参照用 Set objIE = CreateObject("InternetExplorer.application") 'IEのオブジェクトを作る objIE.Visible = True '見えるようにする(お約束) End Sub動画解説やテスト結果www.youtube.com 動画元: 001 参照設定をしましよう。 三流君 VBA IE操作 - YouTube 動画区分・リンク 三流君 VBA IE操作 参照設定

IE8 で objIE = CreateObject("InternetExplorer.application") が 動いたのに驚く・・・

…、 objIE = CreateObject("InternetExplorer.application") で 普通に動いたので少しびっくり。。。テストしてみるもんですね(ってぉぃぉぃ) いきなり進めるとまずいので、みなさんは、もっと確認してから行ってください。。。動画解説やテスト結果www.youtube.com 動画元: IE8 で objIE = CreateObject("InternetExplorer.application") が 動いたのに驚く・・・ - Y…

Dim ie As InternetExplorer を 使いたい時は、参照設定しましょう

…t objIE = CreateObject("InternetExplorer.application") 'IEのオブジェクトを作る objIE.Visible = True '見えるようにする(お約束)この三流サンプルを見た被害者が(読者が)他の掲示板などでご迷惑をかけているみたいなので、 正式な方法?行儀のいいキレイな参照設定する方法、操作を動画で説明します。※三流なゴミコードをアップしてネットのみなさんにご迷惑をおかけしてスミマセンでした。。。動画解説やテスト結果w…

Access2010 から Excelを開くコード Access2003のコードを貼り付けテスト

…et oApp = CreateObject("Excel.Application") oApp.Visible = True 'Only XL 97 supports UserControl Property On Error Resume Next oApp.UserControl = True 操作方法、テスト結果フォームのデザイン画面で ボタンを貼り付けます ここで、キャンセルを押して、ウィザードを途中で止めます。 次に、プロパティから イベントを選択し、クリックにコ…

Excel VBA から OutLookを起動して 受信メールを1つ1つ取り出す

…utlook 起動をCreateObjectで ※これだと複数起動してしまうがご勘弁を Set oApp = CreateObject("Outlook.Application") '呪文1 名前空間 の 指定 と言っても、.GetNamespace("MAPI")しただけ Set myNameSpace = oApp.GetNamespace("MAPI") '次は作業フォルダーの指定(.GetDefaultFolder) と 表示(.Display) Set myFold…

Excel2003 VBA から OutLookを起動

…utlook 起動をCreateObjectで ※これだと複数起動してしまうがご勘弁を Set oApp = CreateObject("Outlook.Application") '呪文1 名前空間 の 指定 と言っても、.GetNamespace("MAPI")しただけ Set myNameSpace = oApp.GetNamespace("MAPI") '次は作業フォルダーの指定(.GetDefaultFolder) と 表示(.Display) Set myFold…

Windows Vista IE7 CreateObjectで失敗した画像

…t objIE = CreateObject("InternetExplorer.application") で失敗する、そんなテスト動画です。続きの対策 手前味噌の方法は http://www.ken3.org/cgi-bin/group/vba_ie.asp#VistaIE7NG で逃げ手を考えてみましたがイマイチしっくりきてません。動画解説やテスト結果www.youtube.com 動画元: Windows Vista IE7 CreateObjectで失敗した画像 -…

Windows XP IE CreateObject テスト結果

動画で三流解説動画の簡単な説明Set objIE = CreateObject InternetExplorer.application の テストです 解説は http://www.ken3.org/cgi-bin/group/vba_ie.asp です。動画解説やテスト結果www.youtube.com 動画元: Windows XP IE CreateObject テスト結果 - YouTube 動画区分・リンク 三流君

Windows Vista IE7 + Excel2007 で起動の失敗

…Vista IE7でCreateObject("InternetExplorer.application")後.Navigateしたら空白のIEができてしまい失敗したそんな­画像です。 Windows Vista IE7 + Excel2007 で起動(.Navigate)の失敗 http://ken3-info.blog.ocn.ne.jp/code_gomibako/2008/04/windows_vista_i_d9bc.html 動画解説やテスト結果www.youtu…

テスト結果 .Top .Left のテスト

動画で三流解説動画の簡単な説明Set objSHELL = CreateObject("Shell.Application")後、For Each objWINDOW In objSHELL.Windows でループさせ、objWINDOW.Topと.Leftを表示した簡単なテストです動画解説やテスト結果www.youtube.com 動画元: テスト結果 .Top .Left のテスト - YouTube 動画区分・リンク 三流君 テスト結果 Ken3

ページを表示させ、指定位置にスクロールさせるテスト

…t objIE = CreateObject("InternetExplorer.Application") 'オブジェクトを作成します。 objIE.Visible = True '可視、Trueで見えるようにします。 '処理したいページを表示します。 objIE.Navigate "http://oct2011.s2008day.com/test.html" 'ページの表示完了を待ちます。 While objIE.ReadyState <> 4 Or objIE.Busy…

BODYタグの中身を書き換える .InnerHTMLに代入

…t objIE = CreateObject("InternetExplorer.Application") 'オブジェクトを作成します。 objIE.Visible = True '可視、Trueで見えるようにします。 '処理したいページを表示します。 objIE.Navigate "http://oct2011.s2008day.com/test.html" 'ページの表示完了を待ちます。 While objIE.ReadyState <> 4 Or objIE.Busy…

ページを表示させ、BODYタグの中身を表示

…t objIE = CreateObject("InternetExplorer.Application") 'オブジェクトを作成します。 objIE.Visible = True '可視、Trueで見えるようにします。 '処理したいページを表示します。 objIE.Navigate "http://oct2011.s2008day.com/test.html" 'ページの表示完了を待ちます。 While objIE.ReadyState <> 4 Or objIE.Busy…

QA20110912 アウトルック 終了時の未送信確認メッセージを何とかしたい

…et oApp = CreateObject("Outlook.Application") Set myNameSpace = oApp.GetNamespace("MAPI") Set myFolder = myNameSpace.GetDefaultFolder(6) '規定のフォルダーを指定 myFolder.Display '表示 いつものクセで .Visible = True とやりがちだけど 'メールアイテムの作成 Set objMAIL = oApp.Creat…

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

…bjShell = CreateObject("Shell.Application") Set objIE = Nothing 'ウインドウの数だけまわすぞ For Each objWindow In objShell.Windows 'TypeNameでオブジェクト変数のタイプを表示する 'HTMLDocumentだったら If TypeName(objWindow.document) = "HTMLDocument" Then If objWindow.document.…

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

…bjShell = CreateObject("Shell.Application") Set objIE_I = Nothing 'ウインドウの数だけまわすぞ For Each objWindow In objShell.Windows 'TypeNameでオブジェクト変数のタイプを表示する 'HTMLDocumentだったら If TypeName(objWindow.document) = "HTMLDocument" Then If InStr(objWindow.d…

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

…bjShell = CreateObject("Shell.Application") Set objIE = Nothing 'ウインドウの数だけまわすぞ For Each objWindow In objShell.Windows 'TypeNameでオブジェクト変数のタイプを表示する 'HTMLDocumentだったら If TypeName(objWindow.document) = "HTMLDocument" Then If objWindow.document.…

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

…bjShell = CreateObject("Shell.Application") 'ウインドウの数だけまわすぞ For Each objWindow In objShell.Windows 'TypeNameでオブジェクト変数のタイプを表示する MsgBox "タイプは:" & TypeName(objWindow.document) 'HTMLDocumentだったら If TypeName(objWindow.document) = "HTMLDocument" T…

XXXXさんへ 起動済みIE、操作済み、既存の表示済みWEB画面を操作したい

…bjShell = CreateObject("Shell.Application") 'ウインドウの数だけまわすぞ For Each objWindow In objShell.Windows 'TypeNameでオブジェクト変数のタイプを表示する MsgBox "タイプは:" & TypeName(objWindow.document) Debug.Print "タイプは:" & TypeName(objWindow.document) 'HTMLDocumentだったら…

ボタンに割り当てられたJavaScriptを実行したい。

…t objIE = CreateObject("InternetExplorer.application") objIE.Top = 100 objIE.Left = 100 objIE.Width = 1024 objIE.Toolbar = False objIE.Visible = True 'テストで5050jpのルーレットを表示する 'ページを開く(.Navigateで表示する。) objIE.Navigate "http://www.5050.jp/game/ro…

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

…= WScript.CreateObject("InternetExplorer.Application") 'オブジェクト作成 objIE.Visible = True '可視、Trueで見えるようにします。 '処理したいページを表示します。 'ここでは、楽天のログインページを直接呼びます objIE.Navigate "https://websearch.rakuten.co.jp/login.html?tool_id=1" 'ページの表示完了を待ちます。 While o…

VBS で IEを使用して楽天市場にログインしてみた

…= WScript.CreateObject("InternetExplorer.Application") 'オブジェクト作成 objIE.Visible = True '可視、Trueで見えるようにします。 '処理したいページを表示します。 'ここでは、楽天のログインページを直接呼びます objIE.Navigate "https://www.rakuten.co.jp/myrakuten/login.html" 'ページの表示完了を待ちます。 While objIE.R…

Ken3 ホームページ 目次

分類:HPを大きく分けると4つの柱(分類)です。

  1. [VBA・マクロ プログラミング]の解説
    当店の人気はVBA系のCreateObject("XXXXXX.application")で他のアプリケーションを操作するサンプルが人気です
  2. [プログラマーの愚痴]では、あまり見せたくない三流プログラマーの内面かな。
    三流君を踏み台にする
  3. [古いクラシック ASP(Active Server Pages)]の解説。
  4. [元コンビニ店長時代の話]が弟に巻き込まれ、失敗した脱サラ、畑違い?の仕事で失敗。
主に上記4つの分類でHP作成やメルマガの発行を行ってます。
※更新頻度が落ちていて情報の鮮度が悪いです。



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