Visual Basic, .NET, ASP, VBScript
Новости | Примеры | Библиотека кодов | НеЧаВо | VBA | Справочник по VB | Справочник по WinAPI | ActiveX контролы | Статьи по VB | Мастерская разработчика | Форум VBNet | Яndex bar! | Голосование | Полезные программы | Магазин VBNet | Рассылка | Конкурсы | Юмор | Чат | Реклама на VBNet | Автора! | Ссылки | Бета-тестирование | Послать пример на сайт
 

   
   
     

Форум - Общий форум

Страница:

 

  Вопрос: Отправка письма на мыло из 2ух текстбоксов Добавлено: 08.04.11 21:05  

Автор вопроса:  Google | Web-сайт: googlz.3dn.ru | ICQ: 363861233 
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
Private Sub SendEmail_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles SendEmail.Click
        Dim mail As New MailMessage()
        mail.From = New MailAddress("от кого")
        mail.To.Add("кому")
        mail.Subject = "Тема"
        mail.Body = TextBox1.Text
        Try
            mail.Attachments.Add(New Attachment(pathandfilename))
        Catch ex As Exception
        End Try
 
        Dim smtp As New SmtpClient("smtp.yandex.ru", "25") 'Например
        smtp.Credentials = New System.Net.NetworkCredential("майл", "пасс")
        Try
            smtp.Send(mail)
        Catch ex As Exception
            'MsgBox(Err.Description, MsgBoxStyle.Critical)
        Finally
            mail.Dispose()
            smtp = Nothing
        End Try
    End Sub

выше написал как из 1го текст бокса, напишите плиз кто нить полный текст проги как сделать из двух...

Ответить

  Ответы Всего ответов: 0  

Нет ответов

Страница:

Поиск по форуму



© Copyright 2002-2011 VBNet.RU | Пишите нам