• Home
 · 
• Windows API Call/Explanation
 · 
• EXECUTE YOUR DEFAULT EMAIL APP

EXECUTE YOUR DEFAULT EMAIL APP

EXECUTE YOUR DEFAULT EMAIL APP

API Declarations



Private Const SW_SHOWNORMAL = 1




Rate EXECUTE YOUR DEFAULT EMAIL APP

• 1
• 2
• 3
• 4
• 5

(1(1 Vote))

'EXECUTE YOUR DEFAULT EMAIL APP  '
'MD.MAFUZUL ISLAM MAFUZ          '
'WEB:www.mafuz.com               '
'E-mail:[email protected]'
'BANGLADESH                      '


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_SHOWNORMAL = 1

'//SHELLEXECUTE:The ShellExecute
'function opens or prints a specified file.
'The file can be an executable file or a
'document file.


'//SW_SHOWNORMAL = 1:Activates and displays a
'window. If the window is minimized or
'maximized, Windows restores it to its
'original size and position. An application
'should specify this flag when displaying the
'window for the first time.



Public Sub LABEL1_Click()
'//ShellExecute(
'hwnd>> handle to parent window
'lpOperation>> pointer to string that specifies operation to perform
'lpFile>> pointer to filename or folder name string
'lpParameters>> pointer to string that specifies executable-file parameters
'lpDirectory>> pointer to string that specifies default directory
' nShowCmd>>whether file is shown when opened
')
 
 ShellExecute hwnd, vbnullsring, _
    "mailto:[email protected]", vbNullString, _
    vbNullString, SW_SHOWNORMAL
End Sub