Làm thế nào để sử dụng thư viện CDOSYS để gửi thư điện tử bằng cách sử dụng cổng SMTP Visual Basic.NET

QUAN TRỌNG: Bài viết này được dịch bằng phần mềm dịch máy của Microsoft chứ không phải do con người dịch. Microsoft cung cấp các bài viết do con người dịch và cả các bài viết do máy dịch để bạn có thể truy cập vào tất cả các bài viết trong Cơ sở Kiến thức của chúng tôi bằng ngôn ngữ của bạn. Tuy nhiên, bài viết do máy dịch không phải lúc nào cũng hoàn hảo. Loại bài viết này có thể chứa các sai sót về từ vựng, cú pháp hoặc ngữ pháp, giống như một người nước ngoài có thể mắc sai sót khi nói ngôn ngữ của bạn. Microsoft không chịu trách nhiệm về bất kỳ sự thiếu chính xác, sai sót hoặc thiệt hại nào do việc dịch sai nội dung hoặc do hoạt động sử dụng của khách hàng gây ra. Microsoft cũng thường xuyên cập nhật phần mềm dịch máy này.

Nhấp chuột vào đây để xem bản tiếng Anh của bài viết này:313775
Bài viết này đã được lưu trữ. Bài viết được cung cấp "nguyên trạng" và sẽ không còn được cập nhật nữa.
Thận trọng ADO và ADO MD đã không được thử hoàn toàn ra trong một Microsoft.NET Framework môi trường. Chúng có thể gây ra các vấn đề liên tục, đặc biệt là trong các ứng dụng dựa trên dịch vụ hoặc trong các ứng dụng multithreaded. Các kỹ thuật mà sẽ được thảo luận trong bài viết này chỉ nên được sử dụng như một biện pháp tạm thời trong thời gian di chuyển sang ADO.NET. Bạn chỉ nên sử dụng các kỹ thuật sau khi bạn đã tiến hành thử nghiệm đầy đủ để đảm bảo rằng không có không có vấn đề tương thích. Bất kỳ vấn đề xảy ra do sử dụng ADO hoặc ADO MD theo cách này là không được hỗ trợ. Để biết thêm chi tiết, xem bài viết sau trong cơ sở kiến thức Microsoft:
840667 Bạn nhận được lỗi bất ngờ khi sử dụng ADO và ADO MD trong một.NET Framework ứng dụng
TÓM TẮT
Bài viết này mô tả cách sử dụng các đối tượng dữ liệu nghiên cứu khoa học (CDO) cho thư viện (CDOSYS) của Windows 2000 để gửi thư điện tử bằng cách sử dụng cổng Simple Mail Transfer Protocol (SMTP) trong Microsoft Visual Basic.NET.
THÔNG TIN THÊM
Để gửi thư điện tử bằng cách sử dụng cổng SMTP, hãy làm theo các bước sau:
  1. Bắt đầu Microsoft Visual Studio.NET.
  2. Trên các Tập tin trình đơn, điểm đến Mới, sau đó bấm Dự án.
  3. Trong các Các loại dự án Visual Basic danh sách, bấm vào Giao diện điều khiển ứng dụng.

    Theo mặc định, các tập tin Module1.vb được tạo ra.
  4. Thêm một tham chiếu đến thư Microsoft CDO cho Windows 2000 viện. Để làm như vậy, hãy làm theo các bước sau:
    1. Trên các Dự án trình đơn, nhấp vào Thêm tài liệu tham khảo.
    2. Bấm vào các COM tab, xác định vị trí Microsoft CDO cho Windows 2000 thư viện, sau đó bấm Chọn.
    3. Trong các Thêm tài liệu tham khảo hộp thoại hộp, bấm vào Ok.
    4. Nếu bạn bị nhắc để tạo ra hàm bao cho các thư viện mà bạn đã chọn, bấm .
  5. Lặp lại bước 4 để thêm một tham chiếu đến Microsoft ActiveX Data Objects 2.5 thư viện.
  6. Trong cửa sổ mã, thay thế mã với những điều sau đây:
    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. Tìm cần làm trong các mã, và sau đó thay đổi mã cho môi trường của bạn.
  8. Nhấn F5 để xây dựng và chạy chương trình.
  9. Đảm bảo rằng thư e-mail được gửi và nhận được.
gửi thư CDOSYS SMTP Port

Cảnh báo: Bài viết này được dịch tự động

Thuộc tính

ID Bài viết: 313775 - Xem lại Lần cuối: 12/07/2015 08:15:46 - Bản sửa đổi: 2.0

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

  • kbnosurvey kbarchive kbhowto kbcode kbxml kbmsg kbmt KB313775 KbMtvi
Phản hồi