using System;
using System.Net;

using Smdn.Net.Imap4.WebClients;

class Sample {
  static void Main(string[] args)
  {
    ImapWebRequestCreator.RegisterPrefix();

    using (var client = new WebClient()) {
      client.Credentials = new NetworkCredential("user", "pass");

      // INBOXにあるUIDが1のメッセージをダウンロードしてファイルsample.emlに保存
      client.DownloadFile("imap://user;AUTH=DIGEST-MD5@localhost/INBOX/;UID=1", "sample.eml");
    }
  }
}

Imports System
Imports System.Net

Imports Smdn.Net.Imap4.WebClients

Class Sample
  Shared Sub Main(ByVal args As String())
    ImapWebRequestCreator.RegisterPrefix()

    Using client As New WebClient()
      client.Credentials = New NetworkCredential("user", "pass")

      ' INBOXにあるUIDが1のメッセージをダウンロードしてファイルsample.emlに保存
      client.DownloadFile("imap://user;AUTH=DIGEST-MD5@localhost/INBOX/;UID=1", "sample.eml")
    End Using
  End Sub
End Class

using System;
using System.IO;
using System.Net;

using Smdn.Net.Imap4.WebClients;

class Sample {
  static void Main(string[] args)
  {
    ImapWebRequestCreator.RegisterPrefix();

    using (var client = new WebClient()) {
      client.Credentials = new NetworkCredential("user", "pass");

      // ファイルsample.emlの内容をINBOXにアップロード
      client.UploadData("imap://user;AUTH=DIGEST-MD5@localhost/INBOX", ImapWebRequestMethods.Append, File.ReadAllBytes("sample.eml"));
    }
  }
}

Imports System
Imports System.IO
Imports System.Net

Imports Smdn.Net.Imap4.WebClients

Class Sample
  Shared Sub Main(ByVal args As String())
    ImapWebRequestCreator.RegisterPrefix()

    Using client As New WebClient()
      client.Credentials = New NetworkCredential("user", "pass")

      ' ファイルsample.emlの内容をINBOXにアップロード
      client.UploadData("imap://user;AUTH=DIGEST-MD5@localhost/INBOX", ImapWebRequestMethods.Append, File.ReadAllBytes("sample.eml"))
    End Using
  End Sub
End Class

using System;
using System.Net;

using Smdn.Net.Imap4.WebClients;

class Sample {
  static void Main(string[] args)
  {
    ImapWebRequestCreator.RegisterPrefix();
    ImapSessionManager.ServerCertificateValidationCallback = delegate {
      // 証明書の検証は省略 (エラーを無視してすべて受け入れる)
      return true;
    };

    // GmailアカウントのINBOXから、件名に[Mono-dev]を含むメールの一覧を取得する
    var request = WebRequest.Create("imaps://user@imap.gmail.com/INBOX?SUBJECT \"[Mono-dev]\"");

    request.Credentials = new NetworkCredential("user", "pass");

    using (var response = request.GetResponse() as ImapWebResponse) {
      foreach (var message in response.MessageAttributes) {
        // 取得したメッセージのURLを表示
        Console.WriteLine(message.Url);
      }
    }
  }
}

Imports System
Imports System.Net
Imports System.Net.Security
Imports System.Security.Cryptography.X509Certificates

Imports Smdn.Net.Imap4
Imports Smdn.Net.Imap4.WebClients

Class Sample
  Shared Sub Main(ByVal args As String())
    ImapWebRequestCreator.RegisterPrefix()
    ImapSessionManager.ServerCertificateValidationCallback = New RemoteCertificateValidationCallback(AddressOf ValidateRemoteCertificate)

    ' GmailアカウントのINBOXから、件名に[Mono-dev]を含むメールの一覧を取得する
    Dim request As WebRequest = WebRequest.Create("imaps://user@imap.gmail.com/INBOX?SUBJECT ""[Mono-dev]""")

    request.Credentials = New NetworkCredential("user", "pass")

    Using response As ImapWebResponse = DirectCast(request.GetResponse(), ImapWebResponse)
      For Each message As IImapMessageAttribute In response.MessageAttributes
        ' 取得したメッセージのURLを表示
        Console.WriteLine(message.Url)
      Next
    End Using
  End Sub

  Private Shared Function ValidateRemoteCertificate(ByVal sender As Object, _
                                                    ByVal certificate As X509Certificate, _
                                                    ByVal chain As X509Chain, _
                                                    ByVal sslPolicyErrors As SslPolicyErrors) As Boolean
    ' 証明書の検証は省略 (エラーを無視してすべて受け入れる)
    Return True
  End Function
End Class

using System;
using System.Net;
using Smdn.Net.Imap4;
using Smdn.Net.Imap4.WebClients;
  :

var request = WebRequest.Create("imap://user@localhost/INBOX?ALL") as ImapWebRequest;

request.Credentials = new NetworkCredential("user", "pass");
request.Method = ImapWebRequestMethods.Copy;
request.AllowCreateMailbox = true;
request.DestinationUri = new Uri("imap://user@localhost/INBOX.backup");

using (var response = request.GetResponse()) {
  :
  :
}

Imports System
Imports System.Net
Imports Smdn.Net.Imap4
Imports Smdn.Net.Imap4.WebClients
  :

Dim request As ImapWebRequest = DirectCast(WebRequest.Create("imap://user@localhost/INBOX?ALL"), ImapWebRequest)

request.Credentials = New NetworkCredential("user", "pass")
request.Method = ImapWebRequestMethods.Copy
request.AllowCreateMailbox = True
request.DestinationUri = New Uri("imap://user@localhost/INBOX.backup")

Using response As WebResponse = request.GetResponse()
  :
  :
End Using

