Вставка SMTP и PASSWORD по умолчанию

Программирование на Visual Basic, главный форум. Обсуждение тем программирования на VB 1—6.
Даже если вы плохо разбираетесь в VB и программировании вообще — тут вам помогут. В разумных пределах, конечно.
Правила форума
Темы, в которых будет сначала написано «что нужно сделать», а затем просьба «помогите», будут закрыты.
Читайте требования к создаваемым темам.
VBnovichok
Новичок
Новичок
 
Сообщения: 40
Зарегистрирован: 06.09.2003 (Сб) 1:11

Вставка SMTP и PASSWORD по умолчанию

Сообщение VBnovichok » 25.11.2003 (Вт) 2:21

:D Привет всем!!!

Ситуация: Необходимо запустить код с WINSOCK и отправить сообщение. Сеть работает через конкретный определенный SMTP и не поддерживает альтернативные (типа mail.ru и т.д.).
SMTP и PASSWORD не известны.


Вопрос: Как вставить в код SMTP и PASSWORD принятые по умолчанию да данной машине?

Спасибо :P

VBnovichok
Новичок
Новичок
 
Сообщения: 40
Зарегистрирован: 06.09.2003 (Сб) 1:11

Сообщение VBnovichok » 26.11.2003 (Ср) 2:31

Частично разобрался:
With clsSend

.SMTP_Server = GetString(HKEY_CURRENT_USER, "Software\Microsoft\Internet Account Manager\Accounts\00000001", "SMTP Server")
.SMTP_Email_Address = GetString(HKEY_CURRENT_USER, "Software\Microsoft\Internet Account Manager\Accounts\00000001", "SMTP Email Address")
.Display_Name = "Test"
.SendToN = "ME"
.SendToA = GetString(HKEY_CURRENT_USER, "Software\Microsoft\Internet Account Manager\Accounts\00000001", "SMTP Email Address")
.MessageSubject = "Test Subject"
.MessageText = "Test Message!"

.SendMail

End With


Но как быть с ЛОГИНОМ И ПАРОЛЕМ??

Не оставьте без внимания!

Спасибо


Вернуться в Visual Basic 1–6

Кто сейчас на конференции

Сейчас этот форум просматривают: AhrefsBot, Yandex-бот и гости: 7

    TopList