Отправить письмо на e-mail без Outlook

@wishcom · Регистрация: 17.02.2010

Студворк — интернет-сервис помощи студентам

Проблема такая.
На компьютере не настроена отправка почты...
Outlook мохает...
Вопрос такой:

Как программно отправить на адрес - nik@yandex.ru
письмо - txtSend от I_am@yandex.ru ,
тема - ok_All ????

Искал по форумам,смотрел исходники,но всё через Outlook и всякую другую не понятную ботву.

Может есть у кого код?
Или как?

Вот что я накопал...
Pop3 User Name - I_am
Pop3 Password - I_am_password
SMPT Email Address - nik@yandex.ru

А что с остальным делать???

Visual Basic
1
2
3
4
5
6
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)
Private Declare Function GetDesktopWindow Lib 'user32' () As Long
Private Const SW_SHOWNORMAL = 1
 
'Вызываем маил с адресом
Call ShellExecute(0&, 'Open', 'mailto:' + 'wishco@yandex.ru' + '?Subject=' + ''Здесь описана тема...'', '', '', SW_SHOWNORMAL)

Но через Outlook . А как на прямую????

@wishcom · 14.06.2011, 23:12 **[ТС]**

Достал исходники WinSock
Упёрся что такое POP3 и SMPT для yandex - yandex.mail.ru не катит.
POP3?

14.06.2011, 23:35

wosh, читай АЗЫ... причём - и по бэйсику, и по протоколам, и по OLE, и по... да по чему угодно!!! да научись нормально вопросы задавать. Тебе самому-то не западло быть чуть ли не единственным челом на этом форуме, задающем вопросы через одно место?! если ты туп, как дерево, - то не фиг тебе на этом форуме делать; если же ты умнее деревяшки, то УЧИСЬ, бляха муха, слушай критику и делай выводы! Ты можешь возразить: 'не нравится - не отвечай'. Ан-нет: 'не нравится - буду чморить', чтоб приучить к порядку. Развелось вас, раздолбаев, желающих и на х.. сесть, и рыбку съесть: вопрос формулируете через задницу, а потом ещё возмущаетесь, когда либо не отвечают, либо пытаются на место поставить.

@wishcom · 15.06.2011, 00:43 **[ТС]**

Да попросили именно сегодня узнать вот копаю...
POP3 - pop.yandex.ru
SMTP - smtp.yandex.ru

Теперь запрос осталось только радить без Outlook'a.
Что тут непонятного?

15.06.2011, 02:42

2 Comanche:

>> 'Развелось вас, раздолбаев, желающих и на х.. сесть, и рыбку съесть'

Искренне надеюсь, что желающих НЕ сесть на него все же окажется больше...

@wishcom · 16.06.2011, 21:39 **[ТС]**

А вас лосей разбрелось тьма...
Нас только и шпуняют...
Пальцы веером,зубы конвеером...

Мне этот POP нафиг не нужен и не надо будет...
И лезть туда не собираюсь.
Попросили знакомые,попробывал - вы наплявали, спасибо! я отваливаю...

@ORST · 20.07.2011, 15:35

Слущай wosh, тут у меня исходник гдето завалялся, вродебы то, что нужно... Тебе намылить???

@wishcom · 21.07.2011, 22:59 **[ТС]**

Давай! wishco@yandex.ru

@ORST · 23.07.2011, 02:03

Ну чо? Испытал???

@KOCMOHABTOB_11 · 24.07.2011, 04:01

Народ, кому лаемся? Чудаку ж помощь нужна, а не рассказы за то как Родину любить.
-----------------
Сегодня в ассортименте:

Visual Basic
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
Sub Remind(ByVal sAddr, ByVal sMsg, ByVal sTEMA)
    
    Dim objCDO
    Set objCDO = CreateObject('CDONTS.NewMail')
    objCDO.To = sAddr
    objCDO.From = 'test@test.com'
    objCDO.Subject = sTEMA
    objCDO.Body = sMsg
    objCDO.Send
    
End Sub
 
sub Remind(sAddr, sMsg)
        set msg      = WScript.CreateObject('CDO.Message')
    msg.From     = 'a@b.com'
    msg.To       = sAddr
    msg.Subject  = 'testing'
    msg.TextBody = sMsg
 
    msg.Send
 
    MsgBox('DONE')
end sub

@Akula-II · 24.07.2011, 23:17

Попытайся через Winsock подсоедениться к 25 порту - порт SMTP. Если надо - я пришлю пример

@Alexey Spirin · 25.07.2011, 01:21

Ребят, я вас не понимаю.
Я полностью согласен с Comanche & Messir.
Инфы про отправку почты БЕЗ аутлука, а, к примеру, через Винсок, в Сети полно. Неужели лень самому потратить несколько минут и найти?

>А вас лосей разбрелось тьма...
Это не нас тьма, а вас, последнее время. Достали со своими вопросами, на которые и так есть горы ответов.

>Нас только и шпуняют...
А что еще делать?

>Пальцы веером,зубы конвеером...
Вот не надо. Такого никогда не было. ПРосто нужно уметь уважать и ценить и прислушиваться к другим участникам форума.

