The simplest way to copy multiple messages from the current working mailbox to another mailbox is using the CopyMessage method. You need to create a new instance of the message id list class - ImapMessageIdCollection and add sequence numbers or unique ids of the messages you want to copy.

The following steps will help you to do that:

Copying multiple messages

1. Add using directives to your code to create aliases for existing namespaces and avoid having to type the fully qualified type names. The code looks similar to the following:
   Copy Code

   C#

   VB.NET

   using ComponentPro.Net;
   using ComponentPro.Net.Mail;
   

   Imports ComponentPro.Net
   Imports ComponentPro.Net.Mail
   

2. Create a new instance of the Imap class.
3. Now you can connect to the IMAP server with Connect methods. The code looks similar to the following:
   Copy Code

   C#

   VB.NET

   // IMAP server information. 
   const string serverName = "myserver";
   const string user = "name@domain.com";
   const string password = "mytestpassword";
   const int port = 993;
   const SslSecurityMode securityMode = SslSecurityMode.Implicit;
   
   // Create a new instance of the Imap class.
   Imap client = new Imap();
   
   // Connect to the server.
   client.Connect(serverName, port, securityMode);
   

   ' IMAP server information. 
   Const serverName As String = "myserver" 
   Const user As String = "name@domain.com" 
   Const password As String = "mytestpassword" 
   Const port As Integer = 993
   Const securityMode As SslSecurityMode = SslSecurityMode.Implicit
   
   ' Create a new instance of the Imap class. 
   Dim client As New Imap()
   
   ' Connect to the server.
   client.Connect(serverName, port, securityMode)
   

4. Use your user name and password to login with Authenticate methods. The code looks similar to the following:
   Copy Code

   C#

   VB.NET

   // Login to the server.
   client.Authenticate(user, password);
   

   ' Login to the server.
   client.Authenticate(user, password)
   

5. Now create a new instance of the ImapMessageIdSet class, add message sequence numbers that you need to copy to it and call the CopyMessage method. The code looks similar to the following:
   Copy Code

   C#

   VB.NET

   // Select 'INBOX' mailbox.
   client.Select("INBOX");
   
   ImapMessageIdCollection set = new ImapMessageIdCollection(1, 2, 3);
   
   // Copy mail messages with sequence numbers 1, 2, and 3 to folder 'my box'.
   client.CopyMessage(set, "my box");
   

   ' Select 'INBOX' mailbox.
   client.Select("INBOX")
   
   Dim [set] As New ImapMessageIdCollection(1, 2, 3)
   
   ' Copy mail messages with sequence numbers 1, 2, and 3 to folder 'my box'.
   client.CopyMessage([set], "my box")
   

6. After completing your work, call the Disconnect method to close the IMAP session.

Final example code

using ComponentPro.Net;
using ComponentPro.Net.Mail;

...

// IMAP server information. 
const string serverName = "myserver";
const string user = "name@domain.com";
const string password = "mytestpassword";
const int port = 993;
const SslSecurityMode securityMode = SslSecurityMode.Implicit;

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

// Connect to the server.
client.Connect(serverName, port, securityMode);

// Login to the server.
client.Authenticate(user, password);

// Select 'INBOX' mailbox.
client.Select("INBOX");

ImapMessageIdCollection set = new ImapMessageIdCollection(1, 2, 3);

// Copy mail messages with sequence numbers 1, 2, and 3 to folder 'my box'.
client.CopyMessage(set, "my box");

// Close the connection.
client.Disconnect();

Imports ComponentPro.Net
Imports ComponentPro.Net.Mail

...

' IMAP server information. 
Const serverName As String = "myserver" 
Const user As String = "name@domain.com" 
Const password As String = "mytestpassword" 
Const port As Integer = 993
Const securityMode As SslSecurityMode = SslSecurityMode.Implicit

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

' Connect to the server.
client.Connect(serverName, port, securityMode)

' Login to the server.
client.Authenticate(user, password)

' Select 'INBOX' mailbox.
client.Select("INBOX")

Dim [set] As New ImapMessageIdCollection(1, 2, 3)

' Copy mail messages with sequence numbers 1, 2, and 3 to folder 'my box'.
client.CopyMessage([set], "my box")

' Close the connection.
client.Disconnect()