WebBrowser　タブの追加 への返答

投稿で使用できる特殊コードの説明。(別タブで開きます。)
本名は入力しないようにしましょう。
投稿した後で削除するときに使うパスワードです。返答があった後は削除できません。
返答する人が目安にします。相手が小学生か社会人かで返答の仕方も変わります。
最初の投稿が質問の場合、質問者が解決時にチェックしてください。(以降も追加書き込み・返信は可能です。)
※「過去ログ」について書くときはその過去ログのURLも書いてください。

以下の返答は逆順(新しい順)に並んでいます。

投稿者 魔界の仮面弁士  (社会人) 投稿日時 2012/3/21 15:05:28
NewWindow2 イベントを処理する必要があります。
http://rucio.cloudapp.net/ThreadDetail.aspx?ThreadId=10230
http://rucio.cloudapp.net/ThreadDetail.aspx?ThreadId=10726
http://rucio.cloudapp.net/ThreadDetail.aspx?ThreadId=2568
0
投稿者 熊造  (社会人) 投稿日時 2012/3/21 11:05:49
IDとPASSを入力しクリックすると新しいページがIEで表示されてしまいます。
これをWebBrowserで表示したいのです。

TabControlを使って新しいTabを作りそこに表示するのではないかと思うのですが
切り替わるURLの取得はどうすればいいのかとか　
よろしくお願いします

Dim AL As HtmlElementCollection
Dim FM As HtmlElementCollection

        Me.txtURL.Text = WebBrowser1.Url.ToString

        If Me.txtURL.Text = "***********" Then
            AL = Me.WebBrowser1.Document.All
            FM = AL.GetElementsByName("******")
            FM(0).InnerText = "********"

            FM = AL.GetElementsByName("******")
            FM(0).InnerText = "******"

            FM = AL.GetElementsByName("******")
            FM(0).InvokeMember("******")
        End If
0