|
Ovo ide u deklaraciju
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
a ovo je kod
Private Sub Label1_Click()
ShellExecute Me.hWnd, "open", "mailto: [Link mogu videti samo ulogovani korisnici]", ByVal 0&, "", 3
End Sub
Posto si ti pocetnik deklaracija se nalazi na vrhu koda tj. prije ovog label koda
Ovo ti otvara default mail client sa upisanom mail adresom
ondje gdje pise [Link mogu videti samo ulogovani korisnici] ti upisi koju hoces mail adresu
|