Update nach Sync GRC und aktueller Version
This commit is contained in:
@@ -56,4 +56,13 @@ Module Globals
|
||||
|
||||
Public WithEvents Generic_Event_Handler As New Generic_Event_Handler
|
||||
|
||||
Public Function OpenLink(ByVal Hyperlink As String)
|
||||
Try
|
||||
Dim webAddress As String = Hyperlink
|
||||
Process.Start(webAddress)
|
||||
Catch ex As Exception
|
||||
MsgBox("Beim Link-Aufruf ist ein Fehler aufgetreten: " + ex.Message)
|
||||
End Try
|
||||
|
||||
End Function
|
||||
End Module
|
||||
|
||||
Reference in New Issue
Block a user