Email i Visual Basic 6 - Service Pack 5

[prolux]

Email i Visual Basic 6.0 - Service Pack 5

 

Hvis jeg skriver inn en email-adresse i en tekstboks, lager en knapp ved siden av tekstboksen.

 

Når jeg trykke på knappen skal Microsoft Outlook åpnes og en ny mail skal lages/sendes.

 

Hvordan gjør jeg det på en enkel måte ?

[Papirpose]

Først putter du flg. i declaration-området:

 

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 Const SW_SHOW = 5

 

Deretter bruker du bare:

 

ShellExecute hwnd, "open", "mailto:[email protected]", vbNullString, vbNullString, SW_SHOW

[N3xUZ]

ENKELT!

Bruk eflash.ocx!

Sure thing!

Putt den inn, og den blir en fin liten link!

 

Skriv mailto:[email protected]