VB 5.0 und Hyperlinks

Computer: Software & Programmierung Visual Basic
1

hi,

also ich habe projekt erzeugt ( Standart exe) es läuft soweit. nun ist es mein Gedanke das installierte MAilproggi aufzurufen, mit einen Hyperlink in der art mailto:…
Nur habe ich in Sachen Internet absolut keine Ahnung und weiss nicht wie ich einen Hyperlink in mein Projekt einbinde. Kann mir da jemand weiterhelfen? am besten waere ein kleines Demo:smile:

Ciao

2

Hallo Alex

Einen Hyperlink zu kreieren ist eigentlich ganz einfach. Zunächst
benötigst du folgende Deklaration in einem öffentlichen Modul:

Public Const VERB\_OPEN = "Open"
Public 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

Nun kannst du z.B. ein Label erstellen und im Click-Ereignis
folgenden Code eingeben:

Call ShellExecute(Me.hWnd, VERB\_OPEN, "mailto:[email protected]", 
vbNullChar, vbNullChar, 1)

Anstelle der „mailto:“-Anweisung kann auch eine „http://“-Anweisung
stehen.

Mit freundlichen Grüssen

Samuel

Team: Name entfernt

3

Hallo Alex

Einen Hyperlink zu kreieren ist eigentlich ganz einfach.
Zunächst benötigst du folgende Deklaration in einem
öffentlichen Modul:

Public Const VERB_OPEN = „Open“
Public 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

Nun kannst du z.B. ein Label erstellen und im Click-Ereignis
folgenden Code eingeben:

Call ShellExecute(Me.hWnd, VERB_OPEN,
„mailto:[email protected]“, vbNullChar, vbNullChar, 1)

Anstelle der „mailto:“-Anweisung kann auch eine
„http://“-Anweisung stehen.

Mit freundlichen Grüssen

Samuel

Hi Samuel,

vielen Dank für Deine schnelle Hilfe :smile:

Team: Name entfernt