using System;
using System.Net;
using Smdn.Net.Imap4;
using Smdn.Net.Imap4.Protocol;
using Smdn.Net.Imap4.WebClients;
  :

var request = WebRequest.Create("imap://user@localhost/INBOX.old") as ImapWebRequest;

request.Credentials = new NetworkCredential("user", "pass");
request.Method = ImapWebRequestMethods.Delete;
request.ExpectedErrorResponseCodes = new[] {ImapResponseCode.NonExistent};

using (var response = request.GetResponse()) {
  :
  :
}

Imports System
Imports System.Net
Imports Smdn.Net.Imap4
Imports Smdn.Net.Imap4.Protocol
Imports Smdn.Net.Imap4.WebClients
  :

Dim request As ImapWebRequest = DirectCast(WebRequest.Create("imap://user@localhost/INBOX.old"), ImapWebRequest)

request.Credentials = New NetworkCredential("user", "pass")
request.Method = ImapWebRequestMethods.Delete
request.ExpectedErrorResponseCodes = New ImapResponseCode() {ImapResponseCode.NonExistent}

Using response As WebResponse = request.GetResponse()
  :
  :
End Using

using System;
using System.Net;
using Smdn.Net.Imap4;
using Smdn.Net.Imap4.Protocol;
using Smdn.Net.Imap4.WebClients;
  :

var request = WebRequest.Create("imap://user@localhost/INBOX.new") as ImapWebRequest;

request.Credentials = new NetworkCredential("user", "pass");
request.Method = ImapWebRequestMethods.Create;
request.ExpectedErrorResponseCodes = new[] {ImapResponseCode.AlreadyExists};

using (var response = request.GetResponse()) {
  :
  :
}

Imports System
Imports System.Net
Imports Smdn.Net.Imap4
Imports Smdn.Net.Imap4.Protocol
Imports Smdn.Net.Imap4.WebClients
  :

Dim request As ImapWebRequest = DirectCast(WebRequest.Create("imap://user@localhost/INBOX.new"), ImapWebRequest)

request.Credentials = New NetworkCredential("user", "pass")
request.Method = ImapWebRequestMethods.Create
request.ExpectedErrorResponseCodes = New ImapResponseCode() {ImapResponseCode.AlreadyExists}

Using response As WebResponse = request.GetResponse()
  :
  :
End Using

using System;
using System.Net;
using System.Text;

using Smdn.Net.Imap4;
using Smdn.Net.Imap4.WebClients;
  :

var builder = new ImapUriBuilder("imap://user@localhost/INBOX");

builder.SearchCriteria = (ImapSearchCriteria.From("差出人") & ImapSearchCriteria.SentBefore(new DateTime(2010, 02, 06)))
                       | (ImapSearchCriteria.Unseen & !ImapSearchCriteria.Subject("未承諾広告"));
builder.Charset = Encoding.GetEncoding(932);

var request = WebRequest.Create(builder.Uri) as ImapWebRequest;

request.Credentials = new NetworkCredential("user", "pass");

using (var response = request.GetResponse()) {
  :
  :
}

Imports System
Imports System.Net
Imports System.Text

Imports Smdn.Net.Imap4
Imports Smdn.Net.Imap4.WebClients
  :

Dim builder As New ImapUriBuilder("imap://user@localhost/INBOX")

builder.SearchCriteria = (ImapSearchCriteria.From("差出人") And ImapSearchCriteria.SentBefore(New DateTime(2010, 2, 6))) _
                         Or _
                         (ImapSearchCriteria.Unseen And Not ImapSearchCriteria.Subject("未承諾広告"))
builder.Charset = Encoding.GetEncoding(932)

Dim request As ImapWebRequest = DirectCast(WebRequest.Create(builder.Uri), ImapWebRequest)

request.Credentials = New NetworkCredential("user", "pass")


Using response As WebResponse = request.GetResponse()
  :
  :
End Using

using System;
using System.Net;

using Smdn.Net.Imap4;
using Smdn.Net.Imap4.WebClients;
  :

var request = WebRequest.Create("imap://user@localhost/INBOX?from spammer.example.com") as ImapWebRequest;

request.Credentials = new NetworkCredential("user", "pass");
request.Method = ImapWebRequestMethods.Store;
request.StoreDataItem = ImapStoreDataItem.ReplaceFlags(new[] {"Junk"}, ImapMessageFlag.Seen);

using (var response = request.GetResponse()) {
  :
  :
}

Imports System
Imports System.Net

Imports Smdn.Net.Imap4
Imports Smdn.Net.Imap4.WebClients
  :

Dim request As ImapWebRequest = DirectCast(WebRequest.Create("imap://user@localhost/INBOX?from spammer.example.com"), ImapWebRequest)

request.Credentials = New NetworkCredential("user", "pass")
request.Method = ImapWebRequestMethods.Store
request.StoreDataItem = ImapStoreDataItem.ReplaceFlags(New String() {"Junk"}, ImapMessageFlag.Seen)

Using response As WebResponse = request.GetResponse()
  :
  :
End Using

using System;
using System.Net;
using Smdn.Net.Imap4;
using Smdn.Net.Imap4.WebClients;

  :
  :
// imapおよびimapsスキームの登録
ImapWebRequestCreator.RegisterPrefix();

// ImapWebRequestインスタンスの作成
var request = WebRequest.Create("imap://user@imap.example.net/");
  :
  :

Imports System
Imports System.Net
Imports Smdn.Net.Imap4
Imports Smdn.Net.Imap4.WebClients

  :
  :
' imapおよびimapsスキームの登録
ImapWebRequestCreator.RegisterPrefix()

' ImapWebRequestインスタンスの作成
Dim request As WebRequest = WebRequest.Create("imap://user@imap.example.net/")
  :
  :