C#

Code: Open URL by a New Browserprivate void OpenUrl(string url)
}


VB.NET

Private Sub OpenUrl() Sub OpenUrl( ByRef url As String )
Code: Open URL by a New Browser   
Dim browser As String = GetDefaultBrowser()
Code: Open URL by a New Browser    
If browser.Length > 0 Then
Code: Open URL by a New Browser       
Dim psi As ProcessStartInfo = New ProcessStartInfo
Code: Open URL by a New Browser        psi.UseShellExecute 
= False
Code: Open URL by a New Browser        psi.Arguments
= url
Code: Open URL by a New Browser        psi.FileName 
= browser
Code: Open URL by a New Browser        System.Diagnostics.Process.Start(psi)
Code: Open URL by a New Browser    
Else
Code: Open URL by a New Browser        System.Diagnostics.Process.Start(url)
Code: Open URL by a New Browser    
End If
Code: Open URL by a New Browser
End Sub

Code: Open URL by a New Browser
Private End Function

相关文章: