VB.Net by API/System.IO.IsolatedStorage/IsolatedStorageFile

IsolatedStorageFile.CreateDirectory

<source lang="vbnet"> Imports System.IO.IsolatedStorage

Public Class Tester

   Public Shared Sub Main
       Dim myIsoStore As IsolatedStorageFile
       Try
           myIsoStore.CreateDirectory("newDir")
           Dim myIsoStroeStream As New IsolatedStorageFileStream("test.txt", IO.FileMode.Create.Create, myIsoStore)
           myIsoStroeStream.Close()
       Catch ex As IsolatedStorageException
           Console.WriteLine(ex.Message)
       End Try
   End Sub

End Class

 </source>

IsolatedStorageFile.GetDirectoryNames

<source lang="vbnet"> Imports System.IO.IsolatedStorage Public Class Tester

   Public Shared Sub Main
       Dim strFile As String
       Dim strDir As String
       Dim myIsoStore As IsolatedStorageFile
       Try
           For Each strDir In myIsoStore.GetDirectoryNames("*")
               Console.WriteLine(strDir)
               For Each strFile In myIsoStore.GetFileNames(strDir + "/*.*")
                   Console.WriteLine(strFile)
               Next
           Next
       Catch ex As IsolatedStorageException
           Console.WriteLine(ex.Message)
       End Try
   End Sub

End Class

 </source>

IsolatedStorageFile.GetFileNames

<source lang="vbnet"> Imports System.IO.IsolatedStorage Public Class Tester

   Public Shared Sub Main
       Dim strFile As String
       Dim strDir As String
       Dim myIsoStore As IsolatedStorageFile
       Try
           For Each strDir In myIsoStore.GetDirectoryNames("*")
               Console.WriteLine(strDir)
               For Each strFile In myIsoStore.GetFileNames(strDir + "/*.*")
                   Console.WriteLine(strFile)
               Next
           Next
       Catch ex As IsolatedStorageException
           Console.WriteLine(ex.Message)
       End Try
   End Sub

End Class

 </source>