UWSCのIE操作でプルダウンを選択する方法

前へ 次へ
このQ&Aのポイント
  • UWSCのIE操作でプルダウンを選択する方法がわからない
  • 記録機能を使って試してみたがうまくいかなかった
  • どなたか教えていただけないでしょうか
回答を見る
  • ベストアンサー

UWSCのIE操作でプルダウンを選択する方法

UWSCのIE操作でプルダウンを選択する方法がわからなく、 記録機能を使い試してみたのですがうまくいきませんでした。 どなたか教えていただけないでしょうか。 よろしくお願いします。 IE = CREATEOLEOBJ("InternetExplorer.Application") IE.visible = true IE.navigate("http://sportsnavi.yahoo.co.jp/") waiting(IE) IELINK(IE,"Jリーグ") waiting(IE) IELINK(IE,"日程＆結果",2) waiting(IE) //ここがうまく行かないところです。記録で出てきたものをそのまま使用 CLKITEM(IE, "第22節", CLK_ACC) //読み込み待ち Procedure waiting(IE) while IE.busy or IE.readyState<>4 Sleep(0.5) wend Fend

質問者が選んだベストアンサー

  • ベストアンサー
  • Namany
  • ベストアンサー率100% (1/1)
回答No.1

　CLKITEM(IE, "第22節", CLK_ACC) を 　IE.document.getElementsByName("select").item[2].value="index_2nd.html#j22" 　IE.document.getElementsByName("select").item[2].fireEvent("OnChange") に変更すればいけると思います。 しかし、そもそも 　IE.navigate("http://sportsnavi.yahoo.co.jp/") を 　IE.navigate("http://sportsnavi.yahoo.co.jp/soccer/jleague/2012/data/result/index_2nd.html#j22") に変更すれば目的は達成されるような気がするのですが…… （来年度はたぶん2012が2013になるだけです。） あと、IEの操作を記録したいのであれば、Pro版を購入してRecIEを使用したほうがいいと思います。

unikko
質問者

お礼

お礼が大変遅くなり申し訳ありません。 ありがとうございました。

  1. カテゴリ
  2. [技術者向] コンピューター
  3. プログラミング・開発
  4. その他（プログラミング・開発）

