关于在VB中启动邮件程序的问题

Question

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 LongShellExecute hWnd, "open", "mailto:[email protected]?subject=mysubject", vbNullString, vbNullString, SW_SHOW

Answer 1

声明：
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调用例：    '用邮件编辑器撰写邮件
ShellExecute Me.hwnd, "", _
    "mailto:[email protected]?subject=Help&body=OK","", "", 1    '用浏览器浏览网页
ShellExecute Me.hwnd, "", "http://www.263.net", "", "", 1