public void SaveDatabase(
	string spamFilename,
	string nonSpamFilename,
	int threshold,
	bool saveAlways
)

Public Sub SaveDatabase ( 
	spamFilename As String,
	nonSpamFilename As String,
	threshold As Integer,
	saveAlways As Boolean
)

// To use the code below, import these namespaces at the top of your code.
using System;
using System.IO;
using MailBee.Mime;
using MailBee.AntiSpam;

class Sample
{
    static void Main(string[] args)
    {
        BayesFilter filter = new BayesFilter();
        MailMessage msg = new MailMessage();

        string spamDatabasePath = @"C:\AntiSpam\spam.dat";
        string nonSpamDatabasePath = @"C:\AntiSpam\nonspam.dat";
        filter.LoadDatabase(spamDatabasePath, nonSpamDatabasePath);

        // Train Bayesian filter for spam messages.
        string[] files = Directory.GetFiles(@"C:\AntiSpam\Spam", "*.eml");
        foreach (string file in files)
        {
            msg.LoadMessage(file);
            filter.TrainFilter(msg, true); // Mark as spam.
        }

        // Train Bayesian filter for non-spam messages.
        files = Directory.GetFiles(@"C:\AntiSpam\NonSpam", "*.eml");
        foreach (string file in files)
        {
            msg.LoadMessage(file);
            filter.TrainFilter(msg, false); // Mark as non-spam.
        }

        // Save Bayesian database to disk without compression.
        filter.SaveDatabase(spamDatabasePath, nonSpamDatabasePath);

        FileInfo fis = new FileInfo(spamDatabasePath);
        FileInfo fins = new FileInfo(nonSpamDatabasePath);
        Console.WriteLine("Size of database before compacting is: {0}", fis.Length + fins.Length);

        // Compress Bayesian database and save it to disk.
        filter.SaveDatabase(spamDatabasePath, nonSpamDatabasePath, 3, false);

        fis = new FileInfo(spamDatabasePath);
        fins = new FileInfo(nonSpamDatabasePath);
        Console.WriteLine("Size of database after compacting is: {0}", fis.Length + fins.Length);
    }
}

// Outputs:
// Size of database before compacting is: 21164
// Size of database after compacting is: 11364 (may differ in your case)

' To use the code below, import these namespaces at the top of your code.
Imports System.IO
Imports MailBee.Mime
Imports MailBee.AntiSpam

Class Sample
    Shared Sub Main(ByVal args() As String)
        Dim filter As BayesFilter = New BayesFilter()
        Dim msg As MailMessage = New MailMessage()

        Dim spamDatabasePath As String = "C:\AntiSpam\spam.dat"
        Dim nonSpamDatabasePath As String = "C:\AntiSpam\nonspam.dat"
        filter.LoadDatabase(spamDatabasePath, nonSpamDatabasePath)

        ' Train Bayesian filter for spam messages.
        Dim files() As String = Directory.GetFiles("C:\AntiSpam\Spam", "*.eml")
        For Each file As String In files
            msg.LoadMessage(file)
            filter.TrainFilter(msg, True) ' Mark as spam.
        Next

        ' Train Bayesian filter for non-spam messages.
        files = Directory.GetFiles("C:\AntiSpam\NonSpam", "*.eml")
        For Each file As String In files
            msg.LoadMessage(file)
            filter.TrainFilter(msg, False) ' Mark as non-spam.
        Next

        ' Save Bayesian database to disk.
        filter.SaveDatabase(spamDatabasePath, nonSpamDatabasePath)

        Dim fis As FileInfo = New FileInfo(spamDatabasePath)
        Dim fins As FileInfo = New FileInfo(nonSpamDatabasePath)
        Console.WriteLine("Size of database before compacting is: {0}", fis.Length + fins.Length)

        ' Save Bayesian database to disk and compress it.
        filter.SaveDatabase(spamDatabasePath, nonSpamDatabasePath, 3, False)

        fis = New FileInfo(spamDatabasePath)
        fins = New FileInfo(nonSpamDatabasePath)
        Console.WriteLine("Size of database after compacting is: {0}", fis.Length + fins.Length)
    End Sub
End Class

' Outputs:
' Size of database before compacting is: 21164
' Size of database after compacting is: 11364 (may differ in your case)