Private Sub ImpersonateIdentity(ByVal logonToken As IntPtr)
    ' Retrieve the Windows identity using the specified token.
    Dim windowsIdentity As New WindowsIdentity(logonToken)

    ' Create a WindowsImpersonationContext object by impersonating the
    ' Windows identity.
    Dim impersonationContext As WindowsImpersonationContext
    impersonationContext = windowsIdentity.Impersonate()

    WriteLine("Name of the identity after impersonation: " + _
        windowsIdentity.GetCurrent().Name + ".")

    ' Stop impersonating the user.
    impersonationContext.Undo()

    ' Check the identity.
    WriteLine("Name of the identity after performing an Undo on the " + _
        "impersonation: " + windowsIdentity.GetCurrent().Name + ".")
End Sub

private static void ImpersonateIdentity(IntPtr logonToken)
{
    // Retrieve the Windows identity using the specified token.
    WindowsIdentity windowsIdentity = new WindowsIdentity(logonToken);

    // Create a WindowsImpersonationContext object by impersonating the
    // Windows identity.
    WindowsImpersonationContext impersonationContext =
        windowsIdentity.Impersonate();

    Console.WriteLine("Name of the identity after impersonation: "
        + WindowsIdentity.GetCurrent().Name + ".");
    Console.WriteLine(windowsIdentity.ImpersonationLevel);
    // Stop impersonating the user.
    impersonationContext.Undo();

    // Check the identity name.
    Console.Write("Name of the identity after performing an Undo on the");
    Console.WriteLine(" impersonation: " +
        WindowsIdentity.GetCurrent().Name);
}

void ImpersonateIdentity( IntPtr logonToken )
{

   // Retrieve the Windows identity using the specified token.
   WindowsIdentity^ windowsIdentity = gcnew WindowsIdentity( logonToken );

   // Create a WindowsImpersonationContext object by impersonating the
   // Windows identity.
   WindowsImpersonationContext^ impersonationContext = windowsIdentity->Impersonate();
   Console::WriteLine( "Name of the identity after impersonation: {0}.", WindowsIdentity::GetCurrent()->Name );

   // Stop impersonating the user.
   impersonationContext->Undo();

   // Check the identity name.
   Console::Write( "Name of the identity after performing an Undo on the" );
   Console::WriteLine( " impersonation: {0}", WindowsIdentity::GetCurrent()->Name );
}