UWSC 現在表示されているタブと異なるタブのIEオブジェクトを取得

   

例えば、アンカータグのtarget属性が”_blank”の場合、ボタンクリックにより
新しいタブが開きますが、このタブのIEオブジェクトを自動的に取得することができません。

以下の方法で取得可能となります。

shells = CreateOleObj("Shell.Application")
IE = null
for i = 0 to shells.Windows.Count - 1
    obj = shells.Windows.Item(i)
    if obj > 0 and pos("iexplore.exe", obj.Fullname) > 0 then
        IE = obj
        BusyWait(IE)		    
        if POS("取得したいタブのタイトル", IE.document.title) > 0 then
            break
        endif
    endif
next

msgbox(IE.document.title)

 -uwsc

  関連記事

WS000001

UWSC 最新ダウンロード(サイトが消えた?)

UWSCのページが消えてしまったようで。。。 UWSC 上記から最新版(最終版?)のダウンロードが可

WS000001

UWSC 画像URLを保存する

DOSコマンドで画像保存が可能です。 doscmd(“bitsadmin.exe /transfer

WS000001

UWSC 証明書ダイアログ表示時の自動処理

ボタン押下時に証明書のダイアログが表示されますが、 自動的に「OK」をクリックして閉じるサンプルです

WS000001

UWSC マウス座標の確認

座標を合わせているはずなのに異なる座標を マウスが示している場合、簡易なプログラムで 実作業の確認が

WS000001

UWSC 「Web ページからのメッセージ」でOKボタンを押下する

以下の例ではボタン押下2秒後に”OK”を押下して閉じます。 Thread P

WS000001

UWSC 改行コードの削除

改行を全て削除する方法です。 ※CRやLFの説明は省略します。 test = replace(tes

b09ab07a411e8f80f1032b3672b7949500dcd4a26fc01b85d0c6ce174b085f26_176713_130

ダウンロードの停止 ならびにダウンロード方法の変更

ダウンロードについて全て削除しました。 今まで公開していたサンプル等は別の形でダウンロード できるよ

invitation_banner117

げん玉がキャンペーン中です

【Gendama】楽しくお得にポイントが貯まる!    ~ポイントポータルサイト げん玉~  ★ネッ

WS000001

UWSCで例外処理とログ出力

使用時、使用するuwsファイルのある場所に「log」フォルダを作成してください。 ログフォルダ内に以

WS000001

UWSC Excelを全て閉じる

Excelを読み取りIEで自動処理を行う開発はよく行います。 開発中にデバッグしたりしていると、Ex

  Message

メールアドレスが公開されることはありません。 * が付いている欄は必須項目です

次のHTML タグと属性が使えます: <a href="" title=""> <abbr title=""> <acronym title=""> <b> <blockquote cite=""> <cite> <code> <del datetime=""> <em> <i> <q cite=""> <strike> <strong>