Webbrowserの「新しいウインドウで開く」の、URLを、取得するにはどうすれば?
投稿者 winvis  (学生)
投稿日時
2009/9/24 09:44:13
すいません、VB2008Expressを、使っています
投稿者 太郎冠者  (社会人)
投稿日時
2009/9/24 10:19:33
[過去ログ-NewWindowイベントについて]
http://rucio.groupsite.jp/commu/ThreadDetail.aspx?ThreadId=9099
参考までに。
http://rucio.groupsite.jp/commu/ThreadDetail.aspx?ThreadId=9099
参考までに。
投稿者 xvmm  (中学生)
投稿日時
2010/10/10 19:14:47
自分もそのことで困っています。
ActiveXのAxWebbrowserを使えばよいそうです。
>TabBrowserの場合
NewWindow3イベント
>普通のWebBrowserの場合
NewWindow2イベント
自分もAxWebborwserを使ってみましたが、
使い方は、.Net のWebbrowserとほぼ同じです。(PropertyDialogなどがありません。)
注意 )
StatusTextの取得ができなかったりします。(僕のPCではそうなりました。)
ActiveXのAxWebbrowserを使えばよいそうです。
>TabBrowserの場合
NewWindow3イベント
>普通のWebBrowserの場合
NewWindow2イベント
自分もAxWebborwserを使ってみましたが、
使い方は、.Net のWebbrowserとほぼ同じです。(PropertyDialogなどがありません。)
注意 )
StatusTextの取得ができなかったりします。(僕のPCではそうなりました。)
投稿者 YAS  (社会人)
投稿日時
2010/10/11 00:59:06
WebbrowserにNewWindow2を追加する例をまとめました。
自分のWebページで恐縮ですが,参考にしてください。
http://homepage1.nifty.com/yasunari/VB/VB2005/WebBrowserNewWindow2Event.htm
自分のWebページで恐縮ですが,参考にしてください。
http://homepage1.nifty.com/yasunari/VB/VB2005/WebBrowserNewWindow2Event.htm
投稿者 xvmm  (社会人)
投稿日時
2010/12/13 22:33:00
見つけました。(.NETのWebBrowser)
これで、いいと思います。
これを実行すると、NewWindowイベントが発生したときに、新しくアプリケーションが起動すると思います。
Dim URL As Uri
Public Sub New()
' この呼び出しはデザイナーで必要です。
InitializeComponent()
' InitializeComponent() 呼び出しの後で初期化を追加します。
'"新しいウィンドウ"のURLを取得する
Try
Dim cmds() As String
cmds = System.Environment.GetCommandLineArgs()
WebBrowser1.Navigate(cmds(1))
Catch
End Try
End Sub
Private Sub WebBrowser1_NewWindow(ByVal sender As Object, ByVal e As CancelEventArgs) Handles WebBrowser1.NewWindow
e.Cancel = True
'sender = WebBrowser1 -自作のコンテキストメニューをクリックして実行する場合
URL = sender.Document.ActiveElement.GetAttribute("href"))
Process.Start("exe名", URL)
End Sub
これで、いいと思います。
これを実行すると、NewWindowイベントが発生したときに、新しくアプリケーションが起動すると思います。
ウェブページ(例:yahoo!)のリンクの上で、右クリックメニューを、出して「新しいウインドウで、開く」を、選択したときその、移動先のURLを、取得するには、どうすればいいですか?