ReadResponseCompleted Event

public event ExtendedAsyncCompletedEventHandler<TResult> ReadResponseCompleted

Public Event ReadResponseCompleted ExtendedAsyncCompletedEventHandler(Of TResult)

public:
 event ExtendedAsyncCompletedEventHandler<TResult>^ ReadResponseCompleted

Asynchronously send a command to the SMTP server and read the response from it.

using System;
using ComponentPro.Net.Mail;

...

// Create a new instance of the Smtp class.
Smtp client = new Smtp();

// Connect to the server.
client.Connect("myserver");

// Or you can specify the SMTP port with 
// client.Connect("myserver", 25); 
 
// Login to the server.
client.Authenticate("user", "password");

// ... 
 
// Send 'HELP' command to the server. 
await client.SendCommandAsync("HELP", false);

// ... 
 
// Asynchronously read response from the server.
SmtpResponse response = await client.ReadResponseAsync();

// ... 
 
// Print out the response.
Console.WriteLine(response.RawResponse);

// Disconnect.
client.Disconnect();

Imports ComponentPro.Net.Mail

...

' Create a new instance of the Smtp class. 
Dim client As New Smtp()

' Connect to the server.
client.Connect("myserver")

' Or you can specify the SMTP port with 
' client.Connect("myserver", 25); 
 
' Login to the server.
client.Authenticate("user", "password")

' ... 
 
' Send 'HELP' command to the server. 
Await client.SendCommandAsync("HELP", False)

' ... 
 
' Asynchronously read response from the server. 
Dim response As SmtpResponse = Await client.ReadResponseAsync()

' ... 
 
' Print out the response.
Console.WriteLine(response.RawResponse)

' Disconnect.
client.Disconnect()

Asynchronously send a command to the SMTP server and read the response from it.

using System;
using System.ComponentModel;
using ComponentPro;
using ComponentPro.Net.Mail;

...

public void DoSendCommandAsync()
{
    // Create a new instance of the Smtp class. 
    Smtp client = new Smtp();

    // Connect to the server. 
    client.Connect("myserver");

    // Or you can specify the SMTP port with 
    // client.Connect("myserver", 25); 
 
    // Login to the server. 
    client.Authenticate("user", "password");

    // ... 
 
    // Register an event handler. 
    client.SendCommandCompleted += client_SendCommandCompleted;
    client.ReadResponseCompleted += client_ReadResponseCompleted;

    // Send 'HELP' command to the server. 
    client.SendCommandAsync("HELP", false);

    // ... 
 
    // Disconnect. 
    client.Disconnect();
}

void client_ReadResponseCompleted(object sender, ExtendedAsyncCompletedEventArgs<SmtpResponse> e)
{
    Smtp client = (Smtp)sender;
    try 
    {
        // Print out the response. 
        Console.WriteLine(e.Result.RawResponse);
    }
    catch (Exception exc)
    {
        Console.WriteLine("Error: " + exc.ToString());
    }
}

void client_SendCommandCompleted(object sender, AsyncCompletedEventArgs e)
{
    Smtp client = (Smtp)sender;
    if (e.Error != null)
    {
        Console.WriteLine("Error: " + e.Error.ToString());
    }
    else 
    {
        // Asynchronously read response from the server. 
        client.ReadResponseAsync();
    }
}

Imports System.ComponentModel
Imports ComponentPro
Imports ComponentPro.Net.Mail

...

Public Sub DoSendCommandAsync()
    ' Create a new instance of the Smtp class. 
    Dim client As New Smtp()

    ' Connect to the server. 
    client.Connect("myserver")

    ' Or you can specify the SMTP port with 
    ' client.Connect("myserver", 25); 
 
    ' Login to the server. 
    client.Authenticate("user", "password")

    ' ... 
 
    ' Register an event handler. 
    AddHandler client.SendCommandCompleted, AddressOf client_SendCommandCompleted
    AddHandler client.ReadResponseCompleted, AddressOf client_ReadResponseCompleted

    ' Send 'HELP' command to the server. 
    client.SendCommandAsync("HELP", False)

    ' ... 
 
    ' Disconnect. 
    client.Disconnect()
End Sub 
 
Private Sub client_ReadResponseCompleted(ByVal sender As Object, ByVal e As ExtendedAsyncCompletedEventArgs(Of SmtpResponse))
    Dim client As Smtp = CType(sender, Smtp)
    Try 
        ' Print out the response. 
        Console.WriteLine(e.Result.RawResponse)
    Catch exc As Exception
        Console.WriteLine("Error: " & exc.ToString())
    End Try 
End Sub 
 
Private Sub client_SendCommandCompleted(ByVal sender As Object, ByVal e As AsyncCompletedEventArgs)
    Dim client As Smtp = CType(sender, Smtp)
    If e.Error IsNot Nothing Then 
        Console.WriteLine("Error: " & e.Error.ToString())
    Else 
        ' Asynchronously read response from the server. 
        client.ReadResponseAsync()
    End If 
End Sub

Reference