Sie sind aktuell nicht angemeldet.

Funktionen: Einloggen  |  Neu registrieren  |  Suchen

Re: !i Hyperlink i!
Autor: anubis
Datum: 11.05.02 22:32
Hier wäre noch ein einfache Möglichkeit einen Hyperlink zu verwenden: Private Declare Function ShellExecute Lib "shell32.dll" Alias "ShellExecuteA" (ByVal hWnd As Long, ByVal lpOperation As String, ByVal lpFile As String, ByVal lpParameters As String, ByVal lpDirectory As String, ByVal nShowCmd As Long) As Long Private Declare Function GetDesktopWindow Lib "User32" () As Long Const SW_SHOWNORMAL = 1 Public Function StartURL(URL As String) As Long Dim Scr_hDC As Long Scr_hDC = GetDesktopWindow() StartURL = ShellExecute(Scr_hDC, "Open", URL, "", "C:", SW_SHOWNORMAL) End Function Diese Zeilen einfach übernehmen und dann wenn Du den Link setzen willst, einfach folgende Zeilen eingeben: Call StartURL("http://www.test.com") Natürlich sollte man den Aufruf unter irgendeine Click Eigenschaft einbauen. Hoffe ich konnte Dir helfen. Grüße Martin

!i Hyperlink i!	86	<GEILOMATO>	09.05.02 13:44
Re: !i Hyperlink i!	274	Moni	09.05.02 13:49
Re: !i Hyperlink i!	53	anubis	11.05.02 22:32

Sie sind nicht angemeldet! Um auf diesen Beitrag zu antworten oder neue Beiträge schreiben zu können, müssen Sie sich zunächst anmelden. Einloggen  |  Neu registrieren

Funktionen:  Zum Thema  |  Gesamtübersicht

Suchen