有什么方法可以打开默认的邮件发送程序？

Question

只要到开邮件发送程序即可，就像网页中的 MailTo:[email protected] 一样？

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 Longprivate sub command1_click()
  shellexecute 0&, vbNullString, "MailTo:[email protected]", vbNullString, vbNullString, vbNormalFocus
end sub

Answer 2

自己补充一下：
shellexecute 0&, vbNullString, "mailto:email1;email2?cc=email3&subject=Subject text&body=Body Text", vbNullString, vbNullString, vbNormalFocus谢谢两位