Almacenamiento aislado

Entiendase por almacenamiento aislado a la porsión de información (que puede servir como datos de configuración por ejemplo) que podemos almacenar de forma segura en la máquina del cliente (solo para aplicaciones de escritorio), en el ejemplo de código a continuación veran que solo almaceno un string, es demostrativo, se podría guardar tanta información como sea necesaria.

 

Imports System.IO.IsolatedStorage
Imports System.IO

    ''' <summary>
    ''' Permite inicializar un archivo de almacenamiento aislado
    ''' para la aplicacion
    ''' </summary>
    ''' <remarks>si el archivo de almacenamiento ya existe sera 
    ''' actualizado con la nueva información</remarks>
    Private Sub SetIsolated()
        Dim isoFile As IsolatedStorageFile = IsolatedStorageFile.GetMachineStoreForAssembly()
        Dim isoStream As IsolatedStorageFileStream = New IsolatedStorageFileStream("sistem.dat", FileMode.OpenOrCreate, isoFile)
        Dim writer As New StreamWriter(isoStream)
        writer.WriteLine("esta es la configuracion almacenada")
        writer.Close()
    End Sub
    ''' <summary>
    ''' Permite obtener la información almacenada para este assembly de forma aislada
    ''' </summary>
    ''' <remarks>para poder leer el archivo debemos estar seguros que ya existe</remarks>
    Private Sub GetIsolated()
        Dim isoFile As IsolatedStorageFile = IsolatedStorageFile.GetMachineStoreForAssembly()
        Dim isoStream As IsolatedStorageFileStream = New IsolatedStorageFileStream("sistem.dat", FileMode.Open, isoFile)
        Dim result As String = New StreamReader(isoStream).ReadToEnd()
        Console.Write(result)
    End Sub


sub main()
        'almacenamiento aislado
        SetIsolated()
        GetIsolated()
    console.read()
end sub