Использование библиотеки CDOSYS для отправки сообщения электронной почты, используя порт SMTP в Visual Basic .NET

ВНИМАНИЕ! Перевод данной статьи был выполнен не человеком, а с помощью программы машинного перевода, разработанной корпорацией Майкрософт. Корпорация Майкрософт предлагает вам статьи, переведенные как людьми, так и средствами машинного перевода, чтобы у вас была возможность ознакомиться со статьями базы знаний KB на родном языке. Однако машинный перевод не всегда идеален. Он может содержать смысловые, синтаксические и грамматические ошибки, подобно тому как иностранец делает ошибки, пытаясь говорить на вашем языке. Корпорация Майкрософт не несет ответственности за неточности, ошибки и возможный ущерб, причиненный в результате неправильного перевода или его использования. Корпорация Майкрософт также часто обновляет средства машинного перевода.

Эта статья на английском языке:313775
Эта статья помещена в архив. Она предлагается "как есть" и обновляться не будет.
ВниманиеADO и ADO MD не проверены полностью в среде Microsoft .NET Framework. Они могут вызвать спорадические проблемы, особенно в приложениях службы или в многопоточных приложениях. Методы, описанные в данной статье можно использовать только в качестве временной меры во время перехода на платформу ADO.NET. Эти методы следует использовать только после завершения проверки убедитесь, что нет проблем с совместимостью заказывать. Проблем, возникающих с помощью ADO или ADO MD таким образом, не поддерживаются. Дополнительные сведения см. в следующей статье базы знаний Майкрософт::
840667При использовании ADO и ADO MD в приложение .NET Framework, получать непредвиденные ошибки
Аннотация
В данной статье описывается, как использовать объекты совместной работы (CDO) для Windows 2000 (CDOSYS) библиотеки, чтобы отправить сообщение электронной почты, используя порт Simple Mail Transfer Protocol (SMTP) в Microsoft Visual Basic .NET.
Дополнительная информация
Чтобы отправить сообщение электронной почты через порт SMTP, выполните следующие действия.
  1. Запустите Microsoft Visual Studio .NET..
  2. в менюФайл:Выберите пункт менюСОЗДАТЬ.и выберите командуProject.
  3. В диалоговом окнеТипы проектов Visual BasicВыберитеПриложение консоли.

    По умолчанию создается файл Module1.vb.
  4. Добавьте ссылку на CDO для Windows 2000 библиотеку Microsoft. Для этого выполните следующие действия::
    1. в менюProjectвыберите пунктДобавление ссылки.
    2. Перейдите на вкладкуCOMвкладки, найдитеКорпорация Майкрософт CDO для библиотеки Windows 2000и выберите командуSelect.
    3. В диалоговом окнеДобавление ссылкидиалоговое окно, нажмите кнопкуOk..
    4. Если запрос на создание оберток для выбранных библиотек, нажмите кнопкуДА..
  5. Повторите шаг 4 для добавления ссылки на 2,5 библиотеку объектов данных Microsoft ActiveX.
  6. В этом окне замените код следующим:
    Imports System.ReflectionModule Module1    Sub Main()        Dim oMsg As CDO.Message = New CDO.Message()        Dim iConfg As CDO.Configuration        Dim oFields As ADODB.Fields        Dim oField As ADODB.Field         iConfg = oMsg.Configuration        oFields = iConfg.Fields        oField = oFields("http://schemas.microsoft.com/cdo/configuration/sendusing")        oField.Value = CDO.CdoSendUsing.cdoSendUsingPort       ' TODO: Replace with the port that you want to use . It must be the same       ' port that the SMTP server is using.       oField = oFields("http://schemas.microsoft.com/cdo/configuration/smtpserverport")        oField.Value = 25        ' TODO: Replace with your SMTP server.        oField = oFields("http://schemas.microsoft.com/cdo/configuration/smtpserver")        oField.Value = "<SMTP Server>"        oFields.Update()        oMsg.Configuration = iConfg        oMsg.TextBody = "Test message body."        oMsg.Subject = "Test SMTP Message Send using port"        oMsg.From = "from@example.com"        oMsg.To = "to@example.com"        oMsg.Send()        oMsg = Nothing        iConfg = Nothing        oFields = Nothing        oField = Nothing    End SubEnd Module					
  7. Поиск TODO в коде и затем изменить код для вашей среды.
  8. Для создания и запуска программы нажмите клавишу F5..
  9. Убедитесь, что сообщение электронной почты было отправлено и получено.
отправлять сообщения CDOSYS порт SMTP

Внимание! Эта статья переведена автоматически

Свойства

Номер статьи: 313775 — последний просмотр: 12/07/2015 08:15:45 — редакция: 2.0

Microsoft Visual Basic .NET 2003 Standard Edition, Microsoft Visual Basic .NET 2002 Standard Edition

  • kbnosurvey kbarchive kbhowto kbcode kbxml kbmsg kbmt KB313775 KbMtru
Отзывы и предложения