web-dev-qa-db-ja.com

デフォルトのブラウザでウェブページを開きます

ユーザーがボタンをクリックしてデフォルトのブラウザーで会社のWebページを開くことができるようにします。どうすればいいですか？

VB.netを使用しているので、すべての.netの例は受け入れられます。

vb.netbrowser
21
Freesnöw

他の人が示したように、Process.Start()がここに行く方法です。ただし、いくつかの癖があります。このブログ記事を読むのは時間の価値があります：

http://faithlife.codes/blog/2008/01/using_processstart_to_link_to/

要約すると、一部のブラウザーは正当な理由なく例外をスローします。関数は非UIスレッドでしばらくブロックする可能性があるため、同時に実行する他のアクションの終わり近くで発生することを確認する必要があります、ブラウザが開くのを待っている間にカーソルの外観を変更したい場合があります。

18
Joel Coehoorn

これは動作するはずです：

Dim webAddress As String = "http://www.example.com/"
Process.Start(webAddress)
38
user142019

Process.Start を使用できます。

Dim url As String = “http://www.example.com“

Process.Start(url)

これにより、システムでデフォルトとして設定されているブラウザが開きます。

5
keyboardP

ここに、ブラウザを指定する必要がある一部の人々にだけ興味があるかもしれない小さなサブがあります。 （ただし、12インチのピザサブほど良くありません！）：P

Private Sub NavigateWebURL(ByVal URL As String, Optional browser As String = "default")

    If Not (browser = "default") Then
        Try
            '// try set browser if there was an error (browser not installed)
            Process.Start(browser, URL)
        Catch ex As Exception
            '// use default browser
            Process.Start(URL)
        End Try

    Else
        '// use default browser
        Process.Start(URL)

    End If

End Sub

Call：Firefoxにwww.google.comがインストールされている場合、Firefoxで開きます。

NavigateWebURL("http://www.google.com", "Firefox") '// safari Firefox chrome etc

呼び出し：デフォルトのブラウザでwww.google.comを開きます。

NavigateWebURL("http://www.google.com", "default")

OR

NavigateWebURL("http://www.google.com")
5
STiTCHiCKED

これは私にとって完璧に機能しました。これは個人用であるため、Firefoxをブラウザとして使用しました。

 Dim url As String
    url = "http://www.google.com"
    Process.Start("Firefox", url)
2
Kevin Nagel
Dim URL As String 
Dim browser As String = TextBox1.Text
URL = TextBox1.Text
Try
    If Not (browser = TextBox1.Text) Then
        Try
            Process.Start(browser, URL)
        Catch ex As Exception
            Process.Start(URL)
        End Try
    Else
        Process.Start(URL)
    End If

Catch ex As Exception
    MsgBox("There's something wrong!")
End Try
1
User021