This project has moved and is read-only. For the latest updates, please go here.

PersistentDictionary Sample

Here is an application that remembers a first name → last name mapping in a persistent dictionary.

Imports Microsoft.Isam.Esent.Collections.Generic

Module PersistentDictionarySample

  Sub Main()
    Dim dictionary As PersistentDictionary(Of String, String) = New PersistentDictionary(Of String, String)("Names")
    Console.WriteLine("What is your first name?")
    Dim firstName As String = Console.ReadLine()
    If dictionary.ContainsKey(firstName) Then
      Console.WriteLine("Welcome back {0} {1}", firstName, dictionary(firstName))
      Console.WriteLine("I don't know you, {0}. What is your last name?", firstName)
      dictionary(firstName) = Console.ReadLine()
    End If
  End Sub

End Module

Last edited Mar 23, 2010 at 3:39 AM by laurionb, version 1


No comments yet.