Версия для печати темы
Нажмите сюда для просмотра этой темы в оригинальном формате
Форум программистов > VB6 > Почта


Автор: Viton 3.11.2004, 22:04
Как програмно послать письмо какя команда хелп.
Суть такова нужно при нажатий на label что бы открылся стандартный поисковик.
:qstn

Автор: boevik 3.11.2004, 22:16
Viton, так послать письмо или открыть поисковик? Поточнее, пожалуйста.

Автор: Viton 3.11.2004, 22:47
Открыть почтавик что бы послать письмо. На мой E-Mail

Автор: boevik 4.11.2004, 00:57
Что б програмно открыть новое письмо, можно воспользоваться коммандой mailto.
К примеру так:
Код

mailto:[email protected],[email protected]?subject=test message&body=hello

Запускать командой Shell.

Автор: cardinal 4.11.2004, 01:40
Или что-нибудь такое:
Код

Option Explicit
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 Sub Command1_Click()
Call ShellExecute(0&, "Open", "mailto:[email protected],[email protected]?subject=test message&body=hello", "", "", 1)
End Sub

Автор: Viton 4.11.2004, 15:37
Спасибо, всё работает!!!
smile [b][/b]

Автор: Калаш 7.5.2005, 00:16
Большое спасибо тебе cardinal !!!!!!!!! smile smile smile
ты так помог!!!! 3 часа искал нормальный код для проги и только один человек написал нормальный рабочий код!!! спасибо!

Powered by Invision Power Board (http://www.invisionboard.com)
© Invision Power Services (http://www.invisionpower.com)