Модераторы: Akina
  

Поиск:

Ответ в темуСоздание новой темы Создание опроса
> Почта, Как програмно послать письмо 
:(
    Опции темы
Viton
  Дата 3.11.2004, 22:04 (ссылка) | (нет голосов) Загрузка ... Загрузка ... Быстрая цитата Цитата


Новичок



Профиль
Группа: Участник
Сообщений: 26
Регистрация: 3.11.2004

Репутация: нет
Всего: нет



Как програмно послать письмо какя команда хелп.
Суть такова нужно при нажатий на label что бы открылся стандартный поисковик.
:qstn
PM MAIL ICQ   Вверх
boevik
Дата 3.11.2004, 22:16 (ссылка) | (нет голосов) Загрузка ... Загрузка ... Быстрая цитата Цитата


Эксперт
***


Профиль
Группа: Участник Клуба
Сообщений: 1452
Регистрация: 31.5.2004
Где: Израиль

Репутация: 12
Всего: 35



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


--------------------
Никогда не говори никогда
PM MAIL WWW   Вверх
Viton
Дата 3.11.2004, 22:47 (ссылка) | (нет голосов) Загрузка ... Загрузка ... Быстрая цитата Цитата


Новичок



Профиль
Группа: Участник
Сообщений: 26
Регистрация: 3.11.2004

Репутация: нет
Всего: нет



Открыть почтавик что бы послать письмо. На мой E-Mail

Это сообщение отредактировал(а) Viton - 3.11.2004, 22:49
PM MAIL ICQ   Вверх
boevik
Дата 4.11.2004, 00:57 (ссылка) | (нет голосов) Загрузка ... Загрузка ... Быстрая цитата Цитата


Эксперт
***


Профиль
Группа: Участник Клуба
Сообщений: 1452
Регистрация: 31.5.2004
Где: Израиль

Репутация: 12
Всего: 35



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

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

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


--------------------
Никогда не говори никогда
PM MAIL WWW   Вверх
cardinal
Дата 4.11.2004, 01:40 (ссылка) | (нет голосов) Загрузка ... Загрузка ... Быстрая цитата Цитата


Инженер
****


Профиль
Группа: Экс. модератор
Сообщений: 6003
Регистрация: 26.3.2002
Где: Германия

Репутация: 19
Всего: 99



Или что-нибудь такое:
Код

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



--------------------
Немецкая оппозиция потребовала упростить натурализацию иммигрантов
В моем блоге: Разные истории из жизни в Германии

"Познание бесконечности требует бесконечного времени, а потому работай не работай - все едино".  А. и Б. Стругацкие
PM   Вверх
Viton
Дата 4.11.2004, 15:37 (ссылка) | (нет голосов) Загрузка ... Загрузка ... Быстрая цитата Цитата


Новичок



Профиль
Группа: Участник
Сообщений: 26
Регистрация: 3.11.2004

Репутация: нет
Всего: нет



Спасибо, всё работает!!!
smile [b][/b]
PM MAIL ICQ   Вверх
Калаш
Дата 7.5.2005, 00:16 (ссылка)    |    (голосов: 0) Загрузка ... Загрузка ... Быстрая цитата Цитата


Unregistered











Большое спасибо тебе cardinal !!!!!!!!! smile smile smile
ты так помог!!!! 3 часа искал нормальный код для проги и только один человек написал нормальный рабочий код!!! спасибо!
  Вверх
  
Ответ в темуСоздание новой темы Создание опроса
Правила форума "VB6"
Akina

Запрещается!

1. Публиковать ссылки на вскрытые компоненты

2. Обсуждать взлом компонентов и делиться вскрытыми компонентами

  • Литературу по VB обсуждаем здесь
  • Действия модераторов можно обсудить здесь
  • С просьбами о написании курсовой, реферата и т.п. обращаться сюда
  • Вопросы по реализации алгоритмов рассматриваются здесь
  • Используйте теги [code=vb][/code] для подсветки кода. Используйтe чекбокс "транслит" (возле кнопок кодов) если у Вас нет русских шрифтов.


Если Вам понравилась атмосфера форума, заходите к нам чаще! С уважением, Akina.

 
0 Пользователей читают эту тему (0 Гостей и 0 Скрытых Пользователей)
0 Пользователей:
« Предыдущая тема | VB6 | Следующая тема »


 




[ Время генерации скрипта: 0.0450 ]   [ Использовано запросов: 22 ]   [ GZIP включён ]


Реклама на сайте     Информационное спонсорство

 
По вопросам размещения рекламы пишите на vladimir(sobaka)vingrad.ru
Отказ от ответственности     Powered by Invision Power Board(R) 1.3 © 2003  IPS, Inc.