Свежие темы форума
[Dichvusocks.us] Service Seller S... 2896 kickic47, в 04:37
CS:GO избранные сайты с халявой о... 34 b1ack, в 04:01
Ключи к Norton/Symantec Антивирус 5272 doc1007, в 02:20
Новая акция от iherb.com 32 Forest2552, в 01:46
Раздача аккаунтов VK 167 fr0st, в 00:50
Чат "Free-Pass". Общени... 604 Lewdik, в 22:49
Сколько у вас игр в Steam? Провод... 47 Lewdik, в 22:43
Ключи для Касперского 10 HaRd, в 22:41
Популярные и интересные темы форума
Раздача игровых ключей на gleam.io Free(,бес... 980 chrap
Промо-акции: различные полезные программы 807 sydimir
CS:GO сайты с халявой (UPD 52 сайтa) 652 Slavik_White
Чат "Free-Pass". Общение на разные ... 604 Just1ucky
Всем бесплатно по 1 рублю Qiwi! 425 kostiaaka1
Бесплатные деньги Qiwi! 68 kostiaaka1
Ключи для Касперского 10 Andrey_4ik
Продать скины кс го моментально на портале CS... 3 CSGOCASH
Интересные статьи и лайфхаки
Как узнать музыку из видео на YouTube? (19)
Как тайно прочитать сообщение Вконтакте? (23)
Как и где безопасно хранить свои пароли? (20)
Как узнать возраст человека вконтакте, если он скрыт? (29)
Как бесплатно получить стикеры вконтакте "Ходим в гост... (15)
Как фармить серебро в World of Tanks? [2016] (17)
Как бесплатно получить стикеры Вконтакте от WWF (Редкие жив... (19)
Как получить WINDOWS 10 бесплатно, на халяву? (27)
Сейчас вы просматриваете тему

Отправить е-майл VB.NET

Страница 1 из 11
Форум о халяве - FREE-PASS.Ru » Популярное на форуме » Флудилка [О разном] » Отправить е-майл VB.NET
Отправить е-майл VB.NET
SawCMS1042
Автор темы
Дата: Понедельник, 06.01.2014, 17:19 | Сообщение # 1
Здраствуйте ребят, в этом посте хочу показать вам как отправить е-майл используя VB.NET.

  • Нам нужно: IDE Visual Studio (2008-2010-2012-2013)
  • Базовое знание VB.NET'а
  • Свободная память ОЗУ мозгов
  • Прамые руки.



Начинаем: создаём проект.

Теперь в наш Form надо вставить Button. (можно ставить всё что угодно на удовольствие)
Два раза кликаем по форму, и выше Public Class Form1 пишем
Imports System.Net.Mail

Вернулись к форму [дезайн]
Ставим этому буттону текст Отправить.

Получается такое:
http://i.imgur.com/uksLIkO.png

Два раза кликаем по буттону.
Ставим данный код:

'--------------------------код от SawCMS---------------------------
'--специально для free-pass.ru - халява, раздачи и многое другое!--
'------------------------------удачи!------------------------------

Dim smtpServer As New SmtpClient()
 Dim mail As New MailMessage()
 
 'Тут ставим логин и пароль на наш е-майл. Так же пожно поставить два TextBox чтобы туда пользовател ставил свои данные.
 smtpServer.Credentials = New Net.NetworkCredential("мыло@мыло.tk", "парольмыла123")
 
 'Пишем порт сервера SMTP. Для GMAIL 587. Полный список: http://bit.ly/JXQjhi
 smtpServer.Port = 587
 
 'адрес smtp хоста
 smtpServer.Host = "smtp.gmail.com"
 
 'вкючяем SSL (http://ru.wikipedia.org/wiki/SSL)
 smtpServer.EnableSsl = True
 
 'создаём новое письмо
 mail = New MailMessage()
 
 'пишем от кого е-майл (пишем адрес е.почты)
 mail.From = New MailAddress("мыло@мыло.tk")
 
 'пишем кому отправить е-майл
 mail.To.Add("мойдругнуб@мыло.tk")
 
 'тут пишем тему
 mail.Subject = "тема"
 
 'пишем текст письма текстом либо через textbox
 mail.Body = ("Лялялял друг ты нуб когда нарки привезёшь?")
 
 smtpServer.Send(mail)

Всё, у нас софт который отправляет мыло.
Довольны? Гоняйте плюсы  wink

Поделиться этой темой:
 
Бот
Аватарка бота
Интересное
Не видишь блоки? - Отключи AdBlock
Форум о халяве - FREE-PASS.Ru » Популярное на форуме » Флудилка [О разном] » Отправить е-майл VB.NET
Страница 1 из 11
Поиск:
Пожалуйста, зарегистрируйтесь! или войдите под любой соц.сетью
Вы сможете видеть всю халяву на сайте, писать сообщения и создавать темы на форуме!
Войти Зарегистрироваться