2011-07-07 47 views
15

Tôi muốn người dùng của mình có thể nhấp vào nút để mở trang web của công ty tôi trong trình duyệt mặc định khi được nhấp. Làm thế nào tôi sẽ làm điều này?Mở trang web trong trình duyệt mặc định

Tôi đang sử dụng VB.net để tất cả các ví dụ .net đều được chấp nhận.

+0

thể trùng lặp của [Mở trình duyệt web mặc định] (http://stackoverflow.com/questions/1562183/opening-default-web-browser) –

Trả lời

16

Như những người khác đã chỉ ra, Process.Start() là cách để truy cập tại đây. Tuy nhiên, có một vài quirks. Nó có giá trị thời gian của bạn để đọc bài viết trên blog này:

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

Nói tóm lại, một số trình duyệt gây ra nó để ném một ngoại lệ không có lý do tốt, chức năng có thể chặn một lúc trên phi UI chủ đề, do đó bạn cần đảm bảo rằng nó xảy ra ở gần cuối bất kỳ hành động nào khác bạn có thể thực hiện cùng một lúc và bạn có thể muốn thay đổi giao diện con trỏ trong khi chờ trình duyệt mở.

32

này nên làm việc:

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

Bạn có thể sử dụng Process.Start:

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

Process.Start(url) 

này nên mở bất cứ trình duyệt được thiết lập như mặc định trên hệ thống.

2

Điều này làm việc hoàn hảo cho tôi. Vì đây là để sử dụng cá nhân, tôi đã sử dụng Firefox làm trình duyệt của mình.

Dim url As String 
    url = "http://www.google.com" 
    Process.Start("Firefox", url) 
3

Đây là một phần nhỏ có thể chỉ quan tâm đến một số người cần chỉ định trình duyệt. (nhưng nó không tốt như một 12" pizza phụ!): 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 

Gọi:. Sẽ mở www.google.com trong Firefox nếu nó được cài đặt trên máy tính mà

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

Gọi: sẽ mở www.google.com trong trình duyệt mặc định

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

HOẶC

NavigateWebURL("http://www.google.com") 
1
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 
Các vấn đề liên quan