Модераторы: diadiavova, gambit

Поиск:

Ответ в темуСоздание новой темы Создание опроса
> Отправка почты с Клиента V.b 
:(
    Опции темы
Natapro
Дата 31.10.2009, 10:18 (ссылка) | (нет голосов) Загрузка ... Загрузка ... Быстрая цитата Цитата


Опытный
**


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

Репутация: нет
Всего: нет
Кто может подсказать как реализовать что б, текст с текст бокс 1 отправлялся на определённый почтовый адрес ? с каким инструментом надо роботать, и как ? может кто-то выложить примерчик ?


--------------------
Красивая девушка не может быть глупой.Умная девушка не позволит себе быть некрасивой...
PM MAIL   Вверх
Pilger
Дата 31.10.2009, 11:49 (ссылка) | (нет голосов) Загрузка ... Загрузка ... Быстрая цитата Цитата


Опытный
**


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

Репутация: нет
Всего: нет
Неоднократно последнее время задавался этот вопрос... класс называется вроде Net.Mail


--------------------
Ein Leben nach der Schleife existiert, nur wenn die Schleife terminiert.
PM MAIL ICQ   Вверх
Natapro
Дата 31.10.2009, 11:53 (ссылка) | (нет голосов) Загрузка ... Загрузка ... Быстрая цитата Цитата


Опытный
**


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

Репутация: нет
Всего: нет
а как с ним работать, можно примерчик ? 


--------------------
Красивая девушка не может быть глупой.Умная девушка не позволит себе быть некрасивой...
PM MAIL   Вверх
Pilger
Дата 31.10.2009, 11:54 (ссылка) | (нет голосов) Загрузка ... Загрузка ... Быстрая цитата Цитата


Опытный
**


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

Репутация: нет
Всего: нет
Дядя Вова вроде подробно описывал где то в одной из тем. Там в общем то всё довольно просто. Задаешь сервер, заголовок, текст и т.п. и т.д.

Это сообщение отредактировал(а) Pilger - 31.10.2009, 11:58


--------------------
Ein Leben nach der Schleife existiert, nur wenn die Schleife terminiert.
PM MAIL ICQ   Вверх
Natapro
Дата 31.10.2009, 12:01 (ссылка) | (нет голосов) Загрузка ... Загрузка ... Быстрая цитата Цитата


Опытный
**


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

Репутация: нет
Всего: нет
вродь подробно не нашла :( нашла одну темку, от драгона, но ничего там не поняла :((


--------------------
Красивая девушка не может быть глупой.Умная девушка не позволит себе быть некрасивой...
PM MAIL   Вверх
Pilger
Дата 31.10.2009, 12:09 (ссылка) | (нет голосов) Загрузка ... Загрузка ... Быстрая цитата Цитата


Опытный
**


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

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

Imports System.Net.Mail


Код

            Dim Mail As MailMessage
            Mail = New MailMessage(Откуда, Куда, Тема, Текст)

            With Mail
                .IsBodyHtml = Checked
                .SubjectEncoding = System.Text.Encoding.GetEncoding("utf-8")
                .BodyEncoding = System.Text.Encoding.GetEncoding("utf-8")
                .Priority = MailPriority.Normal
            End With

            Dim scLogicPC As New SmtpClient(Сервер.. например smtp.list.ru сервер майл.ру)
            scLogicPC.Credentials = New System.Net.NetworkCredential(Ящик, Пароль)

            Try
                scLogicPC.Send(Mail)
            Catch ex As Exception
                MessageBox.Show("Не вышло отправить сообщение!" & vbNewLine & ex.Message, "Внимание...", MessageBoxButtons.OK, MessageBoxIcon.Error)
                Exit Sub
            End Try

            MessageBox.Show("Сообщение отправленно!", "Внимание...", MessageBoxButtons.OK, MessageBoxIcon.Information)


Это сообщение отредактировал(а) Pilger - 31.10.2009, 12:11


--------------------
Ein Leben nach der Schleife existiert, nur wenn die Schleife terminiert.
PM MAIL ICQ   Вверх
diadiavova
Дата 31.10.2009, 12:10 (ссылка) | (нет голосов) Загрузка ... Загрузка ... Быстрая цитата Цитата


Доктор Зло(диагност, настоящий, с лицензией и полномочиями)
****


Профиль
Группа: Модератор
Сообщений: 5821
Регистрация: 14.8.2008
Где: В Коньфпольте

Репутация: 8
Всего: 142
Вообще-то тема рядышком есть посмотри , называется "Помогите с CDO". 
По теме читай тут
http://msdn.microsoft.com/ru-ru/library/sy...smtpclient.aspx


--------------------
Хочешь получить мудрый совет - читай подписи участников форумов.
Злой доктор Щасзаболит smile
PM   Вверх
Natapro
Дата 31.10.2009, 12:15 (ссылка) | (нет голосов) Загрузка ... Загрузка ... Быстрая цитата Цитата


Опытный
**


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

Репутация: нет
Всего: нет
diadiavova
я не розобралась там, я не очень велика в познании ВБ.нет по если б был пример была б благодарна..
Pilger 
Подскажыте пожалуйста как мне этот код оформить к себе в программу ?

Добавлено через 19 секунд
я с классами не очень сильно дружу


--------------------
Красивая девушка не может быть глупой.Умная девушка не позволит себе быть некрасивой...
PM MAIL   Вверх
Pilger
Дата 31.10.2009, 12:16 (ссылка) | (нет голосов) Загрузка ... Загрузка ... Быстрая цитата Цитата


Опытный
**


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

Репутация: нет
Всего: нет
Копи пасте, читаешь текст и заменяешь на своё


--------------------
Ein Leben nach der Schleife existiert, nur wenn die Schleife terminiert.
PM MAIL ICQ   Вверх
Natapro
Дата 31.10.2009, 12:19 (ссылка) | (нет голосов) Загрузка ... Загрузка ... Быстрая цитата Цитата


Опытный
**


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

Репутация: нет
Всего: нет
а куда и как точно его вставлять, в форму документа ? или в кнопку при нажатии которой должно происходить действие ? 
(извините за настолько дурные вопросы.)


--------------------
Красивая девушка не может быть глупой.Умная девушка не позволит себе быть некрасивой...
PM MAIL   Вверх
Pilger
Дата 31.10.2009, 12:22 (ссылка) | (нет голосов) Загрузка ... Загрузка ... Быстрая цитата Цитата


Опытный
**


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

Репутация: нет
Всего: нет
Ну ты с обработчиками событий подружись.. Ты же видишь что код делает? Отправляет письмо. Вот и естественно надо знать, когда он это делает. А это уже тебе надо решить. И с классами подружись. Они очень дружелюбные. Всегда помогут и никогда не бросят в беде.


--------------------
Ein Leben nach der Schleife existiert, nur wenn die Schleife terminiert.
PM MAIL ICQ   Вверх
Natapro
Дата 31.10.2009, 12:26 (ссылка) | (нет голосов) Загрузка ... Загрузка ... Быстрая цитата Цитата


Опытный
**


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

Репутация: нет
Всего: нет
Та воть не хотят никак дружыть :(...
Вот смотри мне нужно добавить код , что б при нажатии кнопки производилось действие, мне просто его туда вставитЬ чтоли ? ...

Добавлено через 1 минуту и 36 секунд
что мне надо по порядку сделатЬ smile , обясни мне пожалуйста , буду очень благодарна..


--------------------
Красивая девушка не может быть глупой.Умная девушка не позволит себе быть некрасивой...
PM MAIL   Вверх
Pilger
Дата 31.10.2009, 16:06 (ссылка) | (нет голосов) Загрузка ... Загрузка ... Быстрая цитата Цитата


Опытный
**


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

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

мне просто его туда вставитЬ чтоли ? ...


Да

А вот это на самый верх
Код

Imports System.Net.Mail



--------------------
Ein Leben nach der Schleife existiert, nur wenn die Schleife terminiert.
PM MAIL ICQ   Вверх
Natapro
Дата 31.10.2009, 16:33 (ссылка) | (нет голосов) Загрузка ... Загрузка ... Быстрая цитата Цитата


Опытный
**


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

Репутация: нет
Всего: нет
Вот код Формы, так что ли ?
Код

Imports System.Net.Mail

Public Class LoginForm1

    Private Sub OK_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles OK.Click

        Dim Mail As mailMessage

        Mail = New mailMessage(Откуда, Куда, Тема, Текст)

        With Mail
            .IsBodyHtml = Checked
            .SubjectEncoding = System.Text.Encoding.GetEncoding("utf-8")
            .BodyEncoding = System.Text.Encoding.GetEncoding("utf-8")
            .Priority = MailPriority.Normal
        End With

            Dim scLogicPC As New SmtpClient(Сервер.. например smtp.list.ru сервер майл.ру)
        scLogicPC.Credentials = New System.Net.NetworkCredential(Ящик, Пароль)

        Try
            scLogicPC.Send(Mail)
        Catch ex As Exception
            MessageBox.Show("Не вышло отправить сообщение!" & vbNewLine & ex.Message, "Внимание...", MessageBoxButtons.OK, MessageBoxIcon.Error)
            Exit Sub
        End Try

        MessageBox.Show("Сообщение отправленно!", "Внимание...", MessageBoxButtons.OK, MessageBoxIcon.Information)
    End Sub

    Private Sub Cancel_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Cancel.Click

        Form1.Close()
        Me.Close()
    End Sub

    Private Sub UsernameTextBox_TextChanged(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles UsernameTextBox.TextChanged

    End Sub

    Private Sub PasswordTextBox_TextChanged(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles PasswordTextBox.TextChanged

    End Sub
End Class




--------------------
Красивая девушка не может быть глупой.Умная девушка не позволит себе быть некрасивой...
PM MAIL   Вверх
Pilger
Дата 31.10.2009, 16:39 (ссылка) | (нет голосов) Загрузка ... Загрузка ... Быстрая цитата Цитата


Опытный
**


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

Репутация: нет
Всего: нет
Почти... осталось только зорким глазом глянуть в код и кое что заменить...


--------------------
Ein Leben nach der Schleife existiert, nur wenn die Schleife terminiert.
PM MAIL ICQ   Вверх
Natapro
  Дата 31.10.2009, 16:43 (ссылка) | (нет голосов) Загрузка ... Загрузка ... Быстрая цитата Цитата


Опытный
**


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

Репутация: нет
Всего: нет
там пишет что ошыбки  щяс скрин сделаю

Добавлено @ 16:48
ВОть


Это сообщение отредактировал(а) Natapro - 31.10.2009, 16:49


--------------------
Красивая девушка не может быть глупой.Умная девушка не позволит себе быть некрасивой...
PM MAIL   Вверх
Natapro
Дата 31.10.2009, 17:01 (ссылка) | (нет голосов) Загрузка ... Загрузка ... Быстрая цитата Цитата


Опытный
**


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

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


--------------------
Красивая девушка не может быть глупой.Умная девушка не позволит себе быть некрасивой...
PM MAIL   Вверх
diadiavova
Дата 31.10.2009, 18:07 (ссылка) | (нет голосов) Загрузка ... Загрузка ... Быстрая цитата Цитата


Доктор Зло(диагност, настоящий, с лицензией и полномочиями)
****


Профиль
Группа: Модератор
Сообщений: 5821
Регистрация: 14.8.2008
Где: В Коньфпольте

Репутация: 8
Всего: 142
Natapro, ты вообще о типах данных знаешь что-нибудь?
В этой строке 
Код

Mail = New mailMessage(Откуда, Куда, Тема, Текст)

Все параметры конструктора имеют тип String. Почему они у тебя без кавычек?
Код

Mail = New mailMessage("[email protected]", "[email protected]", "Всякая фигня", TextBox1.Text)

Вместо Checked напиши False. Это свойство имеет тип Boolean и показывает будет ли письмо иметь формат HTML
Код

           .IsBodyHtml = False

Ошибка номер 5 указывает на то, что у тебя создан экземпляр совсем не того типа, который нужен. Раз так, значит при его создании имя типа придётся писать полностью
Вместо 
Код

        Dim Mail As mailMessage
        Mail = New mailMessage(Откуда, Куда, Тема, Текст)

Напиши так
Код

        Dim Mail As New System.Net.Mail.MailMessage("[email protected]", "[email protected]", "Всякая фигня", TextBox1.Text)




--------------------
Хочешь получить мудрый совет - читай подписи участников форумов.
Злой доктор Щасзаболит smile
PM   Вверх
Natapro
Дата 31.10.2009, 18:30 (ссылка) | (нет голосов) Загрузка ... Загрузка ... Быстрая цитата Цитата


Опытный
**


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

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

В этой строке код VB.NET
1:
  Mail = New mailMessage(Откуда, Куда, Тема, Текст)




Все параметры конструктора имеют тип String. Почему они у тебя без кавычек?код VB.NET
1:
  Mail = New mailMessage("[email protected]", "[email protected]", "Всякая фигня", TextBox1.Text)

извините не полностю описала ошыбку, было нужно узнать только про : 
Цитата

Вместо Checked напиши False. Это свойство имеет тип Boolean и показывает будет ли письмо иметь формат HTMLкод VB.NET
1:
             .IsBodyHtml = False




Ошибка номер 5 указывает на то, что у тебя создан экземпляр совсем не того типа, который нужен. Раз так, значит при его создании имя типа придётся писать полностью
Вместо Код

        Dim Mail As mailMessage
        Mail = New mailMessage(Откуда, Куда, Тема, Текст)


Напиши таккод VB.NET
1:
          Dim Mail As New System.Net.Mail.MailMessage("[email protected]", "[email protected]", "Всякая фигня", TextBox1.Text)


Добавлено @ 18:44
в Чом проблема теперь то, почему не отсылает сообщение на почту ? подскажите пожалуйста..
Код

Іmports System.Net.Mail

Public Class LoginForm1

    Private Sub OK_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles OK.Click
        Dim Mail As New System.Net.Mail.MailMessage(UserMail.text, "[email protected]", TextBox1.Text, TextBox2.Text)

        With Mail
            .IsBodyHtml = False
            .SubjectEncoding = System.Text.Encoding.GetEncoding("utf-8")
            .BodyEncoding = System.Text.Encoding.GetEncoding("utf-8")
            .Priority = MailPriority.Normal
        End With

        Dim scLogicPC As New SmtpClient("smtp.mail.ru")
        scLogicPC.Credentials = New System.Net.NetworkCredential("tratata-trututu", "123")

        Try
            scLogicPC.Send(Mail)
        Catch ex As Exception
            MessageBox.Show("Не вышло отправить сообщение!" & vbNewLine & ex.Message, "Внимание...", MessageBoxButtons.OK, MessageBoxIcon.Error)
            Exit Sub
        End Try

        MessageBox.Show("Сообщение отправленно!", "Внимание...", MessageBoxButtons.OK, MessageBoxIcon.Information)
       
    End Sub

    Private Sub Cancel_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Cancel.Click

        Form1.Close()
        Me.Close()
    End Sub
End Class




Это сообщение отредактировал(а) Natapro - 31.10.2009, 18:44


--------------------
Красивая девушка не может быть глупой.Умная девушка не позволит себе быть некрасивой...
PM MAIL   Вверх
Pilger
Дата 31.10.2009, 22:51 (ссылка) | (нет голосов) Загрузка ... Загрузка ... Быстрая цитата Цитата


Опытный
**


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

Репутация: нет
Всего: нет
Ну ты поделись, что выдает, какие ошибки... ты уверена, что вот тут не ошиблась?

Код

scLogicPC.Credentials = New System.Net.NetworkCredential("tratata-trututu", "123")



--------------------
Ein Leben nach der Schleife existiert, nur wenn die Schleife terminiert.
PM MAIL ICQ   Вверх
Natapro
Дата 31.10.2009, 23:11 (ссылка) | (нет голосов) Загрузка ... Загрузка ... Быстрая цитата Цитата


Опытный
**


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

Репутация: нет
Всего: нет
нет не ошыблась, там первое логин без собачки и маил ру.
 и пароль с букв тот что надо....ошыбки никакие. просто пишет не отправлено письмо и хоть убей.


--------------------
Красивая девушка не может быть глупой.Умная девушка не позволит себе быть некрасивой...
PM MAIL   Вверх
Pilger
Дата 1.11.2009, 01:24 (ссылка) | (нет голосов) Загрузка ... Загрузка ... Быстрая цитата Цитата


Опытный
**


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

Репутация: нет
Всего: нет
ну написано же почему не отправил.. (возможно на английском)

Это сообщение отредактировал(а) Pilger - 1.11.2009, 01:32


--------------------
Ein Leben nach der Schleife existiert, nur wenn die Schleife terminiert.
PM MAIL ICQ   Вверх
Natapro
Дата 1.11.2009, 01:33 (ссылка) | (нет голосов) Загрузка ... Загрузка ... Быстрая цитата Цитата


Опытный
**


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

Репутация: нет
Всего: нет
на двох Комюторах у меня разные ошыбки Вот на ОДном, на котором сижу через прокси

Цитата

Не вышло отравить Сообщение
Сбой при отправке сообщения электроной почты


а на другом где не прокси а основной интернет вот такая
user posted image

Добавлено через 6 минут
а у тебя всё нормально роботает ?


--------------------
Красивая девушка не может быть глупой.Умная девушка не позволит себе быть некрасивой...
PM MAIL   Вверх
Pilger
Дата 1.11.2009, 02:16 (ссылка) | (нет голосов) Загрузка ... Загрузка ... Быстрая цитата Цитата


Опытный
**


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

Репутация: нет
Всего: нет
Ну я через майл.ру отправлял и всё работало


--------------------
Ein Leben nach der Schleife existiert, nur wenn die Schleife terminiert.
PM MAIL ICQ   Вверх
diadiavova
Дата 1.11.2009, 04:16 (ссылка) | (нет голосов) Загрузка ... Загрузка ... Быстрая цитата Цитата


Доктор Зло(диагност, настоящий, с лицензией и полномочиями)
****


Профиль
Группа: Модератор
Сообщений: 5821
Регистрация: 14.8.2008
Где: В Коньфпольте

Репутация: 8
Всего: 142
Тут кое-что от конкретных данных зависит. Например на mail.ru smtp-сервер для каждого домена свой, то есть если адрес эл. почты [email protected], то сервер будет smtp.mail.ru, а если адрес [email protected], то сервер - smtp.list.ru. Кроме того важно указать порт. По-умолчанию сообщение отправляется через 25-й порт, а на мэйле, если не ошибаюсь надо отправлять через 2525.
Код

        Dim scLogicPC As New SmtpClient("smtp.mail.ru")
        scLogicPC.Port = 2525



--------------------
Хочешь получить мудрый совет - читай подписи участников форумов.
Злой доктор Щасзаболит smile
PM   Вверх
Natapro
Дата 1.11.2009, 10:25 (ссылка) | (нет голосов) Загрузка ... Загрузка ... Быстрая цитата Цитата


Опытный
**


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

Репутация: нет
Всего: нет
This message was created automatically by mail delivery software.

A message that you sent could not be delivered to one or more of its
recipients. This is a permanent error. The following address(es) failed:

  *******@mail.ru
    user not found

------ This is a copy of the message, including all the headers. ------

Return-path: <******@mail.ru>
Received: from [195.16.77.41] (port=1290 helo=****)
 by mx27.mail.ru with asmtp 
 id 1N4Uke-000Ll2-00
 for [email protected]; Sun, 01 Nov 2009 10:21:25 +0300
mime-version: 1.0
from: *****@mail.ru
to: ******@mail.ru
date: 1 Nov 2009 10:21:22 +0300
subject: =?utf-8?B?YXJjaG9u?=
content-type: text/plain; charset=utf-8
content-transfer-encoding: base64
Message-Id: <E1N4Uke-000Ll2-00.******[email protected]>
X-Spam: Not detected
X-Mras: Ok

b2xhYm9sYQ==

Добавлено через 27 секунд
в чом проблема ? 0_о

Добавлено через 3 минуты и 23 секунды
первые 2 раза пришло нормально, дальше изменила вот кое что, но это не играет роли мне кажется... и добавила закрытие формы...
Код

 MessageBox.Show("" & vbNewLine & ex.Message, "", MessageBoxButtons.OK, MessageBoxIcon.Error)
            Exit Sub
        End Try

        MessageBox.Show("", "", MessageBoxButtons.OK, MessageBoxIcon.Information)
        Me.Close()



--------------------
Красивая девушка не может быть глупой.Умная девушка не позволит себе быть некрасивой...
PM MAIL   Вверх
Natapro
Дата 1.11.2009, 12:24 (ссылка) | (нет голосов) Загрузка ... Загрузка ... Быстрая цитата Цитата


Опытный
**


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

Репутация: нет
Всего: нет
Всё Вопрос решён всем спасибо


--------------------
Красивая девушка не может быть глупой.Умная девушка не позволит себе быть некрасивой...
PM MAIL   Вверх
diadiavova
Дата 1.11.2009, 14:25 (ссылка) | (нет голосов) Загрузка ... Загрузка ... Быстрая цитата Цитата


Доктор Зло(диагност, настоящий, с лицензией и полномочиями)
****


Профиль
Группа: Модератор
Сообщений: 5821
Регистрация: 14.8.2008
Где: В Коньфпольте

Репутация: 8
Всего: 142
Цитата(Natapro @  1.11.2009,  12:24 Найти цитируемый пост)
Вопрос решён

Если решён - не забывай помечать его решённым.


--------------------
Хочешь получить мудрый совет - читай подписи участников форумов.
Злой доктор Щасзаболит smile
PM   Вверх
Natapro
Дата 24.1.2010, 00:19 (ссылка) | (нет голосов) Загрузка ... Загрузка ... Быстрая цитата Цитата


Опытный
**


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

Репутация: нет
Всего: нет
а как сделать что б отсылалось на 2 эмейла ?


--------------------
Красивая девушка не может быть глупой.Умная девушка не позволит себе быть некрасивой...
PM MAIL   Вверх
Natapro
Дата 24.1.2010, 12:39 (ссылка) | (нет голосов) Загрузка ... Загрузка ... Быстрая цитата Цитата


Опытный
**


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

Репутация: нет
Всего: нет
Подскажет кто-то ? как сделать отправку на 2 почтовых адреса сразу ?


--------------------
Красивая девушка не может быть глупой.Умная девушка не позволит себе быть некрасивой...
PM MAIL   Вверх
diadiavova
Дата 24.1.2010, 12:41 (ссылка) | (нет голосов) Загрузка ... Загрузка ... Быстрая цитата Цитата


Доктор Зло(диагност, настоящий, с лицензией и полномочиями)
****


Профиль
Группа: Модератор
Сообщений: 5821
Регистрация: 14.8.2008
Где: В Коньфпольте

Репутация: 8
Всего: 142
Выполни отправку дважды вот и всё. Если надо, можешь специальный метод написать, которому можно передавать несколько адресов и отправлять по ним. В чём проблема то?


--------------------
Хочешь получить мудрый совет - читай подписи участников форумов.
Злой доктор Щасзаболит smile
PM   Вверх
Natapro
Дата 24.1.2010, 12:58 (ссылка) | (нет голосов) Загрузка ... Загрузка ... Быстрая цитата Цитата


Опытный
**


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

Репутация: нет
Всего: нет
а как его написать ? мне надо что б за одним разом, ишло на два адреса..


--------------------
Красивая девушка не может быть глупой.Умная девушка не позволит себе быть некрасивой...
PM MAIL   Вверх
diadiavova
Дата 24.1.2010, 13:12 (ссылка) | (нет голосов) Загрузка ... Загрузка ... Быстрая цитата Цитата


Доктор Зло(диагност, настоящий, с лицензией и полномочиями)
****


Профиль
Группа: Модератор
Сообщений: 5821
Регистрация: 14.8.2008
Где: В Коньфпольте

Репутация: 8
Всего: 142
Код

    Public Sub SendMail(ByVal mailMsg As MailMessage, ByVal ParamArray addresses() As MailAddress)
        Dim client As New SmtpClient
        For Each address As MailAddress In addresses
            'здесь код отправки по каждому адресу
        Next
    End Sub



--------------------
Хочешь получить мудрый совет - читай подписи участников форумов.
Злой доктор Щасзаболит smile
PM   Вверх
Страницы: (3) [Все] 1 2 3 
 Ответ в темуСоздание новой темы Создание опроса
Правила форума VB .NET
diadiavova
  • Прежде чем задать вопрос, воспользуйтесь поиском: возможно Ваш вопрос уже обсуждался и на него был получен ответ.
  • Если такой же вопрос не найден, не стоит задавать свой вопрос в любую тему, создайте новую.
  • Заголовок темы должен отображать ее суть.
  • Содержание поста должно описывать проблему понятно, но в то же время, по возможности, лаконично. Сначала следует описать суть вопроса, потом можно привести пример кода, не вынуждайте других участников угадывать в чем Ваша проблема - телепатов здесь нет.
  • Будьте взаимно вежливы и дружелюбны.
  • При оформлении сообщений используйте форматирование, примеры кода заключайте в теги [CODE=vbnet][/CODE].
  • Также ознакомьтесь с общими правилами, действующими на всем форуме.
  • Если вопрос решен, не забывайте помечать тему решенной(вверху темы есть ссылка). Кроме того, если Вы хотите отблагодарить участников, оказавших помощь в решении, можно повысить им репутацию, в случае, если у Вас менее 100 сообщений в форуме и функция изменения репутации Вам недоступна, можете написать сюда.
  • Общие вопросы по программированию на платформе .NET обсуждаются здесь.
  • Литература по VB .NET обсуждается здесь.

Если Вам помогли и атмосфера форума Вам понравилась, то заходите к нам чаще! С уважением, diadiavova.
 
0 Пользователей читают эту тему (0 Гостей и 0 Скрытых Пользователей)
0 Пользователей:
« Предыдущая тема | VB .NET | Следующая тема »

Подписаться на тему | Подписка на этот форум | Скачать/Распечатать тему


 




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


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

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