Встал вопрос...

[Yuri B]

Здравствуйте!

Я знаю как из своей проги сделать ссылку на почтовый ящик в Сети, с помощью ShellExecute... Mailto... вызвать почтовый клиент. Мне надо из своей проги в письме написать кроме адреса и темы, само собственно письмо и прикрепить к нему файл. Как это сделать? С помощью ShellExecute возможно?

Спасибо!

[BV]

Поиск по форуму с ShellExecute.

[tyomitch]

BV, перечитай вопрос

[BV]

http://vbnet.mvps.org/index.html?code/s ... xecute.htm

[Q2W]

А мож такой вариант?
Делаем (заранее в theBat'е) письмо, сохраняем его как .eml и открываем шеллом (чтоб дефолтный емайл клиент открыл).

[PARTYzan]

А мож такой вариант?
Делаем (заранее в theBat'е) письмо, сохраняем его как .eml и открываем шеллом (чтоб дефолтный емайл клиент открыл).

главное - чтоб у тебя формат файла .eml был зарегистрирован на программу theBat. Далее используй ShellExecute. theBat'а у меня нету, но этим кодом запросто запускаю мелодию в winamp'е.

вот, попробуй

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
Const SW_SHOWNORMAL = 1
Private Sub Form_Load()
ShellExecute Me.hwnd, vbNullString, "c:\1.eml", vbNullString, "C:", SW_SHOWNORMAL
End Sub

[Yuri B]

Добрый день.

Спасибо всем за ответы.

Не совсем понял причем здесь The Bat и предварительное создание каких - то там писем? Какая разница какой почтовый клиент используется?

Для создания письма из проги я использую Call ShellExecute(0&, "Open", "mailto:" + "ящик@сервер.ru" + "?Subject=" + "Тема сообщения.", "", "", SW_SHOWNORMAL) . Это выражение позволяет запускать почтовый клиент с адресом получателя (ящик@сервер.ru), и
в строке Тема: "Тема сообщения". Мне нужно ко всему этому добавить текст самого письма и прикрепить файл. Возможно ли это с помощью ShellExecute или нужно написать еще какую-нибудь процедуру

ЗЫ спасибо за ссылки, обязательно просмотрю.

[skiperski]

Мне нужно ко всему этому добавить текст самого письма и прикрепить файл.

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

Call ShellExecute(0&, "Open", "mailto:" & mailBox & "?Subject=" & Subj & "&body=" & mailBody, "", "", SW_SHOWNORMAL)

А как файл прикрепить не знаю.

[Yuri B]

Спасибо, попробую.

[alibek]

А как файл прикрепить не знаю.

Для файла есть attach=...
Но это поле не определено стандартом и почти никаким почтовиком не поддерживается.
Так что только через MAPI.

[Yuri B]

Понятно