VB.NETでNewWindowを使用した場合、FlashのURLリンクに関する質問です。
以下のコードを追加したとき、
Private Sub WebBrowser1_NewWindow(ByVal sender As Object, ByVal e As System.ComponentModel.CancelEventArgs) Handles WebBrowser1.NewWindow
Dim NewURL As String = CType(sender, WebBrowser).StatusText
Dim frmNew As New Form2
frmNew.WebBrowser1.Navigate(NewURL)
'frmNew.WebBrowser1.Url = New Uri(NewURL)
frmNew.Show()
e.Cancel = True
End Sub
Form2のWebBrowser1に新しいウィンドウとして表示することはできたのですが、
この場合、Flashのリンク動作が正しく作動せず、
例えば「http://完了/」や「about:blank」となってエラーになってしまいます。
これは、どうしようもないことなのでしょうか。
対策できるようであれば、その方法をご教授お願いします。
こんな感じでどうでしょうか。
Private Sub WebBrowser1_NewWindow(
ByVal sender As Object,
ByVal e As System.ComponentModel.CancelEventArgs
) Handles WebBrowser1.NewWindow
Dim NewURL As String = CType(sender, WebBrowser).StatusText
If NewURL = "http://完了/" Then' 例外処理
' 何もしない
ElseIf NewURL <> "" Then'リンク先を取得できたら
e.Cancel = True'ie 呼び出しをキャンセルする
Dim frmNew As New Form2
frmNew.WebBrowser1.Navigate(NewURL)
frmNew.Show()
Else
' 何もしない
End If
End Sub