Как отправить письмо с помощью VB?

[Ambus]

Может у кого есть исходник. Мне нужна программа с тремя текстовыми полями from, to и основн. текст + одна кнопка "Отправить".
Как такое зделать??

[Sebas]

1. MAPI Контрол
2. CDO
3. vbSendMail

[Ambus]

Мда.. очень понятно =((..
Я в VB почти ничего не понимаю..

[tyomitch]

Вот самый простой способ:

Код: Выделить всё

Option Explicit
Private Declare Function ShellExecute Lib "shell32" 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 Sub Form_DblClick()
ShellExecute hwnd, "open", "mailto:chubais@sveta.net?subject=Совсем%20нет&body=САБЖ!!!", vbNullString, vbNullString, 1
End Sub


[SSecurity]

Привет, вообщем чтобы ты не мучился даю исходник .... он там сначала на классы ругается ... ну ето всё удали чтобы не мешалось .... но он исправно почту шлет.

Исходник не мой ... года три назад качал