Новые блоги и статьи Все статьи Все блоги /
Первый деплой lagorue 16.01.2026 Не спеша развернул своё 1ое приложение в kubernetes. А дальше мне интересно создать 1фронтэнд приложения и 2 бэкэнд приложения развернуть 2 деплоя в кубере получится 2 сервиса и что-бы они. . .	Расчёт переходных процессов в цепи постоянного тока igorrr37 16.01.2026 / * Дана цепь постоянного тока с R, L, C, k(ключ), U, E, J. Программа составляет систему уравнений по 1 и 2 законам Кирхгофа, решает её и находит токи на L и напряжения на C в установ. режимах до и. . .	Восстановить юзерскрипты Greasemonkey из бэкапа браузера damix 15.01.2026 Если восстановить из бэкапа профиль Firefox после переустановки винды, то список юзерскриптов в Greasemonkey будет пустым. Но восстановить их можно так. Для этого понадобится консольная утилита. . .	Изучаю kubernetes lagorue 13.01.2026 А пригодятся-ли мне знания kubernetes в России?
Сукцессия микоризы: основная теория в виде двух уравнений. anaschu 11.01.2026 https:/ / rutube. ru/ video/ 7a537f578d808e67a3c6fd818a44a5c4/	WordPad для Windows 11 Jel 10.01.2026 WordPad для Windows 11 — это приложение, которое восстанавливает классический текстовый редактор WordPad в операционной системе Windows 11. После того как Microsoft исключила WordPad из. . .	Classic Notepad for Windows 11 Jel 10.01.2026 Old Classic Notepad for Windows 11 Приложение для Windows 11, позволяющее пользователям вернуть классическую версию текстового редактора «Блокнот» из Windows 10. Программа предоставляет более. . .	Почему дизайн решает? Neotwalker 09.01.2026 В современном мире, где конкуренция за внимание потребителя достигла пика, дизайн становится мощным инструментом для успеха бренда. Это не просто красивый внешний вид продукта или сайта — это. . .

@wishcom 1 / 1 / 0 Регистрация: 17.02.2010 Сообщений: 131
	14.06.2011, 23:12 [ТС]
	Достал исходники WinSock Упёрся что такое POP3 и SMPT для yandex - yandex.mail.ru не катит. POP3? 0

Comanche
	14.06.2011, 23:35
	wosh, читай АЗЫ... причём - и по бэйсику, и по протоколам, и по OLE, и по... да по чему угодно!!! да научись нормально вопросы задавать. Тебе самому-то не западло быть чуть ли не единственным челом на этом форуме, задающем вопросы через одно место?! если ты туп, как дерево, - то не фиг тебе на этом форуме делать; если же ты умнее деревяшки, то УЧИСЬ, бляха муха, слушай критику и делай выводы! Ты можешь возразить: 'не нравится - не отвечай'. Ан-нет: 'не нравится - буду чморить', чтоб приучить к порядку. Развелось вас, раздолбаев, желающих и на х.. сесть, и рыбку съесть: вопрос формулируете через задницу, а потом ещё возмущаетесь, когда либо не отвечают, либо пытаются на место поставить.

@wishcom 1 / 1 / 0 Регистрация: 17.02.2010 Сообщений: 131
	15.06.2011, 00:43 [ТС]
	Да попросили именно сегодня узнать вот копаю... POP3 - pop.yandex.ru SMTP - smtp.yandex.ru Теперь запрос осталось только радить без Outlook'a. Что тут непонятного? 0

Messir
	15.06.2011, 02:42
	2 Comanche: >> 'Развелось вас, раздолбаев, желающих и на х.. сесть, и рыбку съесть' Искренне надеюсь, что желающих НЕ сесть на него все же окажется больше...

@wishcom 1 / 1 / 0 Регистрация: 17.02.2010 Сообщений: 131
	16.06.2011, 21:39 [ТС]
	А вас лосей разбрелось тьма... Нас только и шпуняют... Пальцы веером,зубы конвеером... Мне этот POP нафиг не нужен и не надо будет... И лезть туда не собираюсь. Попросили знакомые,попробывал - вы наплявали, спасибо! я отваливаю... 0

@ORST 1 / 1 / 0 Регистрация: 01.05.2011 Сообщений: 203
	20.07.2011, 15:35
	Слущай wosh, тут у меня исходник гдето завалялся, вродебы то, что нужно... Тебе намылить??? 0

@wishcom 1 / 1 / 0 Регистрация: 17.02.2010 Сообщений: 131
	21.07.2011, 22:59 [ТС]
	Давай! wishco@yandex.ru 0

@ORST 1 / 1 / 0 Регистрация: 01.05.2011 Сообщений: 203
	23.07.2011, 02:03
	Ну чо? Испытал??? 0

@Akula-II 3 / 3 / 0 Регистрация: 02.01.2011 Сообщений: 149
	24.07.2011, 23:17
	Попытайся через Winsock подсоедениться к 25 порту - порт SMTP. Если надо - я пришлю пример 0

@Alexey Spirin 2 / 2 / 1 Регистрация: 18.10.2007 Сообщений: 1,748
	25.07.2011, 01:21
	Ребят, я вас не понимаю. Я полностью согласен с Comanche & Messir. Инфы про отправку почты БЕЗ аутлука, а, к примеру, через Винсок, в Сети полно. Неужели лень самому потратить несколько минут и найти? >А вас лосей разбрелось тьма... Это не нас тьма, а вас, последнее время. Достали со своими вопросами, на которые и так есть горы ответов. >Нас только и шпуняют... А что еще делать? >Пальцы веером,зубы конвеером... Вот не надо. Такого никогда не было. ПРосто нужно уметь уважать и ценить и прислушиваться к другим участникам форума. 0