VB.Net Tutorial/Stream File/SpecialDirectories

Get files under My.Computer.FileSystem.SpecialDirectories.MyDocuments

<source lang="vbnet">Option Strict On Imports System.IO Public Module FileSystemAttributes

  Public Sub Main()
     Dim docPath As String = My.ruputer.FileSystem.SpecialDirectories.MyDocuments
     For Each fn As String In My.ruputer.FileSystem.GetFiles(docPath)
        Dim fi As FileInfo = New FileInfo(fn)
        Console.WriteLine("{0}: {1}", fi.Name, fi.Attributes.ToString())
     Next
  End Sub

End Module</source>

Default.rdp: Hidden, Archive
desktop.ini: Hidden, System, Archive

My.Computer.FileSystem.SpecialDirectories.AllUsersApplicationData

<source lang="vbnet">public class Test

  public Shared Sub Main
       Console.WriteLine(My.ruputer.FileSystem.SpecialDirectories.AllUsersApplicationData)

  End Sub

End class</source>

C:\Documents and Settings\All Users\Application Data\Test\Test\0.0.0.0

My.Computer.FileSystem.SpecialDirectories.CurrentUserApplicationData

<source lang="vbnet">public class Test

  public Shared Sub Main
       Console.WriteLine(My.ruputer.FileSystem.SpecialDirectories.CurrentUserApplicationData)

  End Sub

End class</source>

C:\Documents and Settings\Joe\Application Data\Test\Test\0.0.0.0

My.Computer.FileSystem.SpecialDirectories.Desktop

<source lang="vbnet">public class Test

  public Shared Sub Main
       Console.WriteLine(My.ruputer.FileSystem.SpecialDirectories.Desktop)

  End Sub

End class</source>

C:\Documents and Settings\Joe\Desktop

My.Computer.FileSystem.SpecialDirectories.MyDocuments

<source lang="vbnet">public class Test

  public Shared Sub Main
       Console.WriteLine(My.ruputer.FileSystem.SpecialDirectories.MyDocuments)

  End Sub

End class</source>

C:\Documents and Settings\Joe\My Documents

My.Computer.FileSystem.SpecialDirectories.MyMusic

<source lang="vbnet">public class Test

  public Shared Sub Main
       Console.WriteLine(My.ruputer.FileSystem.SpecialDirectories.MyMusic)

  End Sub

End class</source>

C:\Documents and Settings\Joe\My Documents\My Music

My.Computer.FileSystem.SpecialDirectories.MyPictures

<source lang="vbnet">public class Test

  public Shared Sub Main
       Console.WriteLine(My.ruputer.FileSystem.SpecialDirectories.MyPictures)
  End Sub

End class</source>

C:\Documents and Settings\Joe\My Documents\My Pictures

My.Computer.FileSystem.SpecialDirectories.Programs

<source lang="vbnet">public class Test

  public Shared Sub Main
       Console.WriteLine(My.ruputer.FileSystem.SpecialDirectories.Programs)
  End Sub

End class</source>

C:\Documents and Settings\Joe\Start Menu\Programs

My.Computer.FileSystem.SpecialDirectories.Temp

<source lang="vbnet">public class Test

  public Shared Sub Main
       Console.WriteLine(My.ruputer.FileSystem.SpecialDirectories.Temp)
  End Sub

End class</source>

C:\Documents and Settings\Joe\Local Settings\Temp