• 締切済み

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)

みんなの回答

  • ballville
  • ベストアンサー率47% (233/487)
回答No.1

edgeをcom操作することはできないみたいなので これ https://github.com/stuncloud/UwscWebDriver を使うのが一番早いと思います。

ID_20150222
質問者

お礼

回答ありがとうございます。 教えて頂きましたリンクを参考にして、 UwscWebDriverをダウンロードして 以下のtest.uwsを作成して試しに実行してみましたが、 COM_Error:Could not convert of type (Null) into type (Dispatch) 4行目 : DRIVER.Navigate("https://www.google.co.jp/") というエラーが発生するのですが、 driver.Navigate("https://www.google.co.jp/") の何が正しくないのかよく分かりません。 この原因は分かりますでしょうか。 よろしくお願いします。 ---test.uws---------------------------------------- call UwscWebDriver WebDriverDownload.EdgeLegacy() driver = WebDriver.EdgeLegacy() driver.Navigate("https://www.google.co.jp/") -------------------------------------------

関連する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で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の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

  • UWSC(LIST選択できず)

    初心者です。 UWSCの自動化で上手くいかない所を、どなたか教えていただけないでしょうか? 内容はあるサイトにログオンした後、コンボBOXで選択する画面を自動化したいのですが上手くいきません。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でsleipnir、firefoxの起動

    UWSCでsleipnirやfirefoxの起動したいのですが、 どのようにしたら起動することができますでしょうか? IE = CREATEOLEOBJ("InternetExplorer.Application") で開くので、そのままsleipnirに書き変えたのですが、 エラーがでて起動できません。 スクリプト IE = CREATEOLEOBJ("sleipnir.Application") エラー COM.Error:クラス文字列が無効です,ProgID: "sleipnir.Application" どうしてもIEではなくSleipirの機能が使いたいので、 もし分かる方いましたらアドバイスをお願いします!!

  • 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 よろしくお願いいたします。

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

    カテ違い失礼しました。なにぶん始めてなもので・・・って言い訳にならないですよね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: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>

  • UWSC初心者(超)です。ご助力願します・・・

    UWSCを始めて5日目です。 スクリプトなんて右も左もわかりません。 http://top.hangame.co.jp/login/index.nhn?nexturl=http://mypage.hangame.co.jp/mynews/index.nhn 上記のサイトを起動し、自動的にID/PWを入力してログインするだけ という、単純な動作を作る為に4日間かけましたが、どうしても上手くいきません。 Repeat id = GETID("", "IEFrame", 0.01) CTRLWIN(id, CLOSE) Until id < 0 IE = CreateOLEObj("InternetExplorer.Application") IE.Visible = True IE.Navigate("http://top.hangame.co.jp/login/index.nhn?nexturl=http://mypage.hangame.co.jp/mynews/index.nhn") BusyWait(IE) CTRLWIN(GETID("ログイン - ハンゲーム"), MAX) めちゃくちゃかも知れませんが、 ここまでは自分でも書け正常に動作しましたが、 問題はフォーム入力で どうやったら文字を打ち込めるのか という点で 自分なりに組み込みましたが、やはり上手くいきません。書けませんしエラーが出ます。 初心者っぽく単純に BTN(LEFT, DOWN, 819,374) と書き込み、 CTRLWIN を使って ID名(平仮名)を入力しようとしましたが、 UWSC実行時にはエラーなどはないのですが、何故だか入力されません。 もう嫌になりました。 贅沢とは思いますが、どうやったら正常に書き込めるのか その構成と解説を宜しくお願いします。

  • 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();" でうまくいってたのですが、 なぜか出来なくなってしまいました。 そんな事ありますか? コードが間違ってるのでしょうか? ご教授よろしくお願いします。

専門家に質問してみよう