関連するQ&A

  • UWSCでIE操作。IEを選択する方法について

    UWSCでIEを開き、その後の操作も大体分かるのですが、 IEを開いたときに、IEが選択されるときと、選択されないときが あります。選択されるときは問題なく動作するのですが、 選択されない場合は、KBD(VK_ENTER,CLICK,###)などのタグが動作しなくなります。 ※以下、IEを動作するときに使用しているソースです。 IE = CREATEOLEOBJ("InternetExplorer.Application") IE.visible = true IE.navigate(URL) sleep(0.5) REPEAT sleep(0.5) UNTIL !IE.busy AND IE.readystate = 4 このときに、開いたIEを確実に選択し、動作させるような方法はありませんでしょうか？

  • UWSC（LIST選択できず）

    初心者です。 UWSCの自動化で上手くいかない所を、どなたか教えていただけないでしょうか？ 内容はあるサイトにログオンした後、コンボＢＯＸで選択する画面を自動化したいのですが上手くいきません。UWSCの記載は下記の通りです。 どなたかお分かりになる方よろしくお願いします。m(_ _)m ID = INPUT("貴方のIDは？") PW = INPUT("貴方のPWは？") IE = CREATEOLEOBJ("INTERNETEXPLORER.APPLICATION") IE.VISIBLE = TRUE IE.NAVIGATE("あるサイト") repeat sleep(0.1) until !ie.busy and ie.readystate=4 ie.document.forms[0].elements[2].value =ID ie.document.forms[0].elements[3].value =PW repeat sleep(0.1) until !ie.busy and ie.readystate=4 ie.document.forms[0].submit repeat sleep(0.5) until !ie.busy and ie.readystate=4 ret = IELINK(IE,"あるリンク") repeat sleep(0.5) until !ie.busy and ie.readystate=4 ie.document.forms[0].elements[0].VALUE ="あるコンボ選択肢" ↑ここだけ上手く動かないです。 ie.document.forms[0].elements[2].value ="01/02/2007" ie.document.forms[0].elements[3].value ="07/07/2007" repeat sleep(0.5) until !ie.busy and ie.readystate=4 ie.document.forms[0].elements[4].CLICK()

  • UWSCでIEの制御がうまくいきません

    どなたか教えてください。 UWSC用に、次のようなIE制御のテストスクリプト作ったのですが、最後のIELINKで製品ページに遷移しません。 どう直したらいいのでしょう？ なお、ドコモさんのサイトはテスト的に選んだだけで、質問とは関係ありません。 IE = CreateOLEObj("InternetExplorer.Application") IE.Visible = True IE.Navigate("http://www.docomo-technavi.com/") Repeat; sleep(0.2); Until (! IE.busy) and (IE.readyState=4) IELINK(IE,"定額データプランで、知らないうちに定額対象外データ通信に切り替わって、高額請求になることはありませんか？") ACW(GETID("Q&A | お客様サポート | NTTドコモ - Windows Internet Explorer","IEFrame")) Repeat; sleep(0.2); Until (! IE.busy) and (IE.readyState=4) IELINK(IE,"製品") //←ここでページ遷移しない。

  • UWSCでEdgeを起動してCOM操作するには

    UWSCでEdge(Microsoft Edge)を起動して COMオブジェクトで操作したいのですが、 IE(Internet Explorer)を起動して操作する仕方は分かりますが、 Edgeを起動して操作する仕方がよく分かりません。 以下のコードは、 Googleの検索ボックスにテストという文字列を入力する IEでのコードですが、Edge用に書き換えるには、 どのように記述すればよいのか教えていただけないでしょうか。 ------------------------------------------------------------------ IE = CREATEOLEOBJ("InternetExplorer.Application") IE.VISIBLE = True IE.NAVIGATE("https://www.google.co.jp/") REPEAT SLEEP( 0.1 ) UNTIL ( ! IE.BUSY ) AND ( IE.READYSTATE = 4 ) IE.document.getElementsByClassName("gLFyf gsfi").item(0).value="テスト" //(省略) SLEEP(5) //確認用 IE.Quit ------------------------------------------------------------------ よろしくお願いします。(Windows10 2004)(IE 2004)(Edge 89.0.774.68)

  • -UWSC：IEで自動クリック-

    -UWSC：IEで自動クリック- 下記HTMLのようなボタンを UWSCでIE上で自動クリックさせたい(マウスアクションではなく) のですがどうのように記述すれば良いでしょうか。 試したけどエ反応しなかった(エラーも出ず)記述は IE.CreateOLEObj("InternetExplorer.Application) IE.Visible=TRUE IE.Navigate("javascript:this.form.orderMode.value='1';openPage('order')") です。よろしくお願い致します。 -ボタンのHTML- <div id="sub_button"> <div><input onClick="this.form.orderMode.value='1';openPage('order')" name="" type="image" src="../images/parts/pgs/b_cartsbmt.gif" class="sub_but"/></div>

  • Excel の VBA で、IEのWeb操作

    ExcelのVBAで、A1～A10 のセルに入っている数値を下記 URL の「お問い合せ番号」の入力欄に自動でセットして、「検索」のボタンを押したいのですが、方法が分かりません。 http://www2.fukutsu.co.jp/inq/INQJJ120.html 下記のプログラムで表示までは出来るのですが、それから先の入力とボタンクリックの方法が分かりません。 何かアドバイスを頂けると幸いです。 > Dim oIE As Object > > 'IE起動 > Set oIE = CreateObject("InternetExplorer.Application") > oIE.Visible = True > > '目的のURLへ > oIE.Navigate "http://www2.fukutsu.co.jp/inq/INQJJ120.html" > > '完全表示まで待つ > While oIE.Busy: Wend > While oIE.document.readyState <> "complete": Wend

  • 先ほど質問したほぉかべです

    カテ違い失礼しました。なにぶん始めてなもので・・・って言い訳にならないですよねorz では　再度質問します UWSCというマクロツールで　ランダム質問をクリックしてから”役に立った”　（下URL参照）をクリックするプログラムを作りたいのですが うまくいきません。 http://detail.chiebukuro.yahoo.co.jp/qa/question_detail/q1263203487 私の作ったプログラムはランダム質問までいくのですがそこからがいきません。　何が悪いのでしょうか？ とりあえず私の未完成プログラムを書きますね＾＾ 皆さんの回答をお待ちしております IE = CREATEOLEOBJ("InternetExplorer.Application") IE.visible = true IE.navigate("detail.chiebukuro.yahoo.co.jp/qa/rand.php") REPEAT sleep(0.5) UNTIL !IE.busy AND IE.readystate = 4 ret = IELINK(IE,"役に立った！")

  • UWSCに詳しい方助けてください＞＜

    いつもお世話になります。 昨日、UWSCというものを知って、パソコンの操作を自動化できることに感動しました。 プログラミングはほとんどしたことがないど素人なのです＾＾； 指定したURLから特定の語句のリンクを抽出したく、なんとか抽出することはできたのですが、 重複してしまうリンクがでてきてしまいました。 重複したリンクは取得せず、抽出していく方法がわからず困っております。 重複したリンクをその都度削除、もしくは、エクセルにデータを落として、エクセルの重複削除を自動でやる、といったことでもいいのですが、そのスクリプトをどうやって書いたらいいのか全くわかりません。。。 下記が特定の語句のリンクを取得するスクリプトです。 URL = INPUT("URLを入力してください", "「指定URL」") TOTAL_LINKS = "" IE = CREATEOLEOBJ("InternetExplorer.Application") IE.visible = True IE.navigate(URL) REPEAT SLEEP(0.1) UNTIL !IE.BUSY AND IE.READYSTATE = 4 LINK_AMOUNT = IE.Document.links.length FOR KAISU = 0 TO (LINK_AMOUNT - 1) IFB POS("特定の語句", IE.document.links[KAISU].href) > 0 TOTAL_LINKS = TOTAL_LINKS + IE.document.links[KAISU].href + "<#CR>" ENDIF NEXT EXEC("NOTEPAD") SENDSTR(GETID("無題 - メモ帳"), TOTAL_LINKS) お力をお貸しくださいm(_ _)m よろしくお願いいたします。

  • エクセル　VBA　で　IE操作　

    エクセルVBAにて　IEを操作し　リンクをクリックするには どのような記述になりますでしょうか？ たとえば http://okwave.jp/mypage へアクセスし画面右上　カテゴリ　をクリック 次に　Excel（エクセル）　をクリック　という具合に 画面に表示されている文字を順番にクリックしたいです。 マクロを見つけてきましたが　クリックというのはどう記述していいやらさっぱりです。 Sub testIE() Dim objIE As InternetExplorer 'IEオブジェクトを準備 Set objIE = CreateObject("Internetexplorer.Application") '新しいIEオブジェクトを作成してセット objIE.Visible = True 'IEを表示 objIE.navigate "http://okwave.jp/mypage" 'IEでURLを開く Do While objIE.Busy = True Or objIE.readyState < READYSTATE_COMPLETE '読み込み待ち DoEvents Loop

  • ie操作　ボタンが押せる時と押せない時がある

    こんばんは。よろしくお願いします。 ie操作でボタンが押せる時と押せない時があるのですが、 違いがわかりません。 --------------------------------------------------------- Sub test1() Dim objIE As Object Set objIE = CreateObject("InternetExplorer.Application") objIE.Visible = True objIE.Navigate "http://www.mitsui-direct.co.jp/customer/" 'ダイレクトにログインページへはいけない。 Do While objIE.Busy = True Or objIE.ReadyState <> 4 DoEvents Loop objIE.Navigate "javascript:gotoMyhp();" Set objIE = Nothing End Sub --------------------------------------------------------- これなのですが、http://www.mitsui-direct.co.jp/customer/のサイトへいって、 右側の「Myホームページログイン」を押したいのですが、 最初は、objIE.Navigate "javascript:gotoMyhp();"　でうまくいってたのですが、 なぜか出来なくなってしまいました。 そんな事ありますか？ コードが間違ってるのでしょうか？ ご教授よろしくお願いします。

注目のQ&A

カテゴリ

専門家に質問してみよう

職業から探して質問する

あなたにピッタリな商品が見つかる！ OKWAVEセレクト

質問する